1、最簡單的如下
DimobjConn
SetobjConn=Server.CreateObject("ADOBD.Connection")
objConn.OpenApplication("Connection_String")
'Callthestoredproceduretoincrementacounteronthepage
objConn.Execute"execsp_AddHit"
沒有參數，沒有返回，沒有錯誤處理，就是這個了
2、帶參數的一種調用
objConn.Execute"execsp_AddHit,'http://www.asp001.net',1"
請注意分割參數，該方法也不返回記錄
3、返回記錄的
DimobjConn
DimobjRs
SetobjConn=Server.CreateObject("ADOBD.Connection")
SetobjRs=Server.CreateObject("ADOBD.Recordset")
objConn.OpenApplication("Connection_String")
'Callthestoredproceduretoincrementacounteronthepage
objRs.OpenobjConn,"execsp_ListArticles'1/15/2001'"
'Loopthroughrecordsetanddisplayeacharticle
4、……
DimobjConn
DimobjCmd
'Instantiateobjects
SetobjConn=Server.CreateObject("ADODB.Connection")
setobjCmd=Server.CreateObject("ADODB.Command")
conn.OpenApplication("ConnectionString")
WithobjCmd
.ActiveConnection=conn'Youcanalsojustspecifyaconnectionstringhere
.CommandText="sp_InsertArticle"
.CommandType=adCmdStoredProc'Requirestheadovbs.incfileortypelibmetatag
'AddInputParameters
.Parameters.Append.CreateParameter("@columnist_id",adDouble,adParamInput,,columnist_id)
.Parameters.Append.CreateParameter("@url",adVarChar,adParamInput,255,url)
.Parameters.Append.CreateParameter("@title",adVarChar,adParamInput,99,url)