ASPµ÷Óô洢¹ý³Ì£º·µ»Ø¶à¸ö¼Ç¼¼¯µÄ´æ´¢¹ý³Ì
¡¡¡¡7. ·µ»Ø¶à¸ö¼Ç¼¼¯µÄ´æ´¢¹ý³Ì
¡¡¡¡±¾ÎÄ×îÏȽéÉܵÄÊÇ·µ»Ø¼Ç¼¼¯µÄ´æ´¢¹ý³Ì¡£ÓÐʱºò£¬ÐèÒªÒ»¸ö´æ´¢¹ý³Ì·µ»Ø¶à¸ö¼Ç¼¼¯£¬ÔÚASPÖУ¬ÈçºÎͬʱȡµÃÕâЩ¼Ç¼¼¯ÄØ£¿ÎªÁË˵Ã÷ÕâÒ»ÎÊÌ⣬ÔÚuserinfo±íÖÐÔö¼ÓÁ½¸ö×ֶΣºusertel¼°usermail£¬²¢É趨ֻÓеǼÓû§¿ÉÒԲ鿴ÕâÁ½ÏîÄÚÈÝ¡£
/*SP7*/
CREATE PROCEDURE dbo.getUserInfo
@userid int,
@checklogin bit
as
set nocount on
begin
if @userid is null or @checklogin is null return
select username
from dbo.[usrinfo]
where userid=@userid
--ÈôΪµÇ¼Óû§£¬È¡usertel¼°usermail
if @checklogin=1
select usertel,usermail
from dbo.[userinfo]
where userid=@userid
return
end
go
¡¡¡¡ÒÔÏÂÊÇASP´úÂ룺
'**µ÷Ó÷µ»Ø¶à¸ö¼Ç¼¼¯µÄ´æ´¢¹ý³Ì**
DIM checklg,UserID,UserName,UserTel,UserMail
DIM MyComm,MyRst
UserID = 1
'checklogin()Ϊ×Ô¶¨Ò庯Êý£¬ÅжϷÃÎÊÕßÊÇ·ñµÇ¼
checklg = checklogin()
Set MyComm = Server.CreateObject("ADODB.Command")
with MyComm
¡¡.ActiveConnection = MyConStr 'MyConStrÊÇÊý¾Ý¿âÁ¬½Ó×Ö´®
¡¡.CommandText = "getUserInfo" 'Ö¸¶¨´æ´¢¹ý³ÌÃû
¡¡.CommandType = 4 '±íÃ÷ÕâÊÇÒ»¸ö´æ´¢¹ý³Ì
¡¡.Prepared = true 'ÒªÇó½«SQLÃüÁîÏÈÐбàÒë
¡¡.Parameters.append .CreateParameter("@userid",3,1,4,UserID)
¡¡.Parameters.append .CreateParameter("@checklogin",11,1,1,checklg)
¡¡Set MyRst = .Execute
end with
Set MyComm = Nothing
'´ÓµÚÒ»¸ö¼Ç¼¼¯ÖÐȡֵ
UserName = MyRst(0)
'´ÓµÚ¶þ¸ö¼Ç¼¼¯ÖÐȡֵ
if not MyRst is Nothing then
¡¡Set MyRst = MyRst.NextRecordset()
¡¡UserTel = MyRst(0)
¡¡UserMail = MyRst(1)
end if
Set MyRst = Nothing
¡¡¡¡ÒÔÉÏ´úÂëÖУ¬ÀûÓÃRecordset¶ÔÏóµÄNextRecordset·½·¨£¬È¡µÃÁË´æ´¢¹ý³Ì·µ»ØµÄ¶à¸ö¼Ç¼¼¯¡£
¡¡¡¡ÖÁ´Ë£¬Õë¶ÔASPµ÷Óô洢¹ý³ÌµÄ¸÷ÖÖÇé¿ö£¬±¾ÎÄÒÑ×öÁ˽ÏÎªÈ«ÃæµÄ˵Ã÷¡£×îºó˵һÏÂÔÚÒ»¸öASP³ÌÐòÖУ¬µ÷Óöà¸ö´æ´¢¹ý³ÌµÄ²»Í¬·½·¨¡£
¡¡¡¡ÔÚÒ»¸öASP³ÌÐòÖУ¬µ÷Óöà¸ö´æ´¢¹ý³ÌÖÁÉÙÓÐÒÔÏÂÈýÖÖ·½·¨ÊÇ¿ÉÐеģº
¡¡¡¡1. ´´½¨¶à¸öCommand¶ÔÏó
DIM MyComm
Set MyComm = Server.CreateObject("ADODB.Command")
'µ÷Óô洢¹ý³ÌÒ»
......
Set MyComm = Nothing
Set MyComm = Server.CreateObject("ADODB.Command")
'µ÷Óô洢¹ý³Ì¶þ
......
Set MyComm = Nothing
......
¡¡¡¡2. Ö»´´½¨Ò»¸
Ïà¹ØÎĵµ£º
ASPÍòÓ÷ÖÒ³³ÌÐò
¡¡¡¡ÕâÖ»ÊǸöaspС¼¼ÇÉÀàµÄ¶«Î÷£¬ËüËäÈ»ÊʺÏÔÚÿ¸ö²»Í¬ÎļþÃûÀïµ÷ÓÃÕâ¸öº¯Êý£¬µ«ÊÇÒ²ÊÇÓÐǰÌáµÄ£¬ÏÂÃæÈÃÎÒÃÇÀ´×Ðϸ¿´¿´ÆäÖеÄÔί¡£
¡¡¡¡ÏÂÃæÕâ¶ÎÊÇ»ù±¾µÄ·ÖÒ³´úÂ룺
£¼% sql = "select……………………Ê¡ÂÔÁËsqlÓï¾ä
¡¡Set rs=Server ......
ºǫ́Êý¾Ý¿â£º
[Microsoft Access]
Óë
[Microsoft Sql Server]
¸ü»»Ö®ºó£¬ASP´úÂëӦעÒâÒªÐ޸ĵÄһЩµØ·½£º
[Ò»]Á¬½ÓÎÊÌ⣨¾ÙÀý)
[Microsoft Access]
constr = "DBQ=c:\data\clwz.mdb; DRIVER={Microsoft Access Driver (*.mdb)}"
[Microsoft Sql Server]
constr = "DRIVER={SQL Server};SERVER=host;DATA ......
ÕâÊÇ´Ó·½·¨Ö±½Ó¸´ÖƵģ¬
²ÎÊý fileTypeÊÇÎļþ¸ñʽ
²ÎÊýfiledNameÊÇд³öºóÎļþµÄÎļþÃû¡£
²ÎÊýsuffixÊÇд³öºóÎļþµÄÎļþºó׺Ãû¡£
Response.Clear(); //Çå¿Õ »º³åÇøµÄËùÓÐÊä³öÊý¾Ý
Response.Charset = "utf-8";//ÉèÖÃÊä³öÊä³öÁ÷×Ö·ûÀàÐÍ
&nb ......
´ËÎÄÖ»ÊÇÈëÃÅ£¬ÑÝʾÁËÈçºÎÓÃʵÌåÀà´æ´¢Êý¾Ý£¬ÎÞʵ¼ÊÒâÒå¡£ºóÃæÓÐÂ½Ðø¸üÐÂÓÅ»¯¡££¨ÒÔºóµÄÎÄÕÂÖн«Â½ÐøÊµÏÖÎÞÐèÉùÃ÷¾ßÌåÀà×Ô¶¯´æ´¢Êý¾Ý£¬ºÍ¼òµ¥µÄÐÔÄÜÓÅ»¯£©
ÔÚasp³ÌÐò¿ª·¢¹ý³ÌÖУ¬½á¹¹Êý¾ÝµÄ´æ´¢Ò»Ö±ÊǸöÎÊÌ⣬aspµÄÊý×éÒ»Ö±ºÜÈõ£¬¶øÇÒ²»ÄÜ×Ô½âÊÍ£¬ ......
¡¡¡¡4. ÓÐÊäÈë²ÎÊýºÍÊä³ö²ÎÊýµÄ´æ´¢¹ý³Ì
¡¡¡¡·µ»ØÖµÆäʵÊÇÒ»ÖÖÌØÊâµÄÊä³ö²ÎÊý¡£ÔÚ´ó¶àÊýÇé¿öÏ£¬ÎÒÃÇÓõ½µÄÊÇͬʱÓÐÊäÈë¼°Êä³ö²ÎÊýµÄ´æ´¢¹ý³Ì£¬±ÈÈçÎÒÃÇÏëÈ¡µÃÓû§ÐÅÏ¢±íÖУ¬Ä³IDÓû§µÄÓû§Ãû£¬Õâʱºò£¬ÓÐÒ»¸öÊäÈë²ÎÊý----Óû§ID£¬ºÍÒ»¸öÊä³ö²ÎÊý----Óû§Ãû¡£ÊµÏÖÕâÒ»¹¦ÄܵĴ洢¹ý³ÌÈçÏ£º
/*SP4*/
CREATE PROCEDURE d ......