<% @ Language = "VBScript"%> <% Option Explicit%> <% 'this Example Can Be Used to call the byroyalty stiled procedure' installed with the pubs Database with Microsoft SQL Server.
'This sample assistation on the local machine%>
'Open ADO Connection using account "sa"' and blank password strConn = "Provider = SQLOLEDB; User ID = sa; Initial Catalog = pubs; Data Source =" & Request.ServerVariables ( "SERVER_NAME") oConn.Open strConn Set oCmd. ActiveConnection = OCONN 'Setup call to stored procedure and append parameters Ocmd.commandtext = "{call Byroyalty (?)}" @ percentage ", adINteger, adParaminput 'Assign Value to Input Parameter OCMD ("@ percentage" = 75 'Fire the stored proc and assign resulting recordset' to out = = ocmd.execute%> Author ID = <% response.write ics ("au_id")%> html>
p> body >