asp问题 请高手帮忙...急 在线等...
<%dimstrsql,rscstrsql="select*fromtjqyorderbyaddtimedesc"rsc.Openstrsql,conn,1,3while...
<% dim strsql,rsc
strsql="select * from tjqy order by addtime desc"
rsc.Open strsql, conn, 1,3
while not rsc.eof %>
<tr>
<td align="center"><img src=admin/qytj/UPFILE/<%=Rsc("ZhaoP")%> height=31 width=88></td>
<% if not rsc.eof then
rsc.movenext
end if
%>
<td align="center"><img src=admin/qytj/UPFILE/<%=Rsc("ZhaoP")%> height=31 width=88></td>
</tr>
<% rsc.movenext
wend
rsc.close
set rsc = nothing
conn.close
set conn=nothing
%>
这个写的不对,高手们告诉要怎么修改啊
错误提示:Microsoft VBScript 运行时错误 错误 '800a01a8'
缺少对象: ''
朋友有你说的那个数据库连接,我有的,只是没有写。顺便说一句 我用的是sqlserver数据库,本人还是第一次用 展开
strsql="select * from tjqy order by addtime desc"
rsc.Open strsql, conn, 1,3
while not rsc.eof %>
<tr>
<td align="center"><img src=admin/qytj/UPFILE/<%=Rsc("ZhaoP")%> height=31 width=88></td>
<% if not rsc.eof then
rsc.movenext
end if
%>
<td align="center"><img src=admin/qytj/UPFILE/<%=Rsc("ZhaoP")%> height=31 width=88></td>
</tr>
<% rsc.movenext
wend
rsc.close
set rsc = nothing
conn.close
set conn=nothing
%>
这个写的不对,高手们告诉要怎么修改啊
错误提示:Microsoft VBScript 运行时错误 错误 '800a01a8'
缺少对象: ''
朋友有你说的那个数据库连接,我有的,只是没有写。顺便说一句 我用的是sqlserver数据库,本人还是第一次用 展开
4个回答
展开全部
rsc和conn两个对象都没创建呢
在dim strsql,rsc后面插入:
dim conn
dim SqlUsername,SqlPassword,SqlDatabaseName,SqlHostIP
SqlUsername = "KingsNet" 'SQL数据库用户名
SqlPassword = "KingsNet" 'SQL数据库用户密码
SqlDatabaseName = "KingsNet" 'SQL数据库名
SqlHostIP = "127.0.0.1" 'SQL主机IP地址
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.open "Provider = Sqloledb; User ID = " & SqlUsername & "; Password = " & SqlPassword & "; Initial Catalog = " & SqlDatabaseName & "; Data Source = " & SqlHostIP & ";"
Set rsc = Server.CreateObject("ADODB.Recordset")
如果数据库连接已经有,那可能就是rsc这个对象没创建,插入上一行即可。
在dim strsql,rsc后面插入:
dim conn
dim SqlUsername,SqlPassword,SqlDatabaseName,SqlHostIP
SqlUsername = "KingsNet" 'SQL数据库用户名
SqlPassword = "KingsNet" 'SQL数据库用户密码
SqlDatabaseName = "KingsNet" 'SQL数据库名
SqlHostIP = "127.0.0.1" 'SQL主机IP地址
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.open "Provider = Sqloledb; User ID = " & SqlUsername & "; Password = " & SqlPassword & "; Initial Catalog = " & SqlDatabaseName & "; Data Source = " & SqlHostIP & ";"
Set rsc = Server.CreateObject("ADODB.Recordset")
如果数据库连接已经有,那可能就是rsc这个对象没创建,插入上一行即可。
展开全部
<!--#include file=conn.asp-->
你的数据库连接的在那呢?
你的数据库连接的在那呢?
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
这句多余删掉
<% if not rsc.eof then
rsc.movenext
end if
%>
<% if not rsc.eof then
rsc.movenext
end if
%>
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
而且连table也没有!
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询