Ò»¸ö×î¼òµ¥µÄaspÁ´½ÓaccessÊý¾Ý¿â½Å±¾¾ÍÊÇÎÞ·¨ÏÔʾ...
HTML code:
<HTML>
<HEAD>
<TITLE>Information Display</TITLE>
</HEAD>
<BODY>
<%
Dim conn
set conn=server.createobject ("adodb.connection")
conn.open "driver={microsoft access driver
(*.mdb)};dbq="& server.mappath ("guestbook.mdb")
%>
<%
exec="select * from guestbook"
set rs=server.createobject("adodb.connection")
rs.open exec,conn,1,1
%>
<table width="100%" border="0" cellspacing="0" cellpadding="0" >
<%do while not rs.eof %>
<tr height="2">
<td><%=rs("username")%></td>
<td><%=rs("tel")%></td>
<td><%=rs("message")%></td>
<td><%=rs("time")%></td>
</tr>
<%
rs.movenext
loop
%>
</table>
</BODY>
</HTML>
´úÂëÈçÏ£¬´óÈËÃÇÒ»¿´Ó¦¸ÃÒ²ºÜÃ÷°×£¬¾ÍÊÇÒ»¸ö¼«Îª¼òµ¥Á´½Óguestbook.mdbÊý¾Ý¿â²¢ÏÔʾµÄasp½Å±¾
µ«·ÃÎʵÄʱºòÀÏÊdzöÏÖÈçÏ´íÎó£º
Microsoft VBScript compilation error '800a0409'
Unterminated string constant
/index.asp, line 9
conn.open "driver={microsoft access driver
------------------------------------------^
֮ǰûÓÐDi
Ïà¹ØÎÊ´ð£º
ÎÒÃÇÓÐÒ»¸öÍøÕ¾Ä£°å£¬www.c111.com.cn,Ï£ÍûÐÞ¸ÄһЩµØ·½£º
1£©µã»÷×ó²à¡°·þÎñÆ·ÅÆ¡±µÄÆäÖÐÒ»¸öС·ÖÀ࣬Èç¡°×ãÇò¡±£¬½çÃæµÄÓÒ²à¾Í³öÏÖÈçwww.c111.com.cn/1.jpg£¬µã»÷1.jpgÉÏ·½µÄÆäÖÐÒ»¸öÆ·ÅÆlogo£¬ÏÂÃæ¾Í³öÏÖÏà¹ØµÄÍ ......
ÎÒÓÐÒ»¸öaspÔ´Â룬µ«ÊdzöÏÖÒ»¸öÎļþ£¬ÎÒÓÃasp½âÃܶ¼ÊÇÂÒÂë
Çë½Ì
VBScript code:
??
%# , #&')*)-0-(0%()(?
(((((((((((((((((((((((((( ......
ÓÐÄÄλ¸ßÊÖÓùýASP FCKÔÚÏß±à¼Æ÷ѽ£¬ËüÄǸöͼƬÉÏ´«¹¦ÄÜÔõôÅäÖÃѽ
ÄܸøÎÒ·¢¸öÄÜÓÃFCKÔÚÏß±à¼Âð£¿Ò»¶¨ÄÜÉÏ´«Í¼Æ¬¹¦ÄܵÄѽ£¬¼±Ñ½
Ö±½Óµ½¹Ù·½ÍøÕ¾È¥Ï¸ö¾Í¿ÉÒÔÁË£¬¹ØÓÚÉèÖÃô£¬Ö±½ÓGOOGLEÒ»ÏÂÄãµÄ°æ±¾ºÅ¾Í¿ÉÒÔÕÒµ ......
ÇëÎÊΪʲôÎÒÕâ¶Î´úÂë¿ÉÒÔÏÔʾÒÑÐ޸ijɹ¦picÎļþ¼ÐÖеÄͼƬ£¬µ«Êµ¼ÊÉÏÎļþ¼ÐÖеÄÎļþÃû³Æ»¹ÊǺúõġ£Íû¸ßÊÖ°ïæ¸Ä¸Ä°¡¡£
<%
Set fs = Server.CreateObject("Scripting.FileSystemObject")
S ......
ÓÐÁ½¸ö±äÁ¿ imgUrl1ºÍimgUrl2
Url1="images/1.jpg"
Url2="images/2.jpg"
Óиöjavascript³ÌÐò£¬Ïë°ÑUrl1ºÍUrl2´øµ½javascriptÀïÃæµÄimgUrl2ºÍimgUrl2£¬²»ÖªµÀÔõôŪ
<script type="t ......