|
 |
asp_databases thread: 800a01b6 - Object doesn't support this property or method: 'Fields'
Message #1 by "Scott Hutchinson" <shutchinson@s...> on Wed, 25 Jul 2001 16:11:08
|
|
Hello,
Can somebody please help out with respect to the following error message:
Thanks
Scott
Microsoft VBScript runtime error '800a01b6'
Object doesn't support this property or method: 'Fields'
/SCOTTEST/test.asp, line 34
Code for test.asp
<%@LANGUAGE="VBSCRIPT"%>
<!--#include file="Connections/SS.asp" -->
<%
Dim Command1__GROUP_TYPE
Command1__GROUP_TYPE = "5"
if(Request.Form("GT") <> "") then Command1__GROUP_TYPE = Request.Form("GT")
Dim Command1__GROUP_NAME
Command1__GROUP_NAME = "MIKE1"
if(Request.Form("GN") <> "") then Command1__GROUP_NAME = Request.Form("GN")
%>
<%
set Command1 = Server.CreateObject("ADODB.Command")
Command1.ActiveConnection = MM_SS_STRING
Command1.CommandText = "K_PRTY_PERF_IG_SUMMARY"
Command1.Parameters.Append Command1.CreateParameter("GROUP_TYPE", 200,
1,5,Command1__GROUP_TYPE)
Command1.Parameters.Append Command1.CreateParameter("GROUP_NAME", 200,
1,5,Command1__GROUP_NAME)
Command1.CommandType = 4
Command1.CommandTimeout = 0
Command1.Prepared = true
newones = Command1.Execute()
newones_numRows = 0
%>
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<body bgcolor="#FFFFFF" text="#000000">
<%= newones.Fields.Item("PRTY").Value %> <%= newones.Fields.Item
("CountOfCRNO").Value %>
</body>
</html>
Message #2 by "Tomm Matthis" <matthis@b...> on Wed, 25 Jul 2001 11:13:06 -0400
|
|
try this line:
SET newones=3DCommand1.execute()
-- Tomm
> -----Original Message-----
> From: Scott Hutchinson [mailto:shutchinson@s...]
> Sent: Wednesday, July 25, 2001 4:11 PM
> To: ASP Databases
> Subject: [asp_databases] 800a01b6 - Object doesn't support this
property
> or method: 'Fields'
>
>
> Hello,
>
> Can somebody please help out with respect to the following error
message:
>
> Thanks
> Scott
>
> Microsoft VBScript runtime error '800a01b6'
>
> Object doesn't support this property or method: 'Fields'
>
> /SCOTTEST/test.asp, line 34
>
> Code for test.asp
>
> <%@LANGUAGE=3D"VBSCRIPT"%>
> <!--#include file=3D"Connections/SS.asp" -->
> <%
>
> Dim Command1__GROUP_TYPE
> Command1__GROUP_TYPE =3D "5"
> if(Request.Form("GT") <> "") then Command1__GROUP_TYPE =3D
> Request.Form("GT")
>
> Dim Command1__GROUP_NAME
> Command1__GROUP_NAME =3D "MIKE1"
> if(Request.Form("GN") <> "") then Command1__GROUP_NAME =3D
> Request.Form("GN")
>
> %>
> <%
>
> set Command1 =3D Server.CreateObject("ADODB.Command")
> Command1.ActiveConnection =3D MM_SS_STRING
> Command1.CommandText =3D "K_PRTY_PERF_IG_SUMMARY"
> Command1.Parameters.Append Command1.CreateParameter("GROUP_TYPE", 200,
> 1,5,Command1__GROUP_TYPE)
> Command1.Parameters.Append Command1.CreateParameter("GROUP_NAME", 200,
> 1,5,Command1__GROUP_NAME)
> Command1.CommandType =3D 4
> Command1.CommandTimeout =3D 0
> Command1.Prepared =3D true
> newones =3D Command1.Execute()
>
> newones_numRows =3D 0
> %>
> <html>
> <head>
> <title>Untitled Document</title>
> <meta http-equiv=3D"Content-Type" content=3D"text/html;
charset=3Diso-8859-1">
> </head>
> <body bgcolor=3D"#FFFFFF" text=3D"#000000">
> <%=3D newones.Fields.Item("PRTY").Value %> <%=3D newones.Fields.Item
> ("CountOfCRNO").Value %>
> </body>
> </html>
>
>
Message #3 by "Scott Hutchinson" <shutchinson@s...> on Thu, 26 Jul 2001 10:35:33
|
|
TOMM - THANK YOU SO MUCH, YOUR SUGGESTION DID THE BUSINESS
|
|
|
View Cart
