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

ASPÖÐByValÓëByRefµÄÇø±ð

·Ï»°²»¶à˵£¬Ìù´úÂ룺
ÏÈÀ´¿´¿´ByVal´«Öµ£º
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
Dim arr(2)
arr(0) = 0
arr(1) = 1
arr(2) = 2
Call sub1(arr)
Sub sub1(ByVal a)
a(0) = 9
a(1) = 8
a(2) = 7
Response.Write("ÎÒÔÚsub¹ý³ÌÖиü¸ÄÁËÖµ£º"&a(0)&","&a(1)&","&a(2))
End Sub
Response.Write("ÔÚsub¹ý³ÌÍâÊä³öÖµ£º"&arr(0)&","&arr(1)&","&arr(2))
%> 
ÏÂÃæÊÇÊä³ö½á¹û£º
ÎÒÔÚsub¹ý³ÌÖиü¸ÄÁËÖµ£º9,8,7ÔÚsub¹ý³ÌÍâÊä³öÖµ£º0,1,2 
ÔÙÀ´¿´¿´ByRef´«Öµ£º
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
Dim arr(2)
arr(0) = 0
arr(1) = 1
arr(2) = 2
Call sub1(arr)
Sub sub1(ByRef a)
a(0) = 9
a(1) = 8
a(2) = 7
Response.Write("ÎÒÔÚsub¹ý³ÌÖиü¸ÄÁËÖµ£º"&a(0)&","&a(1)&","&a(2))
End Sub
Response.Write("ÔÚsub¹ý³ÌÍâÊä³öÖµ£º"&arr(0)&","&arr(1)&","&arr(2))
%> 
ÏÂÃæÊÇÊä³ö½á¹û£º
ÎÒÔÚsub¹ý³ÌÖиü¸ÄÁËÖµ£º9,8,7ÔÚsub¹ý³ÌÍâÊä³öÖµ£º9,8,7 
ÏÂÃæÎÒÃÇÀ´¿´¿´aspĬÈÏÊÇÒÔʲô·½Ê½´«ÖµµÄ
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
Dim arr(2)
arr(0) = 0
arr(1) = 1
arr(2) = 2
Call sub1(arr)
Sub sub1(ByRef a)
a(0) = 9
a(1) = 8
a(2) = 7
Response.Write("ÎÒÔÚsub¹ý³ÌÖиü¸ÄÁËÖµ£º"&a(0)&","&a(1)&","&a(2))
End Sub
Response.Write("ÔÚsub¹ý³ÌÍâÊä³öÖµ£º"&arr(0)&","&arr(1)&","&arr(2))
%> 
Êä³ö½á¹û£º
ÎÒÔÚsub¹ý³ÌÖиü¸ÄÁËÖµ£º9,8,7ÔÚsub¹ý³ÌÍâÊä³öÖµ£º9,8,7 
Õâ˵Ã÷ÔÚvbscriptÖÐĬÈϵĴ«Öµ·½Ê½ÊÇByRef


Ïà¹ØÎĵµ£º

ASPÓëJSP ¹ØÓÚÒ³ÃæµÄÊäÈëºÍÊä³öµÄÎÊÌâ

Ò³ÃæµÄÊäÈëºÍÊä³öÉæ¼°µ½ÁËRequestºÍResponse,ÓÉÓÚËûÃǺÍJspÖеÄÏàËÆ,
ÏÂÃæÎÒÃǽøÐÐÏêϸµÄ½â¶Á£º
JSPÖУº
    ÔÚ¶¯Ì¬ÍøÒ³¿ª·¢ÖУ¬HTML±íµ¥ÊÇÓëÓû§½»»¥ÐÅÏ¢µÄÖ÷ÒªÊֶΡ£
    ʹÓÃJSP´¦Àí±íµ¥ÇëÇóʱ£¬Ò»°ã×ñÑ­ÕâÑùÒ»ÖÖģʽ£¬Ê×ÏÈ£¬Óû§Í¨¹ý±íµ¥¿Ø¼þÊäÈë²¢Ìá½»ÐÅÏ¢;½Ó×Å£¬JSPÒ³Ãæ»ñµÃ±íµ¥Êý ......

aspÐÔÄܲâÊÔ±¨¸æ

ÔÚ·þÎñÆ÷ÉÏÉú³É¶¯Ì¬ÄÚÈÝÊÇʹÓÃASP×îÖ÷ÒªµÄÔ­ÒòÖ®Ò»£¬ËùÒÔÎÒÃÇÑ¡ÔñµÄµÚÒ»¸ö²âÊÔÏîÄ¿ÊÇÈ·¶¨°Ñ¶¯Ì¬ÄÚÈÝ·¢Ë͵½Ó¦´ðÁ÷ʹÓÃʲô·½·¨×îºÃ¡£»ù±¾µÄÑ¡ÔñÓÐÁ½ÖÖ£¨ÒÔ¼°ËüÃǵÄһЩ±ä»¯£©£ºÊ¹ÓÃÄÚǶASP±ê¼Ç£¬Ê¹ÓÃResponse.WriteÓï¾ä¡£
¡¡¡¡ Ϊ²âÊÔÕâЩ²»Í¬µÄ·½·¨£¬ÎÒÃÇ´´½¨ÁËÒ»¸ö¼òµ¥µÄASPÒ³Ãæ£¬Ò³ÃæÏȶ¨ÒåһЩ±äÁ¿È»ºó°ÑËüÃDzåÈëµ½±í¸ ......

asp Éú³É¾²Ì¬

<%
Do_Url = "http://"
'Do_Url = Do_Url&Request.ServerVariables("SERVER_NAME")&"/shownews.asp" Ö÷Ŀ¼
aa=Request.Servervariables("url") 'ÐéÄâĿ¼
bb=InstrRev(aa,"/")
cc=left(aa,bb)
Do_Url = Do_Url&Request.ServerVariables("HTTP_HOST")&cc&"index.asp"
call SaveFile("index.h ......

vbºÍaspÈçºÎÓÃremote·ÃÎÊÔ¶³ÌÊý¾Ý¿â

·ÃÎÊÔ¶³ÌÊý¾Ý¿âµÄÇé¿öÓÐÒÔϼ¸ÖÖ£º
1£©·ÃÎÊÔ¶³ÌÊý¾Ý¿âµÄaccessÊý¾Ý¿â
2£©·ÃÎÊÔ¶³ÌmssqlÊý¾Ý¿â»òoracleµÈÆäËû¹ØÏµÊý¾Ý¿â£¬µ«ÊÇÊý¾Ý¿âͨÐŶ˿ڱ»·À»ðǽ×èµ²»òÆäËûÍøÂçÔ­ÒòÔì³ÉÎÞ·¨Ê¹Óøö˿Ú
±¾ÎĽöÔÚwindows2000 advance server,mdac2.8ϲâÊÔͨ¹ý£¬ÆäÓàÌõ¼þ²»±£Ö¤ÄÜÕý³£ÔËÐÐ
ÔÚmdacµÄService ProvidersÖаüÀ¨Microsoft ......

asp 11ÖÐÁ¬½ÓÊý¾Ý¿âµÄ·½·¨

¡¡ASPÁ¬½ÓÊý¾Ý¿âµÄ11ÖÖ·½·¨——±¾ÎÄ×ܽáÁËʹÓÃASPÁ´½Ó¸÷ÖÖÊý¾Ý¿âµÄ·½·¨£º
¡¡¡¡1.AccessÊý¾Ý¿âµÄDSN-lessÁ¬½Ó·½·¨:
set adocon=Server.Createobject("adodb.connection")
adoconn.Open"Driver={Microsoft Access Driver(*.mdb)};DBQ="& _
Server.MapPath("Êý¾Ý¿âËùÔÚ·¾¶")
¡¡¡¡2.Access OLE DBÁ¬½Ó·½·¨£ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ