Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

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ʵÏÖÖ§³Ö¸½¼þµÄEMailϵͳ(3)
  
¡¡¡¡³¢ÊÔ·¢ËÍÓʼþ£¬µ«ÊÇʧ°ÜÁË£¬ÇëÐ޸ĴíÎóºóÖØÊÔ£¡
£¼script language="javascript"£¾
alert("ÄúÊäÈëµÄÊÕ¼þ×é¸ñʽ´íÎó£¡\rÕýÈ·µÄ¸ñʽÊÇ:'gr:001'");
history.back();
£¼/script£¾
£¼p£¾
£¼%
response.end
else
thegroup=(mid(trim(strfieldvalue),4))
end if
......

Windows7ÏÂIIS7µÄ°²×°¼°ASPÅäÖ÷½·¨¡ï

Windows7ÏÂIIS7µÄ°²×°¼°ASPÅäÖ÷½·¨¡ï
±¾ÎĽ²ÊöÁËÔÚWindows 7ÏÂÈçºÎ°²×°IIS7£¬ÒÔ¼°IIS7ÔÚ°²×°¹ý³ÌÖеÄһЩÐèҪעÒâµÄÉèÖã¬ÒÔ¼°ÔÚIIS7ÏÂÅäÖÃASPµÄÕýÈ··½·¨¡£×ªÔعý³ÌÖв»µÃÒÔÈκη½Ê½ºÍ·½·¨ÓÃÓÚÉÌÒµÓÃ;£¬Çë×¢Ã÷³ö´¦¡£Ð»Ð»ÄúµÄÖ§³Ö¡£×£Äú°²×°¼°µ÷ÊԳɹ¦¡£
×¢£º±¾È˰²×°µÄÊÇWindows 7 RC 7100 32λÖÐÎÄÆì½¢°æ ¡£
ÔÚWindow ......

aspÖÐ×Ö·û´®×ª»¯ÎªÊµÌåÀàµÄ·½·¨£¨ÓÅ»¯Æª£¬¼òµ¥ÓÅ»¯£©

option explicit
dim str1,str2
str1 ="order|||shiyang:100,mayang:200"
str2 = "book|||shuming:¼ÆËã»ú,dingjia:100"
'ÉùÃ÷2¸öÈ«¾Ö¶ÔÏó
'·ÅÆúÁËÒ»¿ªÊ¼Ï£ÍûÓÃÊý×é´æ´¢µÄ·½Ê½£¬ÄǸöËäȻЧÂʸü¸ß£¬µ«ÊÇÐèÒª×Ô¶¨ÒåµÄarray_pushobjº¯Êý£¬ËùÒÔ´Ë´¦²»×öÌÖÂÛÁË
dim objname_g
dim classname_g
'·µ»ØÊµÌåÀà
function getO ......

ASP.NET±à³ÌÄ£ÐÍÖ®ASP.NETÒ³ÃæÉúÃüÖÜÆÚͼ½â

ASP.NET±à³ÌÄ£ÐÍÖ®ASP.NETÒ³ÃæÉúÃüÖÜÆÚͼ½â
ASP.NET±à³ÌÄ£ÐÍÖÐASP.NETÒ³ÃæÉúÃüÖÜÆÚÊÇÖ¸Ê²Ã´ÄØ£¿Ëü°üÀ¨Ê²Ã´ÄØ£¿ASP.NET±à³ÌÄ£ÐÍÖ®ASP.NETÒ³ÃæÉúÃüÖÜÆÚ¾ßÌåµÄ¹ý³ÌÓÐÄÄÐ©ÄØ£¿ÏÂÃæ¾Í¿ªÊ¼ÎÒÃǵĽ²½â°É£º
ASP.NET Ò³ÔËÐÐʱ£¬´ËÒ³½«¾­ÀúÒ»¸öÉúÃüÖÜÆÚ£¬ÔÚÉúÃüÖÜÆÚÖн«Ö´ÐÐһϵÁд¦Àí²½Öè¡£ÕâЩ²½Öè°üÀ¨³õʼ»¯¡¢ÊµÀý»¯¿Ø¼þ¡¢»¹Ô­ºÍ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ