<% 'OK 建立存储过程的时候用户要有create procedure的权限 grant create procedure to yangbc2;
'以下是执行存储过程的例子
set conn=server.createobject("adodb.connection")
'OK
constr="Driver={Microsoft ODBC for Oracle};Server=yang11;Uid=yangbc2;Pwd=yang9812;"
'OK
'constr="Provider=OraOLEDB.Oracle.1;Password=change_on_install;Persist Security Info=True;User ID=sys;Data Source=yang11"
conn.Open(ConStr)
set rs=server.createobject("adodb.recordset")
'OK
'sql="CREATE TABLE yangbc2.A10(name VARCHAR2(10) NOT NULL, id VARCHAR2(10) NOT NULL)"
sql="yangbc2.test1"
rs.open sql,conn,3,3 '执行存储过程,与下一句作用相同,都可以
'conn.Execute("yangbc2.test1") '执行存储过程
'rs.close '有这句出错
set rs=nothing
conn.close
set conn=nothing
response.write "OK,successful,yangbc"
%>