ASPÓÃADODB.COMMAND¶ÔÏóʱ³ö´í...
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="conn.asp"-->
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>ÎÞ±êÌâÎĵµ </title>
</head>
<body>
<%
set cmd=Server.CreateObject("ADODB.Command")
set rsMsg=Server.CreateObject("ADODB.Recordset")
cmd.CommandType = 1
set cmd.CommandText = "SELECT * from TB_MSG"
set cmd.ActiveConnection = conn
rsMsg.Open cmd, 1, 3
do while not rsMsg.EOF
Response.Write(rsMsg("Msg"))
rsMsg.MoveNext()
loop
%>
</body>
</html>
VBScript code:
rsMsg.Open cmd, ,1, 3 'µÚ¶þ¸ö²ÎÊýÁô³öÀ´
rsMsg.Open cmd, 1, 3
¸Ä³É£º
set rsMsg=cmd.execute
»òÕߣº
rsMsg.open cmd.CommandText,cmd.ActiveConnection,1,3
Ïà¹ØÎÊ´ð£º
ÎÒÓÐÒ»¸öaspÔ´Â룬µ«ÊdzöÏÖÒ»¸öÎļþ£¬ÎÒÓÃasp½âÃܶ¼ÊÇÂÒÂë
Çë½Ì
VBScript code:
??
%# , #&')*)-0-(0%()(?
(((((((((((((((((((((((((( ......
ÎÒÔ±¾ÊÇѧjspµÄ¿ÉÕÒÁËÒ»¸öASPµÄ¹«Ë¾£¡ÎÒÒªÖØÐÂѧϰ£¡ ѧϰASP£¡ Ï£Íû´ó¼ÒÍÆ¼öÒ»±¾ºÃÊ鏸ÎÒлл
<ASP3.0¸ß¼¶±à³Ì> ÍøÉÏÓеç×Ó°æµÄ
·¢ÏÖÍøÉÏaspÐÅϢʱ×î¶àµÄ ±ÈÆäËûµÄ¶¼¶àºÃ¶à
yun
ÕÒ±¾ÓÐÓ¦ÓÃÊÂÀýµÄA ......
Îļþ£ºfolder.inc
HTML code:
<%
Dim folderini,pos,pageName
fPath = Request.ServerVariables("PATH_TRANSLATED")
pos = instrRev(fPath,"\")
folderini = Left(fPath,pos)+&qu ......
ÎÒÕÒÁËÒ»¸öα¾²Ì¬´úÂ룬ÈçÏ£º
index.asp
<!--#include file="config.asp"-->
<ol>
<%
Set rs=server.CreateObject("adodb.recordset") & ......
±¾ÈËÓÐÈýÄ꿪·¢¾Ñé,ÏÖÔÚÕÒ¹¤×÷(ÏÃÃÅ),,,ÓÐÒâÕßÇëÁªÏµQQ:523054271
1.5Ä깤×÷¾ÑéÕÒ¹¤×÷ ËûÒª¶àÉÙ ÎÒÒªÒ»°ë~~
±ð˵ÈýÄêµÄÁË...¾ÍÊÇ5ÄêµÄÒ²Ò»×¥Ò»´ó°Ñ.....
°³ÐèÒªÓÃasp+access×öÒ»¸ö½øÏú´æÈí¼þ£¬ÄúÄÜ×ö ......