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

aspÊý×écookies²Ù×÷º¯Êý


±¾ÎĵĴ´ÔìÐÔÔÚÓÚcookies_to_array(c)   Ö±½Ó¼òµ¥¿ì½Ýת»¯×Ö·û´®ÎªÊý×éµÄ·½·¨
ÁíÍâ ±¾ÎIJÙ×÷µÄÊý×é ²»ÊÇ aspÆÕͨµÄ¶àάÊý×é ¶øÊǾâ³ÝÐ͵Ä
ÕâÖÖÊý×é ¸üÒײÙ×÷ ¸üÒ×ÔĶÁ ÐÐÁÐÇåÎú ºÜÏñÊý¾Ý¿âÖеıí
¿ÉÒÔÀà±ÈΪ datatable
class myarray
'±ØÐëΪ¾â³ÝÊý×éarray(array(1,2,3))
function array_to_cookies(a)
dim b(),i,j,u
u = ubound(a)
redim b(u)
for i=0 to u
array_rep a(i)
b(i)=join(a(i),",")
next
array_to_cookies=join(b,";")
end function
sub array_rep(a)
dim i
if isarray(a) then
for i=0 to ubound(a)
if instr(a(i),",")>0 then a(i)=replace(a(i),",","")
if instr(a(i),";")>0 then a(i)=replace(a(i),";","")
next
end if
end sub
function cookies_to_array(c)
c = "array(array("+replace(c,";","),array(")+"))"
execute "cookies_to_array="&c
end function
'ÒÔijÁÐΪÖ÷¼ü Ìí¼Ó»òÕ߸üРÐÐ
sub add_row(a,ai,columnum)
dim b(),i,j,u
u = ubound(a)
if columnum=-1 then'add
redim b(u+1)
else
redim b(u)
end if
j=0
for i=0 to u
if columnum>-1 then
if a(i)(columnum)<>ai(columnum) then
b(j)=a(i)
j = j+1
else
b(j)=ai
j = j+1
end if
else
b(j)=a(i)
j = j+1
end if
next
if columnum=-1 then
b(j)=ai
end if
a=b
end sub
function get_rownum(a,columnum,columv)
get_rownum=-1
dim i,j,u
u = ubound(a)
for i=0 to u
if a(i)(columnum)=columv then
get_rownum = i
exit function
end if
next
end function
'¸ù¾ÝÁкŠÁÐÖµ ɾ³ýijxieÐÐ Ö±½Ó¸Ä±äÔ­Êý×é
sub delete_row_by_colum(a,columnum,columv)
dim b(),i,j,u
u = ubound(a)
j =0
for i=0 to u
if a(i)(columnum)=columv then
j=j+1
end if
next
redim b(u-j)
j=0
for i=0 to u
if a(i)(columnum)<>columv then
b(j)=a(i)
j = j+1
end if
next
a=b
end sub
'¸ù¾ÝÐÐϱêɾ³ýÐÐ
sub delete_row(a,rownum)
dim b(),i,j,u
u = ubound(a)
j =0
redim b(u-1)


Ïà¹ØÎĵµ£º

ASPʵÏÖͬһÐéÄâÖ÷»ú¿Õ¼ä°²·Å¶à¸öÍøÕ¾µÄ·½·¨

ASPʵÏÖͬһÐéÄâÖ÷»ú¿Õ¼ä°²·Å¶à¸öÍøÕ¾µÄ·½·¨
¡¡¡¡ÏÖÔÚµÄÓòÃûºÜ±ãÒË£¬²»ÉÙÅóÓÑÊÖÀï¶àÉÙ¶¼Óм¸¸ö£¬Èç¹ûÄúÏëÓÃÊÖÖеöÓòÃû×ö¶à¸öÍøÕ¾µÄ»°£¬²¢²»ÓÃͬʱ¹ºÂò¶à¸öÐéÄâÖ÷»ú£¬ÄúÖ»ÒªÏȽ«ÄúËùÓеÄÓòÃû°ó¶¨µ½ÄúµÄÐéÄâÖ÷»úÉÏ£¬È»ºó½«ÐéÄâÖ÷»ú¸ùĿ¼ÖеÄindex.asp£¨Ê×Ò³Îļþ£©Àï¼ÓÈëÏÂÁдúÂë¾Í¿ÉÒÔÁË£º
<%
sn=lcase(Request.Se ......

iis7 asp ado oracle ÂÒÂëÎÊÌâ

»·¾³£ºÊý¾Ý¿â oracle 64bit ϵͳ win2008 64bit IIS7 ÔÚasp ÍøÒ³ÖÐʹÓÃadoÁ¬½ÓÊý¾Ý¿â ODBCÓõÄÊÇMicrosft ODBC for oracle
Çé¿ö£ºÔÚÍøÒ³µÄ²éѯÓï¾äÖв»º¬ÖÐÎĵĿÉÒÔ£¬Ö»ÒªÓï¾äÖк¬ÓÐÖÐÎľͻ᷵»Ø´íÎó½á¹û¡£
Èç:select 'Ò»¶þÈý' from dual;ÕâÑùµÄÓï¾ä ·µ»Ø»ØÀ´¾ÍÊÇ£¿£¿£¿
»¹ÒªËµÃ÷µÄÊÇoracleµÄ×Ö·û¼¯ÊÇAMERICAN_AMERICA.U ......

ASPʵÏÖHashMap

'--------------------------------------------------------------
'ASP°æHashMapʵÏÖ
'¸ÃʵÏÖ´æ´¢Êý¾ÝΪÓÐÐòÊý¾Ý,ÀàËÆJavaÖеÄLinkedHashMap
'--------------------------------------------------------------
Class HashMap
 dim arr()
 dim arr_len
 
 '¹¹Ô캯Êý
 private Sub Clas ......

ͨÓÃasp·À×¢Èë³ÌÐò

‘·À×¢Èë°ÑËü¼Óµ½connÀïÕâÑù¾ÍokÁË
dim sql_injdata
SQL_injdata = "’|and|exec|insert|select|delete|update|count|*|%|chr|mid|master|truncate|char|declare"
SQL_inj = split(SQL_Injdata,"|")
If Request.QueryString<>"" Then
For Each SQL_Get In Request.QueryString
For SQL_Data=0 To Ubo ......

ASP×Ö·û´®º¯Êý´óÈ«

º¯Êý Óï·¨ ¹¦ÄÜ
Len Len(string|varname) ·µ»Ø×Ö·û´®ÄÚ×Ö·ûµÄÊýÄ¿£¬»òÊÇ´æ´¢Ò»±äÁ¿ËùÐèµÄ×Ö½ÚÊý¡£
Trim Trim(string) ½«×Ö·û´®Ç°ºóµÄ¿Õ¸ñÈ¥µô
Ltrim Ltrim(string) ½«×Ö·û´®Ç°ÃæµÄ¿Õ¸ñÈ¥µô
Rtrim Rtrim(string) ½«×Ö·û´®ºóÃæµÄ¿Õ¸ñÈ¥µô
Mid Mid(string,start,length) ´Óstring×Ö·û´®µÄstart×Ö·û¿ªÊ¼È¡µÃlength³¤¶ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ