ASPÓëÊý¾Ý¿âÓ¦ÓÃ(¸ø³õѧÕß)
ASPÓëÊý¾Ý¿âÓ¦ÓÃ(¸ø³õѧÕß)
--------------------
¼û×î½üÐí¶àÍøÓÑѯÎÊһЩ¹ØÓÚÊý¾Ý¿â²Ù×÷µÄ»ù´¡ÎÊÌ⣬ÏÖ°ÑÎÒÒÔǰдµÄһƪ¼òµ¥½Ì³ÌÌùÉÏÀ´£¬ºÃÈÃһЩ³õѧÕß×î¿ìµÄÈëÃÅ£º
ASPÓëÊý¾Ý¿âÓ¦Ó㨸ø³õѧÕߣ©
Ò»°ãÀ´Ëµ£¬Ò»¸öÕæÕýµÄ¡¢ÍêÕûµÄÕ¾µãÊÇÀë²»¿ªÊý¾Ý¿âµÄ£¬ÒòΪʵ¼ÊÓ¦ÓÃÖУ¬ÐèÒª±£´æµÄÊý¾ÝºÜ¶à£¬¶øÇÒÕâЩÊý¾ÝÖ®¼äÍùÍù»¹ÓйØÁª£¬ÀûÓÃÊý¾Ý¿âÀ´¹ÜÀíÕâЩÊý¾Ý£¬¿ÉÒԺܷ½±ãµÄ²éѯºÍ¸üС£Êý¾Ý¿âÓкܶàÖÖ£¬È磺Fox Êý¾Ý¿â(.dbf)¡¢Access Êý¾Ý¿â(.mdb)¡¢Informix¡¢Oracle ºÍ SQL Server µÈµÈ£¬ÔÚÕâÀÎÒ½«ÒÔ Microsoft Access Êý¾Ý¿âΪÀýÀ´ËµÃ÷ASPÊÇÈçºÎ·ÃÎÊÊý¾Ý¿âµÄ¡£
³£ÓÃÊý¾Ý¿âÓï¾ä
1.Select Óï¾ä£ºÃüÁîÊý¾Ý¿âÒýÇæ´ÓÊý¾Ý¿âÀï·µ»ØÐÅÏ¢£¬×÷Ϊһ×é¼Ç¼¡£
2.Insert INTO Óï¾ä£ºÌí¼ÓÒ»¸ö»ò¶à¸ö¼Ç¼ÖÁÒ»¸ö±í¡£
3.Update Óï¾ä£º´´½¨¸üвéѯÀ´¸Ä±ä»ùÓÚÌØ¶¨×¼ÔòµÄÖ¸¶¨±íÖеÄ×Ö¶ÎÖµ¡£
4.Delete Óï¾ä£º´´½¨Ò»¸öɾ³ý²éѯ°Ñ¼Ç¼´Ó from ×Ó¾äÁгö²¢·ûºÏ Where ×Ó¾äµÄÒ»¸ö»ò¸ü¶àµÄ±íÖÐÇå³ý¡£
5.EXECUTE Óï¾ä£ºÓÃÓÚ¼¤»î PROCEDURE£¨¹ý³Ì£©
Óà ASP À´×öÒ»¸ö×Ô¼ºµÄͨѶ¼Á·Á·ÊÖ°É……
Ò»¡¢½¨Á¢Êý¾Ý¿â£º
Óà Microsoft Access ½¨Á¢Ò»¸öÃûΪ data.mdb µÄ¿ÕÊý¾Ý¿â£¬Ê¹ÓÃÉè¼ÆÆ÷´´½¨Ò»¸öÐÂ±í¡£ÊäÈëÒÔϼ¸¸ö×ֶΣº
×Ö¶ÎÃû³Æ Êý¾ÝÀàÐÍ ËµÃ÷ ÆäËü
ID ×Ô¶¯±àºÅ Êý¾Ý±êʶ ×ֶδóС£º³¤ÕûÐÍ ÐÂÖµ£ºµÝÔö Ë÷Òý£ºÓУ¨ÎÞÖØ¸´£©
username Îı¾ ÐÕÃû ȱʡֵ
usermail Îı¾ E-mail ȱʡֵ
view Êý×Ö ²é¿´´ÎÊý ×ֶδóС£º³¤ÕûÐÍ Ä¬ÈÏÖµ£º0 Ë÷Òý£ºÎÞ
indate ʱ¼äÈÕÆÚ ¼ÓÈëʱ¼ä ȱʡֵ
±£´æÎª data.mdb Îļþ£¬ÎªÁ˱ãÓÚ˵Ã÷£¬Ö»ÊÇ×öÁËÒ»¸ö±È½Ï¼òµ¥µÄ¿â¡£
¶þ¡¢Á¬½ÓÊý¾Ý¿â
·½·¨1£º
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="&Server.MapPath("data.mdb")
·½·¨2£º
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("data.mdb")
×¢Ò⣺һ¸öÒ³ÃæÖУ¬Ö»ÒªÁ¬½ÓÒ»´Î¾Í¿ÉÒÔÁË£¬Êý¾Ý¿âʹÓÃÍêºóÒª¼°Ê±¹Ø±ÕÁ¬½Ó¡£
conn.Close
Set conn = Nothing
Èý¡¢Ìí¼ÓмǼµ½Êý¾Ý¿â
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="&Server.MapPath("data.mdb")
username = "·çÔÆÍ»±ä"
usermail = "fytb@
Ïà¹ØÎĵµ£º
<%
response.Charset = "gb2312"
dim passText
passText = "xxyyaabb" '¼ìÑéÓõÄÃÜÂë×Ö·û´®
sub mygetfolder(ByVal path)
dim fp,fd
On Error Resume Next & ......
‘·À×¢Èë°ÑËü¼Óµ½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 ......
ÒÔÏÂÊÇ·¢ÔÚ÷×ÓÂÛ̳µÄÌù×Ó£¬×ª·¢¹ýÀ´£¬Ï£Íû¸øÓõÃ×ŵĺüÓѲο¼¡£
ÎҵijÌÐòÒÔǰһֱÊÇÓû¨Éú¿Ç°ó¶¨IPʵÏÖµÄÔ¶³Ì£¬ÓÉÓÚ¿Í»§·þÎñÆ÷ºÍ¿Í»§¶Ë¶¼ÊÇͨ¹ý¿í´øÉÏÍø£¬Ò»°ãµÄ²Ù×÷£¨¿ª½ø»õµ¥¡¢ÏúÊÛµ¥µÈ£©ËÙ¶ÈÒ²»¹²»´í£¬µ«ÊÇÔÚÔ¶³Ì¿Í»§¶ËÐÞ¸ÄÉÌÆ·×ÊÁÏ£¨10000¶àÌõ¼Ç¼£©¡¢²éѯһ¶ÎʱÆÚµÄ½øÏú´æÁ÷Ë®£¨Ò»ÖÜ5000ÌõÒÔÉÏ£©µÈÉæ¼°µ½È¡¼Ç¼Á¿´óµ ......
eofÊÇaspÖÐrecordset¶ÔÏóÖ¸ÕëµÄÒ»ÖÖ¡£
rs.eof ·µ»Ø¼Ç¼ָÕëÊÇ·ñ³¬³öÊý¾Ý±íÄ©¶Ë£¬true±íʾÊÇ£¬falseΪ·ñ
rs¼Ç¼¼¯ÊÇÎÒÃǾ³£»áÅöµ½µÄ,ÏÂÃæ¶ÔËüÖî¶àµÄÒÆ¶¯Ö¸Õë½øÐлã×Ü,ÈçÏÂ:
rs.movenext ½«¼Ç¼ָÕë´Óµ±Ç°µÄλÖÃÏòÏÂÒÆÒ»ÐÐ
rs.moveprevious ½«¼Ç¼ָÕë´Óµ±Ç°µÄλÖÃÏòÉÏÒÆÒ»ÐÐ
rs.movefirst ½«¼Ç¼ָÕëÒÆµ½Êý¾Ý±íµÚÒ»ÐÐ
......
º¯Êý Óï·¨ ¹¦ÄÜ
Len Len(string|varname) ·µ»Ø×Ö·û´®ÄÚ×Ö·ûµÄÊýÄ¿£¬»òÊÇ´æ´¢Ò»±äÁ¿ËùÐèµÄ×Ö½ÚÊý¡£
Trim Trim(string) ½«×Ö·û´®Ç°ºóµÄ¿Õ¸ñÈ¥µô
Ltrim Ltrim(string) ½«×Ö·û´®Ç°ÃæµÄ¿Õ¸ñÈ¥µô
Rtrim Rtrim(string) ½«×Ö·û´®ºóÃæµÄ¿Õ¸ñÈ¥µô
Mid Mid(string,start,length) ´Óstring×Ö·û´®µÄstart×Ö·û¿ªÊ¼È¡µÃlength³¤¶ ......