I am able to connect to sql databae and it's retrieving all the tickets. Is there a way to set
a query string to display the current ticket number that was generated in the database.


Here's the code


str="SELECT Ticket_Number FROM Escalation_Forms"
rs.open str
While not rs.EOF
Response.Write rs("Ticket_Number") & "<BR>"
rs.MoveNext



Thank you

Hello,

Where is the connection to the database? Was that left out of your code post?

Brian

It was left out! here is the rest of it !

<%

Dim con, rs, str

set con=Server.CreateObject("ADODB.CONNECTION")

con.Open "Provider=sqloledb;Data Source=Flmirsql02;Initial Catalog=Source_Forms;User Id=Source_Forms_User;Password=password;"


str="SELECT Ticket_Number FROM Escalation_Forms"



set rs = con.execute(strSql)

if rs.eof
    then
    Response.write("No records returned")

end if

do Until rs.eof

Response.write("<a href=Confirmation.asp?tnum=" & rs("Ticket_Number") & ">" & rs("Ticket_Number") & "</a><br>")
   rs.MoveNext
   loop


rs.Close

con.Close

Set rs = Nothing

Set con =Nothing
%>

Your help is greatly appreaciated!
thank you

I am getting the following error!


Microsoft VBScript compilation error '800a03f9'

Expected 'Then'

/forms/Confirmation.asp, line 35

if rs.eof
---------^

This is the original code! I trying to access the current ticket number within the database that was generated!

Thanks


<%

Dim con, rs, str

set con=Server.CreateObject("ADODB.CONNECTION")

con.Open "Provider=sqloledb;Data Source=Flmirsql02;Initial Catalog=Source_Forms;User Id=Source_Forms_User;Password=password;"

set rs=server.CreateObject("ADODB.RECORDSET")

rs.ActiveConnection=con

str="SELECT Ticket_Number FROM Escalation_Forms"


rs.open str

While not rs.EOF

Response.Write rs("Ticket_Number") & "<BR>"

rs.MoveNext

Wend


rs.Close

con.Close

Set rs = Nothing

Set con =Nothing
%>

The error for:

if rs.eof
    then
    Response.write("No records returned")

end if

Is because it needs to be

if rs.eof then

or

if rs.eof _
then

Brian

Hello,

Are you still having problems? What is your final code that you are using if you are?

Brian

Microsoft OLE DB Provider for SQL Server error '80040e0c'

Command text was not set for the command object.

/forms/Confirmation.asp, line 32


Pointint this code:
set rs = con.execute(strSql)

Hi Calibus,

That denotes that you are missing this before the line that shows error.

Cheers!

_________________________
- Vijay G
Strive for Perfection

Hello,

In this post, you are using a variable for the SQL that isn't being set to anything. you set the SQL to str but use strSQL (which has an empty string):

str="SELECT Ticket_Number FROM Escalation_Forms"
set rs = con.execute(strSql)

Should be:

str="SELECT Ticket_Number FROM Escalation_Forms"
set rs = con.execute(str)

Brian