|
 |
asp_databases thread: Kindly help
Message #1 by jay48202@y... on Thu, 3 Oct 2002 14:42:10
|
|
Hi,
I am not getting any output for the recSet output statments.
Please help. Wanna know, how to pass variable in the SQL query.
Thanks in advance,
Jay
<% Dim vSeqNum,vPartNum,vPartType
vSeqNum=Request.Form("txtSeqPN")
vPartNum=Request.Form("txtPN")
vPartType=Request.Form("txtPT")'value is v8 Engine
%>
<TR>
<TD align=center><h4><%Response.Write(vSeqNum)%></h4></TD>
<TD align=center><h4><%Response.Write(vPartNum)%></h4></TD>
<TD align=center><h4><%Response.Write(vPartType)%
></h4></TD>
</TR>
</TABLE>
<%Dim vNumLabels
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open ("FILEDSN=" + Server.MapPath("Ppk.dsn") + ";")
set recSet=Server.CreateObject("ADODB.RecordSet")
recSet.ActiveConnection=Conn
response.write(vPartType)'I got the value here as v8 Engine
recSet.Open "select * from tbLbls where PartType='vPartType'"
response.write(vPartType)'I got the value here as v8 Engine
do until recSet.EOF
for each x in recSet.Fields
Response.Write(x.PartType)
Response.Write(x.NumLabels & "<br />")
next
Response.Write("<br />")
recSet.MoveNext
loop
recSet.close
set recSet.ActiveConnection=Nothing
Conn.Close
set Conn=Nothing
%>
Message #2 by "Samir Chitkara , Gurgaon" <chitkaras@g...> on Thu, 31 Oct 2002 18:24:12 +0530
|
|
hi!
vpartype is a variable
use it as :
recSet.Open "select * from tbLbls where PartType='" & vPartType & "'"
-samir
-----Original Message-----
From: jay48202@y... [mailto:jay48202@y...]
Sent: Thursday, October 03, 2002 8:12 PM
To: ASP Databases
Subject: [asp_databases] Kindly help
Hi,
I am not getting any output for the recSet output statments.
Please help. Wanna know, how to pass variable in the SQL query.
Thanks in advance,
Jay
<% Dim vSeqNum,vPartNum,vPartType
vSeqNum=Request.Form("txtSeqPN")
vPartNum=Request.Form("txtPN")
vPartType=Request.Form("txtPT")'value is v8 Engine
%>
<TR>
<TD align=center><h4><%Response.Write(vSeqNum)%></h4></TD>
<TD align=center><h4><%Response.Write(vPartNum)%></h4></TD>
<TD align=center><h4><%Response.Write(vPartType)%
></h4></TD>
</TR>
</TABLE>
<%Dim vNumLabels
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open ("FILEDSN=" + Server.MapPath("Ppk.dsn") + ";")
set recSet=Server.CreateObject("ADODB.RecordSet")
recSet.ActiveConnection=Conn
response.write(vPartType)'I got the value here as v8 Engine
recSet.Open "select * from tbLbls where PartType='vPartType'"
response.write(vPartType)'I got the value here as v8 Engine
do until recSet.EOF
for each x in recSet.Fields
Response.Write(x.PartType)
Response.Write(x.NumLabels & "<br />")
next
Response.Write("<br />")
recSet.MoveNext
loop
recSet.close
set recSet.ActiveConnection=Nothing
Conn.Close
set Conn=Nothing
%>
|
|
|
View Cart
