Microsoft Access Help
 
Forums: » Register « |  User CP |  Games |  Calendar |  Members |  FAQs |  Sitemap |  Support | 
 
User Name:
Password:
Remember me
Go Back   ASP Free ForumsDatabaseMicrosoft Access Help

Reply
Add This Thread To:
  Del.icio.us   Digg   Google   Spurl   Blink   Furl   Simpy   Y! MyWeb 
Thread Tools Search this Thread Rate Thread Display Modes
 
Unread ASP Free Forums Sponsor:
  #1  
Old December 10th, 2003, 10:57 AM
Ginzu3 Ginzu3 is offline
Registered User
ASP Free Newbie (0 - 499 posts)
 
Join Date: Aug 2003
Posts: 26 Ginzu3 User rank is Just a Lowly Private (1 - 20 Reputation Level) 
Time spent in forums: 34 m 47 sec
Reputation Power: 0
If *this* is not equal to *this*

The syntax would be If varOption_A <> varOption_B then
do this...

else

do this
end if

Right? How does this work when trying to query a DB? Same way? I am trying to pull info from a DB based upon if the criteria matches one another (in my case based upon dates). If today or tomorrow matches a day in the DB, it works. If it does not, or I happen to run out of dates altogethr, it gives me :
Error Type:
(0x80020009)
Exception occurred.
/Calendar/events.asp, line 26


According to line 26, this is what I have:
If rs("vardate")=varCalendar then


My code is as follows for those that could shed some light on what I am doing wrong.

Thanks.

G3

==Code==

Dim varCalendar
varCalendar=request.querystring("evtdate")


Dim DBConn,rs,strConn
Set DBConn = Server.CreateObject("ADODB.Connection")
Set rs= Server.CreateObject("ADODB.Recordset")
strConn="DSN=events"
DBConn.Open strConn

rs.open "Select * from tblevents where vardate=#" & request.querystring("evtdate") & "#", strConn,2, 3
If rs("vardate")=varCalendar then

response.write "Here's whats happening for "&varCalendar &"<br>"
While NOT rs.EOF
response.write rs("vardate") & " " & rs("event") & "<br>"
rs.movenext
wend
rs.close
dbconn.close
set rs = Nothing
set dbconn = nothing
else
response.write "Nothing to see here..."
rs.close
dbconn.close
set rs = Nothing
set dbconn = nothing

end if

Reply With Quote
  #2  
Old December 10th, 2003, 11:10 AM
sbaxter sbaxter is offline
Moderator: Access, SQL
ASP Free God (5000 - 5499 posts)
 
Join Date: Oct 2003
Posts: 5,126 sbaxter User rank is Corporal (100 - 500 Reputation Level)sbaxter User rank is Corporal (100 - 500 Reputation Level)sbaxter User rank is Corporal (100 - 500 Reputation Level)sbaxter User rank is Corporal (100 - 500 Reputation Level) 
Time spent in forums: 4 Days 1 h 2 m 51 sec
Reputation Power: 14
I can't say I know a lot about ASP, but about databases...


You don't need to check to see if rs("vardate")=varCalendar

The SQL statement eleminates the need for that, what you want to do is see if any records came back

Try this:

If NOT rs.EOF then

response.write "Here's whats happening for "&varCalendar &"<br>"
While NOT rs.EOF
response.write rs("vardate") & " " & rs("event") & "<br>"
rs.movenext
wend
rs.close
dbconn.close
set rs = Nothing
set dbconn = nothing

else

response.write "Nothing to see here..."
rs.close
dbconn.close
set rs = Nothing
set dbconn = nothing

end if

I don't know is NOT is proper syntax in ASP, but you get the idea,

S-

Reply With Quote
  #3  
Old December 10th, 2003, 11:24 AM
Ginzu3 Ginzu3 is offline
Registered User
ASP Free Newbie (0 - 499 posts)
 
Join Date: Aug 2003
Posts: 26 Ginzu3 User rank is Just a Lowly Private (1 - 20 Reputation Level) 
Time spent in forums: 34 m 47 sec
Reputation Power: 0
Thumbs up Right on

I shall give it a whack a bit later and fill you in as to whether it worked or not.

Thanks.

Reply With Quote
  #4  
Old December 10th, 2003, 11:30 AM
Ginzu3 Ginzu3 is offline
Registered User
ASP Free Newbie (0 - 499 posts)
 
Join Date: Aug 2003
Posts: 26 Ginzu3 User rank is Just a Lowly Private (1 - 20 Reputation Level) 
Time spent in forums: 34 m 47 sec
Reputation Power: 0
Thumbs up I love you

LOL.

Sbaxter...it worked. Thank you. I have been racking my brains out on this for the past .... few hours, and this simple line of code for the past 3 days. I am a newb and don't like asking for help until I am at this point.

Again, thank you SO very much.

Ginzu3

Reply With Quote
  #5  
Old December 10th, 2003, 11:41 AM
sbaxter sbaxter is offline
Moderator: Access, SQL
ASP Free God (5000 - 5499 posts)
 
Join Date: Oct 2003
Posts: 5,126 sbaxter User rank is Corporal (100 - 500 Reputation Level)sbaxter User rank is Corporal (100 - 500 Reputation Level)sbaxter User rank is Corporal (100 - 500 Reputation Level)sbaxter User rank is Corporal (100 - 500 Reputation Level) 
Time spent in forums: 4 Days 1 h 2 m 51 sec
Reputation Power: 14
Glad to help!
S-

Reply With Quote
Reply

Viewing: ASP Free ForumsDatabaseMicrosoft Access Help > If *this* is not equal to *this*


Thread Tools  Search this Thread 
Search this Thread:

Advanced Search
Display Modes  Rate This Thread 
Rate This Thread:


Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

vB code is On
Smilies are On
[IMG] code is On
HTML code is Off
View Your Warnings | New Posts | Latest News | Latest Threads | Shoutbox
Forum Jump





 Free IT White Papers!
 
Create the Optimal Architecture for your Critical Applications
Warburton's the largest independently owned bakery in the UK faced a number of difficult challenges in providing the most robust yet efficient IT infrastructure for their organization's success. IBM's services combined with their xSeries servers created the perfect platform for their SAP environment with sufficient flexibility, and did so in very time effective fashion.

 
Five Best Practices for Deploying a Successful Service-Oriented Architecture
This white paper describes the benefits you can expect with SOA, and how IBM can help take your business there.

 
Gartner Magic Quadrant for Application Delivery Controllers
Gartner summarizes its view on Application Delivery Controllers, evaluates strengths and weaknesses of solutions, and provides Magic Quadrant reporting for a quick comparison across all vendors. Learn from Gartner how you can benefit from an all-in-one device like Citrix NetScaler that delivers the highest levels of availability, performance and security.

 
Knowledge is Power
What you don't know can hurt you, and is likely costing you money and increasing your security risks during an era of scarce resources. This white paper proposes six key strategies that enterprise security managers can use to improve their network defense posture.

 
Rationalizing the Multi-Tool Environment
The rationalized multi-tool approach is flexible, scalable and cost effective. It provides the necessary input to the IT service management business processes. It preserves prior investments in monitoring tools, empowers technologists to select the best tools with which to do their jobs, and enhances effective response to incidents.

 

Forums: » Register « |  User CP |  Games |  Calendar |  Members |  FAQs |  Sitemap |  Support | 
  
 





© 2003-2010 by Developer Shed. All rights reserved. DS Cluster 7 Hosted by Hostway
For more Enterprise Application Development news, visit eWeek