HomeAboutWeb DesignGraphicDesignPresentationContact

ASP Training 101

Testing For Empty Recordsets: Webitcorp

Testing For Empty Recordsets

operation placed here

The Code

<%

Dim myConn

Set myConn = Server.CreateObject("ADODB.Connection")
myConn.ConnectionString="Driver={Microsoft Access Driver (*.mdb)};Dbq=" & server.mappath("/DB/Northwind.mdb") & ";"

myConn.Open

Dim myRS
Set myRS = Server.CreateObject("ADODB.Recordset")
myRS.Open "Employees", myConn,,,adCmdTable

If myRS.EOF Then

Response.Write "your message here"

Else

Response.Write "operation placed here"

End If

myRS.Close
Set objRS = Nothing

myConn.Close
Set myConn = Nothing
%>

Home | About | Web Design | Graphic Design | Presentations | Contact | Site Map | del.icio.us+del.icio.us

| Saint Lucie County, Florida | Rockland County, NY | Burgan County, NJ |


Port Saint Lucie Web Development , Graphic Design , Multimedia Presentations , and much more

Valid XHTML 1.0 Transitional

Copyright ©2007

Onenuttyweb.com