Происходит следущее.
Начал переписывать ASP страницы с JS на VB

Когда идет выборка из базы процедурой с созданием параметров все нормально. Но когда идет какое то изменение таблиц не хочет работать. Даже не пишет ошибку, а тока ее код.

То есть вот это работает

dim connect
set connect=Server.CreateObject("ADODB.Connection")
connect.ConnectionTimeout=15
connect.CommandTimeout=10
connect.Open "Provider=SQLOLEDB;Integrated Security=SSPI;Persist Security Info=True;Initial Catalog=Upack;Data Source=SQL\TEST;Use Procedure for Prepare=1;Auto Translate=True;Packet Size=4096;Use Encryption for Data=False;Tag with column collation when possible=False"


dim cmd
set cmd=Server.CreateObject("ADODB.Command")
cmd.CommandType=adCmdStoredProc
cmd.CommandText="price"
cmd.ActiveConnection=connect
set rs=cmd.Execute

процедура является просто выборкой полей из таблиц.


а вот это не работает

<%
dim connect, rs, cmd
dim sid
sid=Request("ID")(1)

set connect=Server.CreateObject("ADODB.Connection")
connect.ConnectionTimeout=15
connect.CommandTimeout=10
connect.Open "Provider=SQLOLEDB;Integrated Security=SSPI;Persist Security Info=True;Initial Catalog=Test;Data Source=SQL\TEST;Use Procedure for Prepare=1;Auto Translate=True;Packet Size=4096;Use Encryption for Data=False;Tag with column collation when possible=False"


set cmd=Server.CreateObject("ADODB.Command")
cmd.CommandType=adCmdStoredProc
cmd.CommandText="deletecustomers"
set cmd.ActiveConnection=connect


cmd.Parameters.Append cmd.CreateParameter("id",adVarWChar,adParamInput,100,sid)

set rs=cmd.Execute

%>

<p class="zaglavie">Успешно</p>
<% rs.close
connect.close %>

процедура просто удаление строки

НА JScripts ВСЕ РАБОТАЛО!!Помогите разобраться.

ДА это ошибка.....яя пробывал по разному