1. Panggil prosedur tersimpan tanpa parameter
<%
setConn = server.CreateObject ("adodb.connection")
setCmd = server.CreateObject ("adodb.command")
strconn = "dsn = pubs; uid = SA; pwd"
Conn.openstrconn
setcmd.activeConnection = Conn
cmd.CommandText = "{callnono}"
'setRs = cmc.exe atau cmd.execute
setRs = cmd.execute ()
%>
2. Prosedur tersimpan untuk parameter input
<%
setConn = server.CreateObject ("adodb.connection")
setCmd = server.CreateObject ("adodb.command")
strconn = "dsn = pubs; uid = SA; pwd"
Conn.openstrconn
setcmd.activeConnection = Conn
cmd.CommandText = "{calloneInput (?)}"
cmd.parameters.appendcmd.createParameter ("@aaa", adinteger, adparaminput)
cmd ("@aaa") = 100
cmd.execute ()
%>
3. Parameter input dan parameter output
<%
setConn = server.CreateObject ("adodb.connection")
setCmd = server.CreateObject ("adodb.command")
strconn = "dsn = pubs; uid = SA; pwd"
Conn.openstrconn
setcmd.activeConnection = Conn
cmd.CommandText = "{calloneinout (?,?)}"
cmd.parameters.appendcmd.createParameter ("@aaa", adinteger, adparaminput)
cmd ("@aaa") = 10
cmd.parameters.appendcmd.createParameter ("@bbb", adinteger, adparamoutput)
cmd.execute ()
BBB = cmd ("@bbb")
%>
4. Satu parameter input, satu parameter output, dan satu nilai pengembalian
<%
setConn = server.CreateObject ("adodb.connection")
setCmd = server.CreateObject ("adodb.command")
strconn = "dsn = pubs; uid = SA; pwd"
Conn.openstrconn
setcmd.activeConnection = Conn
cmd.CommandText = "{? = callonereturn (?,?)}"
cmd.parameters.appendcmd.createParameter ("@return_value", adinteger, adparamreturnValue)
cmd.parameters.appendcmd.createParameter ("@aaa", adinteger, adparaminput)
cmd ("@aaa") = 10
cmd.parameters.appendcmd.createParameter ("@bbb", adinteger, adparamoutput)
cmd.execute ()
BBB = cmd ("@bbb")
rrr = cmd ("@return_value")
%>
Cara menghubungi prosedur tersimpan SQL di ASP
www.lucky365.net2002-2-7jiaxiang365
<%setConnection1 = server.CreateObject ("adodb.connection")
Connection1.Open ... 'Bergabunglah
setCommand1 = server.CreateObject ("adodb.command")
setCommand1.activeConnection = connection1
Command1.CommandType = 4
Command1.CommandText = "SP_1" 'SP Name
command1.parameters (1) = ... 'nilai parameter
command1.parameters (2) = ...
setRecordset1 = command1.execute ()
%>
Tips untuk Panggilan ASP Prosedur Tersimpan
1. Yang paling sederhana adalah sebagai berikut
Dimobjconn
Setobjconn = server.createObject ("adobd.connection")
objconn.openapplication ("connection_string")
'CallTheStoredProceduretoincrementacoCounterOnthepage