首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 网站开发 > ASP >

数据库有关问题的一个异常,

2012-02-13 
数据库问题的一个错误,急!!!!!数据库连接操作不执行,我的代码如下:%dimcom,rs,sql,kcomCheckStr(trim(re

数据库问题的一个错误,急!!!!!
数据库连接操作不执行,我的代码如下:
<%
dim   com,rs,sql,k
com=CheckStr(trim(request( "com ")))
set   rs   =   Server.CreateObject( "ADODB.Recordset ")
sql= "select   *   from   [com]   where   username= ' "&com& " ' "
rs.open   sql,conn,1,3
if   rs.eof   then
response.write   " <script   language=JavaScript> "   &   chr(13)   &   "alert( '该信息是快速发布信息!没有相关用户资料! ') </script> "
response.redirect   "../ "
response.end
end   if
if   rs( "vip ") <> "1 "   then
response.redirect   "comno.asp?com= "&com& " "
end   if
rs( "tong ")=rs( "tong ")+1
rs.update
%>
<%dim   n,rs0
set   rs0=server.createobject( "adodb.recordset ")
set   rs0=conn.execute( "select   count(id)   from   [xinxi]   where   username= ' "&com& " ' ")
n=rs0(0)
rs0.close
%>

先谢谢各位大虾了!!!!!

[解决办法]
rs.open sql,conn,1,3前加个rs.cursorlocation=3 试试
[解决办法]
错误提示啊??!!
[解决办法]
如上..出错提示发出来看看..
[解决办法]
晕,刚想说话来着.

热点排行