Home | Advertising Info87 USERS CURRENTLY ONLINE   
   Site Search Contact Us Saturday, September 20, 2014  
 
 


 
ASPProtect
User Management Application with web based screens that allow you to manage users.
www.ASPProtect.com
 
ASPBanner
Banner Rotation system. Advertisers can monitor online statistical reports via their web browsers.
www.ASPBanner.com
 
ASP Photo Gallery
Upload an unlimited amount of albums. Set up categories.Image resizing thumbnail creation.
www.ASPPhotoGallery.com
 
ASPClassifieds
Classifieds system. Set up categories. Users can register themselves. Supports picture uploads.
www.ASPClassifieds.com



DISCUSSION ARCHIVES
 
Try a free httpZip trial now and compress for less!


We didn't realize
the site was so popular.

Other Stuff
 

 
 
Active Server Pages ASP ASP.NET .aspx .ascx Web HTML Developer Internet Microsoft Web Services Visual Studio .NET CJWSoft ASPProtect ASPBanner ASPClassifieds



(Advanced)  (Components)  (Database)  (General)  (Vbscript)




ASPProtect

 
Subject: Re: Access 97 and ASP
From: Harlan
Date: 2/2/1999 9:16:30 AM
IP: 206.222.20.2



 

Here is what I usually do. I put my recordset
evaluations in a function

dim DB
dim errNoneFound, errUnknown
errNoneFound = "No records found matching your search."
errUnknown = "An unknown error occured, please
contact the system administrator."

private function rsFunction(sSQL)
I wont write DBOpen() here, but its
just a sub that opens the database.
DBOpen(gsDSN,gsUID,gsPWD)
Set rsRecordset = DB.Execute(sSQL)

eof and bof return true when you are at
the "end of file" and the "beginning of file"
at the same time.. meaning no records returned.
If rsRecordset.EOF And rsRecordset.BOF Then
rsFunction = errNoneFound
Exit Function
in order to use .count make sure you use a
non-forward only curser

count is equal to -1 when the recordset itself
didnt return, meaning you have an error.
If rsRecordset.count = -1 Then
rsFunction = errUnknown


Else
Do While Not rsRecordset.EOF
strTemp = strTemp & rsRecordset("SomeColumn")
rsRecordset.MoveNext
Loop
rsFunction = strTemp
End If

hope that made things clearer..

Previous Message


 

   Active Server Pages Rule The World
Contact Us  
All artwork, design & content contained in this site are Copyright 1998 - 2014 PowerASP.com and Christopher J. Williams
Banner ads ,other site logos, etc are copyright of their respective companies.
STATS Unless otherwise noted - All Rights Reserved.

Active Server Pages asp search engine active server page asp application components tutorial CJWSoft ASPProtect ASPBanner ASPClassifieds www.aspclassifieds.com, www.powerasp.com,www.cjwsoft.com,www.aspphotogallery.com,www.codewanker.com,www.aspprotect.com,www.aspbanner.com