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ÍøÉϹºÎïϵͳ v0912-26
Èí¼þ´óС£º7069k
ÔËÐл·¾³£ºASP/Access
Èí¼þÀà±ð£ºµç×ÓÉÌÎñ
Èí¼þÊÚȨ£ºÃâ·Ñ
¿ª·¢É̼Ò: ·ç¶É¿Æ¼¼
¹Ù·½ÍøÕ¾£ºhttp://www.chinammc.com
ÑÝʾµØÖ·£ºhttp://demo01.chinammc.com
ÏÂÔصØÖ·: http://w ......
ÔÚ·þÎñÆ÷ÉÏÉú³É¶¯Ì¬ÄÚÈÝÊÇʹÓÃASP×îÖ÷ÒªµÄÔÒòÖ®Ò»£¬ËùÒÔÎÒÃÇÑ¡ÔñµÄµÚÒ»¸ö²âÊÔÏîÄ¿ÊÇÈ·¶¨°Ñ¶¯Ì¬ÄÚÈÝ·¢Ë͵½Ó¦´ðÁ÷ʹÓÃʲô·½·¨×îºÃ¡£»ù±¾µÄÑ¡ÔñÓÐÁ½ÖÖ£¨ÒÔ¼°ËüÃǵÄһЩ±ä»¯£©£ºÊ¹ÓÃÄÚǶASP±ê¼Ç£¬Ê¹ÓÃResponse.WriteÓï¾ä¡£
¡¡¡¡ Ϊ²âÊÔÕâЩ²»Í¬µÄ·½·¨£¬ÎÒÃÇ´´½¨ÁËÒ»¸ö¼òµ¥µÄASPÒ³Ã棬ҳÃæÏȶ¨ÒåһЩ±äÁ¿È»ºó°ÑËüÃDzåÈëµ½±í¸ ......
Access Á¬½Ó×Ö·û´®
strConnect = “Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\MyDatabase.mdb;”
Access 2007 Á¬½Ó×Ö·û´®
strConnect = “Provider=Microsoft.ACE.OLEDB.12.0;Mode=Share Exclusive;Data Source=C:\MyDatabase.accdb;”
MSSQL Server Á¬½Ó×Ö·û´®
strConnect = &ldquo ......
Õª×Ô£ºhttp://zxlh168.blog.163.com/blog/static/7778614020098168638654/
<%
’FSO×é¼þÃû³Æ
dim FSObject
FSObject="Scripting.FileSystemObject"
’=========================================================
’¡ôÊÇ·ñÖ§³Ö×é¼þ
’=============================================== ......