日期:2014-5-17 浏览次数:20172次

请大家帮帮忙好么,求助
Function   executeQuery(sql)
result   =   isOpened()
response.Write( " <script> alert( ' "&sql& " ') </script> ")
response.Write( " <script> alert( ' "&result& " ') </script> ")
if   result   then  
Conn_Open
end   if
if   not   IsEmpty(rs)   then  
set   rs   =   Server.CreateObject( "ADODB.RecordSet ")
end   if

response.Write( " <script> alert( ' "&sql& " ') </script> ")
rs.open   sql,conn,1,3//这句错误,参数接收不到或者有冲突。
executeQuery   =   rs
end   Function

这个是conn.asp的代码片断,撇开conn连接不说,我想问在test.asp里面
<!DOCTYPE   HTML   PUBLIC   "-//W3C//DTD   HTML   4.01   Transitional//EN "
"http://www.w3.org/TR/html4/loose.dtd ">
<!--#include   file= "conn.asp "   -->
<%
sql   =   "select   *   from   web_info_service "
call   executeQuery(sql)
%>
<html>
<head>
<meta   http-equiv= "Content-Type "   content= "text/html;   charset=gb2312 ">
<title> 无标题文档 </title>
</head>

<body>
<%
while   not   rs.eof
response.Write(rs( "title "))
rs.movenext
wend
%>
</body>
</html>
<%
conn_close
%> 这个代码执行为什么报错,我可以确保conn没有问题,因为别的已经测试过了

------解决方案--------------------
请给出运行时出现的具体的错误信息。
------解决方案--------------------
先把sql打印出来看看

------解决方案--------------------
把sql语句 response.write 出来,在查询分析器运行看看
PS:要把详细错误信息和所在行代码帖出来:)
------解决方案--------------------
楼主在Function executeQuery(sql)里用response.write(sql)看一下,能输入什么,应该是你传进去的数值有问题。
call executeQuery(sql)这句你写成 call executeQuery sql试一下

------解决方案--------------------
错误信息呀?老大
------解决方案--------------------
先批評一下!!!
你這代碼很有想法,但是這樣做不好!
直接把rs放在函數裡面會引起混亂,編譯器不是人,不會按你的想法去做。
做爲一名程序員,你首先要懂的是你所用的語言是怎麼運行的,這樣才能寫出好代碼。

------解决方案--------------------
set rs = Server.CreateObject( "ADODB.RecordSet ")
rs = executeQuery(sql)