|
-
Oct 16th, 2001, 07:39 PM
#1
Thread Starter
PowerPoster
Asp Beginner, Need to Help
Hello, I am new to ASP programming, so I would like to get some help from the rest of you guys. I can't figure out what is wrong in this page, but it's not updating my database. Anyone?? I can execute the stored proc from the query analyzer.
Code:
<%
Option Explicit
Dim objCn
Dim objCmd
Dim xmlDoc
Dim xmlResponse
Dim objPar
Dim strXMLRequest
Dim strConnectionString
Const adCmdStoredProc = 4
Const adParamInput = 1
Const adVarChar = 200
On Error Resume Next
Set objCn = CreateObject("ADODB.Connection")
Set objCmd = CreateObject("ADODB.Command")
Set objPar = CreateObject("ADODB.Parameter")
strConnectionString = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=BackDate;Data Source=NETICE"
objCn.Open strConnectionString
With objCmd
.ActiveConnection = objCn
.CommandType = adCmdStoredProc
.CommandText = "Add_BackDate"
End With
With objCmd
.Parameters.Append objCmd.CreateParameter ("AssociateID", adVarChar, adParamInput, 8, "91904451")
.Parameters.Append objCmd.CreateParameter ("AssociateLName", adVarChar, adParamInput, 40, "Yields")
.Parameters.Append objCmd.CreateParameter ("AssociateFName", adVarChar, adParamInput, 40, "Dan")
.Parameters.Append objCmd.CreateParameter ("OrderNumber", adVarChar, adParamInput, 9, "030263578")
.Parameters.Append objCmd.CreateParameter ("Operator", adVarChar, adParamInput, 6, "L00m2p")
.Execute
End With
Response.Write "Done!"
%>
Posting Permissions
- You may not post new threads
- You may not post replies
- You may not post attachments
- You may not edit your posts
-
Forum Rules
|
Click Here to Expand Forum to Full Width
|