asptoday_discuss thread: Parameters.Append List
Message #1 by "Bill Reynolds" <breynolds@g...> on Wed, 2 Jan 2002 12:24:52 -0500
|
|
Hi All!
Does anyone out there know if there is a way in plain old and ADO to
list out the parameters when they are appended to a command to execute a
stored procedure? It would be nice to have a way to list them and see
what is wrong with my page rather than having to response.write all my
variables out.
Here is an example of a piece of code that I am troubleshooting that I
would like to view the parameters that are set:
Set adocmd =3D Server.CreateObject("ADODB.Command")
=09
adocmd.ActiveConnection =3D oConn
adocmd.CommandType =3D adCmdStoredProc
adocmd.CommandText =3D "TempPlanning1A"
=09
adocmd.Parameters.Append
adocmd.CreateParameter("TempGUID", adGUID, adParamInput, 16, TempGUID)
adocmd.Parameters.Append
adocmd.CreateParameter("PubTypeGUID", adGUID, adParamInput, 16,
PubTypeGUID)
adocmd.Parameters.Append
adocmd.CreateParameter("PubType", adVarChar, adParamInput, 50, PubType)
adocmd.Parameters.Append
adocmd.CreateParameter("PubDate", adVarChar, adParamInput, 15,
DateOfRun)
adocmd.Parameters.Append
adocmd.CreateParameter("PubName", adVarChar, adParamInput, 50,
Publication)
adocmd.Parameters.Append
adocmd.CreateParameter("Paired", adVarChar, adParamInput, 1, 1)
adocmd.Parameters.Append
adocmd.CreateParameter("PubDeadline", adVarChar, adParamInput, 50,
PlanDeadline)
adocmd.Parameters.Append
adocmd.CreateParameter("PlanGUID", adGUID, adParamInput, 16, PlanGUID)
adocmd.Parameters.Append
adocmd.CreateParameter("PlanName", adVarChar, adParamInput, 50,
PlanName)
adocmd.Parameters.Append
adocmd.CreateParameter("PlanDay", adVarChar, adParamInput, 15, PlanDay)
adocmd.Parameters.Append
adocmd.CreateParameter("Edition", adVarChar, adParamInput, 50, Edition)
adocmd.Parameters.Append
adocmd.CreateParameter("EditionDeadline", adVarChar, adParamInput, 50,
EdDeadline)
adocmd.Parameters.Append
adocmd.CreateParameter("sUserGUID", adGUID, adParamInput, 16, sUserGUID)
adocmd.Parameters.Append
adocmd.CreateParameter("TemplateName", adVarChar, adParamInput, 100,
TemplateName)
adocmd.Parameters.Append
adocmd.CreateParameter("TemplateDesc", adVarChar, adParamInput, 255,
TemplateDesc)
=09
adocmd.Execute, , adExecuteNoRecords
Thanks,
Bill Reynolds
Web Application Developer
Graphic Enterprises, Inc.
3874 Highland Park NW
North Canton, OH 44720.8080
xxx.xxx.xxxx x204 (p)
xxx.xxx.xxxx (f)
Message #2 by "Tulip, Nick S" <nick.s.tulip@c...> on Wed, 2 Jan 2002 13:54:50 -0500
|
|
What is the error that you get??
-----Original Message-----
From: Bill Reynolds [mailto:breynolds@g...]
Sent: Wednesday, January 02, 2002 12:25 PM
To: ASPToday Discuss
Subject: [asptoday_discuss] Parameters.Append List
Hi All!
Does anyone out there know if there is a way in plain old and ADO to
list out the parameters when they are appended to a command to execute a
stored procedure? It would be nice to have a way to list them and see
what is wrong with my page rather than having to response.write all my
variables out.
Here is an example of a piece of code that I am troubleshooting that I
would like to view the parameters that are set:
Set adocmd = Server.CreateObject("ADODB.Command")
adocmd.ActiveConnection = oConn
adocmd.CommandType = adCmdStoredProc
adocmd.CommandText = "TempPlanning1A"
adocmd.Parameters.Append
adocmd.CreateParameter("TempGUID", adGUID, adParamInput, 16, TempGUID)
adocmd.Parameters.Append
adocmd.CreateParameter("PubTypeGUID", adGUID, adParamInput, 16,
PubTypeGUID)
adocmd.Parameters.Append
adocmd.CreateParameter("PubType", adVarChar, adParamInput, 50, PubType)
adocmd.Parameters.Append
adocmd.CreateParameter("PubDate", adVarChar, adParamInput, 15,
DateOfRun)
adocmd.Parameters.Append
adocmd.CreateParameter("PubName", adVarChar, adParamInput, 50,
Publication)
adocmd.Parameters.Append
adocmd.CreateParameter("Paired", adVarChar, adParamInput, 1, 1)
adocmd.Parameters.Append
adocmd.CreateParameter("PubDeadline", adVarChar, adParamInput, 50,
PlanDeadline)
adocmd.Parameters.Append
adocmd.CreateParameter("PlanGUID", adGUID, adParamInput, 16, PlanGUID)
adocmd.Parameters.Append
adocmd.CreateParameter("PlanName", adVarChar, adParamInput, 50,
PlanName)
adocmd.Parameters.Append
adocmd.CreateParameter("PlanDay", adVarChar, adParamInput, 15, PlanDay)
adocmd.Parameters.Append
adocmd.CreateParameter("Edition", adVarChar, adParamInput, 50, Edition)
adocmd.Parameters.Append
adocmd.CreateParameter("EditionDeadline", adVarChar, adParamInput, 50,
EdDeadline)
adocmd.Parameters.Append
adocmd.CreateParameter("sUserGUID", adGUID, adParamInput, 16, sUserGUID)
adocmd.Parameters.Append
adocmd.CreateParameter("TemplateName", adVarChar, adParamInput, 100,
TemplateName)
adocmd.Parameters.Append
adocmd.CreateParameter("TemplateDesc", adVarChar, adParamInput, 255,
TemplateDesc)
adocmd.Execute, , adExecuteNoRecords
Thanks,
Bill Reynolds
Web Application Developer
Graphic Enterprises, Inc.
3874 Highland Park NW
North Canton, OH 44720.8080
xxx.xxx.xxxx x204 (p)
xxx.xxx.xxxx (f)
Message #3 by "Boni Gopalan" <boni@h...> on Wed, 2 Jan 2002 14:00:56 -0500
|
|
Hi Billy,
Since Parameters is a collection, a simple For Each Loop should work
dim prmSPParam as ADODB.Parameter
Set prmSPParam = Server.CreateObject("ADODB.Parameter")
for each prmSPParam in adocmd.Parameters
Response.write("Parameter Name : " + Cstr(prmSPParam.Name + " = " + Cstr
(prmSPParam.value)) + "<BR>")
next
thank you
Boni Gopalan
----- Original Message -----
From: "Bill Reynolds" <breynolds@g...>
To: "ASPToday Discuss" <asptoday_discuss@p...>
Sent: Wednesday, January 02, 2002 12:24 PM
Subject: [asptoday_discuss] Parameters.Append List
Hi All!
Does anyone out there know if there is a way in plain old and ADO to
list out the parameters when they are appended to a command to execute a
stored procedure? It would be nice to have a way to list them and see
what is wrong with my page rather than having to response.write all my
variables out.
Here is an example of a piece of code that I am troubleshooting that I
would like to view the parameters that are set:
Set adocmd = Server.CreateObject("ADODB.Command")
adocmd.ActiveConnection = oConn
adocmd.CommandType = adCmdStoredProc
adocmd.CommandText = "TempPlanning1A"
adocmd.Parameters.Append
adocmd.CreateParameter("TempGUID", adGUID, adParamInput, 16, TempGUID)
adocmd.Parameters.Append
adocmd.CreateParameter("PubTypeGUID", adGUID, adParamInput, 16,
PubTypeGUID)
adocmd.Parameters.Append
adocmd.CreateParameter("PubType", adVarChar, adParamInput, 50, PubType)
adocmd.Parameters.Append
adocmd.CreateParameter("PubDate", adVarChar, adParamInput, 15,
DateOfRun)
adocmd.Parameters.Append
adocmd.CreateParameter("PubName", adVarChar, adParamInput, 50,
Publication)
adocmd.Parameters.Append
adocmd.CreateParameter("Paired", adVarChar, adParamInput, 1, 1)
adocmd.Parameters.Append
adocmd.CreateParameter("PubDeadline", adVarChar, adParamInput, 50,
PlanDeadline)
adocmd.Parameters.Append
adocmd.CreateParameter("PlanGUID", adGUID, adParamInput, 16, PlanGUID)
adocmd.Parameters.Append
adocmd.CreateParameter("PlanName", adVarChar, adParamInput, 50,
PlanName)
adocmd.Parameters.Append
adocmd.CreateParameter("PlanDay", adVarChar, adParamInput, 15, PlanDay)
adocmd.Parameters.Append
adocmd.CreateParameter("Edition", adVarChar, adParamInput, 50, Edition)
adocmd.Parameters.Append
adocmd.CreateParameter("EditionDeadline", adVarChar, adParamInput, 50,
EdDeadline)
adocmd.Parameters.Append
adocmd.CreateParameter("sUserGUID", adGUID, adParamInput, 16, sUserGUID)
adocmd.Parameters.Append
adocmd.CreateParameter("TemplateName", adVarChar, adParamInput, 100,
TemplateName)
adocmd.Parameters.Append
adocmd.CreateParameter("TemplateDesc", adVarChar, adParamInput, 255,
TemplateDesc)
adocmd.Execute, , adExecuteNoRecords
Thanks,
Bill Reynolds
Web Application Developer
Graphic Enterprises, Inc.
3874 Highland Park NW
North Canton, OH 44720.8080
xxx.xxx.xxxx x204 (p)
xxx.xxx.xxxx (f)
Message #4 by "Bill Reynolds" <breynolds@g...> on Wed, 2 Jan 2002 13:59:27 -0500
|
|
I get the following error if I try to response.write the parameters:
esponse object, ASP 0185 (0x8002000E)
A default property was not found for the object.
/status/Planning/addnewplanneditem1.asp
Thanks,
Bill Reynolds
Web Application Developer
Graphic Enterprises, Inc.
3874 Highland Park NW
North Canton, OH 44720.8080
xxx.xxx.xxxx x204 (p)
xxx.xxx.xxxx (f)
-----Original Message-----
From: Tulip, Nick S [mailto:nick.s.tulip@c...]
Sent: Wednesday, January 02, 2002 1:55 PM
To: ASPToday Discuss
Subject: [asptoday_discuss] RE: Parameters.Append List
What is the error that you get??
-----Original Message-----
From: Bill Reynolds [mailto:breynolds@g...]
Sent: Wednesday, January 02, 2002 12:25 PM
To: ASPToday Discuss
Subject: [asptoday_discuss] Parameters.Append List
Hi All!
Does anyone out there know if there is a way in plain old and ADO to
list out the parameters when they are appended to a command to execute a
stored procedure? It would be nice to have a way to list them and see
what is wrong with my page rather than having to response.write all my
variables out.
Here is an example of a piece of code that I am troubleshooting that I
would like to view the parameters that are set:
Set adocmd =3D Server.CreateObject("ADODB.Command")
=09
adocmd.ActiveConnection =3D oConn
adocmd.CommandType =3D adCmdStoredProc
adocmd.CommandText =3D "TempPlanning1A"
=09
adocmd.Parameters.Append
adocmd.CreateParameter("TempGUID", adGUID, adParamInput, 16, TempGUID)
adocmd.Parameters.Append
adocmd.CreateParameter("PubTypeGUID", adGUID, adParamInput, 16,
PubTypeGUID)
adocmd.Parameters.Append
adocmd.CreateParameter("PubType", adVarChar, adParamInput, 50, PubType)
adocmd.Parameters.Append
adocmd.CreateParameter("PubDate", adVarChar, adParamInput, 15,
DateOfRun)
adocmd.Parameters.Append
adocmd.CreateParameter("PubName", adVarChar, adParamInput, 50,
Publication)
adocmd.Parameters.Append
adocmd.CreateParameter("Paired", adVarChar, adParamInput, 1, 1)
adocmd.Parameters.Append
adocmd.CreateParameter("PubDeadline", adVarChar, adParamInput, 50,
PlanDeadline)
adocmd.Parameters.Append
adocmd.CreateParameter("PlanGUID", adGUID, adParamInput, 16, PlanGUID)
adocmd.Parameters.Append
adocmd.CreateParameter("PlanName", adVarChar, adParamInput, 50,
PlanName)
adocmd.Parameters.Append
adocmd.CreateParameter("PlanDay", adVarChar, adParamInput, 15, PlanDay)
adocmd.Parameters.Append
adocmd.CreateParameter("Edition", adVarChar, adParamInput, 50, Edition)
adocmd.Parameters.Append
adocmd.CreateParameter("EditionDeadline", adVarChar, adParamInput, 50,
EdDeadline)
adocmd.Parameters.Append
adocmd.CreateParameter("sUserGUID", adGUID, adParamInput, 16, sUserGUID)
adocmd.Parameters.Append
adocmd.CreateParameter("TemplateName", adVarChar, adParamInput, 100,
TemplateName)
adocmd.Parameters.Append
adocmd.CreateParameter("TemplateDesc", adVarChar, adParamInput, 255,
TemplateDesc)
=09
adocmd.Execute, , adExecuteNoRecords
Thanks,
Bill Reynolds
Web Application Developer
Graphic Enterprises, Inc.
3874 Highland Park NW
North Canton, OH 44720.8080
xxx.xxx.xxxx x204 (p)
xxx.xxx.xxxx (f)
Message #5 by "Bill Reynolds" <breynolds@g...> on Wed, 2 Jan 2002 14:03:41 -0500
|
|
Thanks Boni!!
Thanks,
Bill Reynolds
Web Application Developer
Graphic Enterprises, Inc.
3874 Highland Park NW
North Canton, OH 44720.8080
xxx.xxx.xxxx x204 (p)
xxx.xxx.xxxx (f)
-----Original Message-----
From: Boni Gopalan [mailto:boni@h...]
Sent: Wednesday, January 02, 2002 2:01 PM
To: ASPToday Discuss
Subject: [asptoday_discuss] Re: Parameters.Append List
Hi Billy,
Since Parameters is a collection, a simple For Each Loop should work
dim prmSPParam as ADODB.Parameter
Set prmSPParam =3D Server.CreateObject("ADODB.Parameter")
for each prmSPParam in adocmd.Parameters
Response.write("Parameter Name : " + Cstr(prmSPParam.Name + " =3D "
+
Cstr
(prmSPParam.value)) + "<BR>")
next
thank you
Boni Gopalan
----- Original Message -----
From: "Bill Reynolds" <breynolds@g...>
To: "ASPToday Discuss" <asptoday_discuss@p...>
Sent: Wednesday, January 02, 2002 12:24 PM
Subject: [asptoday_discuss] Parameters.Append List
Hi All!
Does anyone out there know if there is a way in plain old and ADO to
list out the parameters when they are appended to a command to execute a
stored procedure? It would be nice to have a way to list them and see
what is wrong with my page rather than having to response.write all my
variables out.
Here is an example of a piece of code that I am troubleshooting that I
would like to view the parameters that are set:
Set adocmd =3D Server.CreateObject("ADODB.Command")
adocmd.ActiveConnection =3D oConn
adocmd.CommandType =3D adCmdStoredProc
adocmd.CommandText =3D "TempPlanning1A"
adocmd.Parameters.Append
adocmd.CreateParameter("TempGUID", adGUID, adParamInput, 16, TempGUID)
adocmd.Parameters.Append
adocmd.CreateParameter("PubTypeGUID", adGUID, adParamInput, 16,
PubTypeGUID)
adocmd.Parameters.Append
adocmd.CreateParameter("PubType", adVarChar, adParamInput, 50, PubType)
adocmd.Parameters.Append
adocmd.CreateParameter("PubDate", adVarChar, adParamInput, 15,
DateOfRun)
adocmd.Parameters.Append
adocmd.CreateParameter("PubName", adVarChar, adParamInput, 50,
Publication)
adocmd.Parameters.Append
adocmd.CreateParameter("Paired", adVarChar, adParamInput, 1, 1)
adocmd.Parameters.Append
adocmd.CreateParameter("PubDeadline", adVarChar, adParamInput, 50,
PlanDeadline)
adocmd.Parameters.Append
adocmd.CreateParameter("PlanGUID", adGUID, adParamInput, 16, PlanGUID)
adocmd.Parameters.Append
adocmd.CreateParameter("PlanName", adVarChar, adParamInput, 50,
PlanName)
adocmd.Parameters.Append
adocmd.CreateParameter("PlanDay", adVarChar, adParamInput, 15, PlanDay)
adocmd.Parameters.Append
adocmd.CreateParameter("Edition", adVarChar, adParamInput, 50, Edition)
adocmd.Parameters.Append
adocmd.CreateParameter("EditionDeadline", adVarChar, adParamInput, 50,
EdDeadline)
adocmd.Parameters.Append
adocmd.CreateParameter("sUserGUID", adGUID, adParamInput, 16, sUserGUID)
adocmd.Parameters.Append
adocmd.CreateParameter("TemplateName", adVarChar, adParamInput, 100,
TemplateName)
adocmd.Parameters.Append
adocmd.CreateParameter("TemplateDesc", adVarChar, adParamInput, 255,
TemplateDesc)
adocmd.Execute, , adExecuteNoRecords
Thanks,
Bill Reynolds
Web Application Developer
Graphic Enterprises, Inc.
3874 Highland Park NW
North Canton, OH 44720.8080
xxx.xxx.xxxx x204 (p)
xxx.xxx.xxxx (f)
Message #6 by "Tulip, Nick S" <nick.s.tulip@c...> on Wed, 2 Jan 2002 14:06:12 -0500
|
|
A little bit late bur here:
Set adocmd = New ADODB.Command
adocmd.ActiveConnection = "DSN=asd;uid=ntulip;pwd=nick=0202;"
adocmd.CommandType = adCmdStoredProc
adocmd.CommandText = "TempPlanning1A"
adocmd.Parameters.Append adocmd.CreateParameter("TempGUID", adGUID,
adParamInput, 16, TempGUID)
adocmd.Parameters.Append adocmd.CreateParameter("PubTypeGUID",
adGUID, adParamInput, 16, PubTypeGUID)
adocmd.Parameters.Append adocmd.CreateParameter("PubType",
adVarChar, adParamInput, 50, PubType)
adocmd.Parameters.Append adocmd.CreateParameter("PubDate",
adVarChar, adParamInput, 15, DateOfRun)
For i = 0 To adocmd.Parameters.Count
Debug.Print adocmd.Parameters(i).Name
Next
-----Original Message-----
From: Bill Reynolds [mailto:breynolds@g...]
Sent: Wednesday, January 02, 2002 2:04 PM
To: ASPToday Discuss
Subject: [asptoday_discuss] Re: Parameters.Append List
Thanks Boni!!
Thanks,
Bill Reynolds
Web Application Developer
Graphic Enterprises, Inc.
3874 Highland Park NW
North Canton, OH 44720.8080
xxx.xxx.xxxx x204 (p)
xxx.xxx.xxxx (f)
-----Original Message-----
From: Boni Gopalan [mailto:boni@h...]
Sent: Wednesday, January 02, 2002 2:01 PM
To: ASPToday Discuss
Subject: [asptoday_discuss] Re: Parameters.Append List
Hi Billy,
Since Parameters is a collection, a simple For Each Loop should work
dim prmSPParam as ADODB.Parameter
Set prmSPParam = Server.CreateObject("ADODB.Parameter")
for each prmSPParam in adocmd.Parameters
Response.write("Parameter Name : " + Cstr(prmSPParam.Name + " = " +
Cstr
(prmSPParam.value)) + "<BR>")
next
thank you
Boni Gopalan
----- Original Message -----
From: "Bill Reynolds" <breynolds@g...>
To: "ASPToday Discuss" <asptoday_discuss@p...>
Sent: Wednesday, January 02, 2002 12:24 PM
Subject: [asptoday_discuss] Parameters.Append List
Hi All!
Does anyone out there know if there is a way in plain old and ADO to
list out the parameters when they are appended to a command to execute a
stored procedure? It would be nice to have a way to list them and see
what is wrong with my page rather than having to response.write all my
variables out.
Here is an example of a piece of code that I am troubleshooting that I
would like to view the parameters that are set:
Set adocmd = Server.CreateObject("ADODB.Command")
adocmd.ActiveConnection = oConn
adocmd.CommandType = adCmdStoredProc
adocmd.CommandText = "TempPlanning1A"
adocmd.Parameters.Append
adocmd.CreateParameter("TempGUID", adGUID, adParamInput, 16, TempGUID)
adocmd.Parameters.Append
adocmd.CreateParameter("PubTypeGUID", adGUID, adParamInput, 16,
PubTypeGUID)
adocmd.Parameters.Append
adocmd.CreateParameter("PubType", adVarChar, adParamInput, 50, PubType)
adocmd.Parameters.Append
adocmd.CreateParameter("PubDate", adVarChar, adParamInput, 15,
DateOfRun)
adocmd.Parameters.Append
adocmd.CreateParameter("PubName", adVarChar, adParamInput, 50,
Publication)
adocmd.Parameters.Append
adocmd.CreateParameter("Paired", adVarChar, adParamInput, 1, 1)
adocmd.Parameters.Append
adocmd.CreateParameter("PubDeadline", adVarChar, adParamInput, 50,
PlanDeadline)
adocmd.Parameters.Append
adocmd.CreateParameter("PlanGUID", adGUID, adParamInput, 16, PlanGUID)
adocmd.Parameters.Append
adocmd.CreateParameter("PlanName", adVarChar, adParamInput, 50,
PlanName)
adocmd.Parameters.Append
adocmd.CreateParameter("PlanDay", adVarChar, adParamInput, 15, PlanDay)
adocmd.Parameters.Append
adocmd.CreateParameter("Edition", adVarChar, adParamInput, 50, Edition)
adocmd.Parameters.Append
adocmd.CreateParameter("EditionDeadline", adVarChar, adParamInput, 50,
EdDeadline)
adocmd.Parameters.Append
adocmd.CreateParameter("sUserGUID", adGUID, adParamInput, 16, sUserGUID)
adocmd.Parameters.Append
adocmd.CreateParameter("TemplateName", adVarChar, adParamInput, 100,
TemplateName)
adocmd.Parameters.Append
adocmd.CreateParameter("TemplateDesc", adVarChar, adParamInput, 255,
TemplateDesc)
adocmd.Execute, , adExecuteNoRecords
Thanks,
Bill Reynolds
Web Application Developer
Graphic Enterprises, Inc.
3874 Highland Park NW
North Canton, OH 44720.8080
xxx.xxx.xxxx x204 (p)
xxx.xxx.xxxx (f)
|
View Cart
