ASPÍøÕ¾Êý¾Ý¿â±»¹ÒľÂíÔõô°ì
˵ÔÚÇ°ÃæµÄ»°£º
Òª·ÀÊý¾Ý¿âľÂí£¬Æäʵ×î¼òµ¥²»¹ý£¬±¾ÈËÈÏΪ£¬ÍøÉÏËùνµÄ×¢Èë·½·¨£¬¶¼ÊÇЩС¶ù¿Æ¡£Ö»ÒªÄã²»ÈÃÊý¾Ý¿âÔËÐУ¬Ëü×¢ÈëÁËASPľÂíÓкÎÓã¿£¡Ö»ÒªÄãÊä³öʱÓÐÑϸñµÄ¹ýÂË£¬Ëü×¢ÈëÁËJS´úÂëÓкÎÓã¿£¡
¾ßÌå·½·¨ÈçÏ£º
Ò»¡¢°ÑÊý¾Ý¿â¸ÄΪASP¸ñʽ£¬²¢¼ÓÈëÒ»¸ö±í£¬ÀïÃæ½¨¸ö×ֶΣ¬¼ÓÈëһЩIISϵͳ¼¶µÄ´íÎó´úÂë»òOleÊý¾Ý£¬¼´Ê¹±»×¢ÈëASPľÂí£¬¼´Ê¹¼ÓÈëÈÝ´í´¦Àí£¬ËüÓÖÄÍÎҺΣ¿
¶þ¡¢Êä³öÒ²¼òµ¥£¬Ö»Òª¼òµ¥µÄ´¦Àíһϓ<”¡¢“>”µÈÒ»Ð©ÌØÊâHTML´úÂ룬Ëü×¢ÈëÁËJsÓÖÄÍÎҺΣ¿
ÏÂÃæÑÔ¹éÕý´«£¬±»ÈË×¢ÈëÁË£¬×ÜÊDz»Ë¬£¬ÄǾÍ˵˵½â¾öµÄ·½·¨°É£º
µÚÒ»²½£ºÎªÏÖÓÐÊý¾Ý¿â×öºÃ±¸·Ý¡£
µÚ¶þ²½£º
Ö´ÐÐÈçÏÂASPÎļþ£¬ÕâÑù¾Í¿ÉÒÔÈ¥µôÊý¾Ý¿âµ±ÖеÄJSľÂí£º
×¢£ºconn.asp×Ô¼ºÈ¥Ð´ÁË¡£
'ÕâÀï·ÅÈëJSľÂíÄÚÈÝ£ºÇë¼ÇµÃ¸ÄΪ×Ô¼ºÊý¾Ý¿âÖеÄJSľÂíÄÚÈÝ¡£
<!--#include file="conn.asp"-->
<%
Server.ScriptTimeOut=180
Set rstSchema = conn.OpenSchema(20)
k=1
Do Until rstSchema.EOF '±éÀúÊý¾Ý¿â±í
If rstSchema("TABLE_TYPE")="TABLE" Then
response.write K&".<font color=red><b>"&rstSchema("TABLE_NAME") & "</b></font>:" 'ÏÔʾ±íÃû
Set rs=Server.CreateObject("ADODB.Recordset")
sql="select * from [" & rstSchema("TABLE_NAME")&"]"
rs.open sql,conn,1,3
For i=0 to rs.fields.count-1 '±éÀú±íÖÐ×Ö¶Î
If int(rs(i).Type)=129 or int(rs(i).Type)=130 or int(rs(i).Type)=200 or int(rs(i).Type)=201 or int(rs(i).Type)=202 or int(rs(i).Type)=203 Then'Ö»´¦Àí×Ö¶ÎÀàÐÍΪ×Ö·ûÐ͵Ä×Ö¶Î
conn.execute("update ["&rstSchema("TABLE_NAME")&"] set "&rs(i).name&" =replace(cast("&rs(i).name&" as varchar(8000)),'ÕâÀï·ÅÈëJSľÂíÄÚÈÝ','')")
response.write rs(i).name &" "&rs(i).Type &" "'ÏÔʾִÐйýµÄ×Ö¶ÎÃû¡£
End If
Next
response.write "<br>"
End If
rstSchema.MoveNext
k=k+1
Loop
response.Write "Ö´Ðгɹ¦"
%>
Èç¹ûÊý¾Ý¿â±íºÜ¶àµÄ»°£¬ÉÏÃæµÄ±éÀúÊý¾Ý¿â½á¹¹Î´Ö´ÐÐÍê¾Í±»IIS¸øÍ£Ö¹ÁË¡£ÔÚÕâʱºò¿ÉÒÔÔÚ
If rstSchema("TABLE_TYPE")="TABLE" Then
µ±ÖÐÊʵ±¼ÓÈëkÖµµÄ·¶Î§£¬È磺
If rstSchema("TABLE_TYPE")="TABLE" k>10 and k<20 Then
ÕâÑùµÄ»°¾ÍÒ»´Î
Ïà¹ØÎĵµ£º
µ½µ×ʹÓÃPHP£¬ASP£¬»òÆäËüÄÄÖÖ¼¼Êõʱ£¬¿ÉÄÜÑ¡ÔñPHP »áºÜ¿á£¬µ«ÊÇÈç¹ûÄã¶ÔUnixϵͳ£¬ÒÔ¼°Perl »òC µÈÖªÖ®ÉõÉٵϰ£¬Õâ¾Í²»ÊÇÒ»¸öÃ÷ÖªµÄÑ¡Ôñ¡£ASP ¿ÉÒÔÓÃVBScript ½øÐбàд£¬¶øVBScript ±¾ÉíÊÇMICROSOFT Visual Basic ²úÆ·µÄ¼ò»¯°æ±¾£¬Ëü²ÉÓÃÓëVisual Basic ½üËÆµÄÓï·¨¿ò¼Ü£¬¼òµ¥Ò×ѧ¡£¿¼Âǵ½Visual Basic µÄÆÕ¼°ÐÔ£¬ÄÇôÄ㻹 ......
<!--#include file="inc/conn.asp" -->
<%
openconn()
sql="select * from tbnews"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,3
id=rs("id")
%>
<%
do while not rs.eof
%>
<%
Do_Url = "http://"
'Do_Url = Do_Url&Request.ServerVariables("SERVER_NAME ......
¡¡¡¡ÔÚASP±à³ÌµÄ¹ý³ÌÖУ¬»ñÈ¡µ±Ç°²Ù×÷µÄÎļþµÄÎļþÃû£¬ÊÇÒ»¸ö·Ç³£³£Óõ͝×÷£¬ASPºÃÏñûÓÐ×Ô¼ºÄÚÖú¯Êý£¬ËùÒÔÕâ¸ö²Ù×÷ÎÒÃÇÐèÒª×Ô¼º±àº¯ÊýÀ´Íê³É¡£½ñÌìÒ»¸öÀÏÅóÓÑÎÊÎÒÔõô×ö£¬ÎÒã¶ÁËһϣ¬»¹ÔÚÏëÓÐûÓÐÄÚÖú¯Êý£¬ÊµÔÚûÏëÆðÀ´£¬²»ÖªµÀÊÇÕæµÄûÓл¹ÊÇÎÒ²»ÖªµÀ¡£ºÇºÇ~²»¹ÜÁË£¬×îºóÎÒ»¹ÊÇ×Ô¼ºÐ´ÁËÒ»¸öСº¯ÊýÀ´Íê³ÉµÄ£¬²»¹ý²»ÊÇÎ ......
´æ´¢½ø³Ì¾ÍÊÇ×÷Ϊ¿ÉÖ´ÐжÔÏó´æ·ÅÔÚÊý¾Ý¿âÖеÄÒ»¸ö»ò¶à¸öSQLÃüÁî¡£
¶¨Òå×ÜÊǺܳéÏó¡£´æ´¢½ø³ÌÆäʵ¾ÍÊÇÄÜÍê³ÉÒ»¶¨²Ù×÷µÄÒ»×éSQLÓï¾ä£¬Ö»²»¹ýÕâ×éÓï¾äÊÇ·ÅÔÚÊý¾Ý¿âÖеÄ(ÕâÀïÎÒÃÇ̸ֻSQL SERVER)¡£Èç¹ûÎÒÃÇͨ¹ý´´½¨´æ´¢½ø³ÌÒÔ¼°ÔÚASPÖе÷Óô洢½ø³Ì£¬¾Í¿ÉÒÔ±ÜÃ⽫SQLÓï¾äͬASP´úÂë»ìÔÓÔÚÒ»Æð¡£ÕâÑù×öµÄºÃ´¦ÖÁÉÙÓÐÈý¸ö£º
µÚÒ»¡ ......