Conn.execute CommandText,0,-1出错是什么原因？帮忙看一下

[maomao818]

我现在下载了一个模糊查询的程序。经过修改一番，现在出现Conn.execute CommandText,0,-1出错，以前我也遇到过，但是总是没有办法。有哪位大侠能帮忙搞定呀。谢谢拉

[maomao818]

我现在把代码也一起贴出来，拜托看一下。
<form name="form1" method="post" action="">
<table width="100%" border="0" cellspacing="0" cellpadding="1">
<tr>
<td width="13%" height="23">按字段查询：</td>
<td width="27%">
<select name="select">
<option value="city_code">城市</option>
<option value="company_code">企业编号</option>
<option value="company_name">企业名称</option>
</select>
</td>
<td width="9%">关键字</td>
<td width="51%">
<input name="keyword" type="text" id="keyword">
</td>
</tr>
<tr>
<td> </td>
<td> </td>
<td> </td>
<td>
<input type="submit" name="Submit" value="查询">
</td>
</tr>
</table>
</form>
<table width="100%" border="0" cellspacing="0" cellpadding="1">
<tr>
<td><%

[maomao818]

DIM qucol,str,str5
qucol=request.form("select")
str=request.form("keyword")
str5=request.form("select")&" like '%"&str&"%'"

Set Conn = Server.CreateObject("ADODB.Connection")

conn.open "Driver={SQL Server};Server=192.168.0.155;UID=sa;PWD=;Database=shangxintong"
for I=0 to conn.errors.count-1
response.write conn.errors(I).description&"< br >"
next
CommandText="create procedure ＃query"&session("num")&_
"AS select ＊ From companys Where "&str5
Conn.execute CommandText,0,-1
Set rs=Server.CreateObject("ADODB.RecordSet")
Const adOpenDynamic=2
Const adLockOptimistic=3
const adComdStoredProc=8
CommandText="＃query"&session("num")
session("num")=session("num")+1
rs.Open CommandText,Conn,adOpen
Dynamic,adLockOptimistic,adComdStoredProc
response.write "< table border=""1"" >"
response.write"< tr >"
for I=0 to rs.fields.count-1
response.write "< td >"&rs(I).Name&"< /td >"
next
response.write "< /tr >"
while not rs.EOF
response.write"< tr >"
for I=0 to rs.fields.count-1
css=rs(I).value
if css<>"" then
response.write "< td >"&css&"< /td >"
else
response.write "< td >.< /td >"
end if
next
rs.moveNext
response.write "< /tr >"
Wend
response.write"< /table >"
rs.close
set rs=nothing
set Conn=nothing
%>

[maomao818]

错误提示：
Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
/enterprise/asp/company_delete.asp, 第 55 行
第 55 行也就是：
Conn.execute CommandText,0,-1

[hxb74]

你把后面的“,0,-1”去掉试试吧，可能是参数不接受吧？

[hxb74]

对了，另外你的语句里似乎要加两个空格。
CommandText="create procedure ＃query_"&session("num")&_
"_AS select ＊ From companys Where "&str5
就是上面的下划线位置，如果还出错，把第一个删除试试。

[maomao818]

hxb74，我去掉了“,0,-1”。但是没有用呀

[maomao818]

hxb74，我去掉下滑线，结果/enterprise/asp/company_delete.asp, 第 54 行, 第 48 列
sqlstr="create procedure #query"&session("num")&
-----------------------------------------------^
你说要加两个空格，在哪里加呢？

[hxb74]

我的意思就是下划线的位置，把下划线删掉换上空格。
我说的方法仅供参考，没试过。