Visual Basic Programming
 
Forums: » Register « |  User CP |  Games |  Calendar |  Members |  FAQs |  Sitemap |  Support | 
 
 
User Name:
Password:
Remember me
Go Back   ASP Free ForumsProgrammingVisual Basic Programming

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 June 7th, 2007, 02:08 PM
coco coco is offline
Registered User
ASP Free Newbie (0 - 499 posts)
 
Join Date: Jun 2007
Posts: 7 coco User rank is Just a Lowly Private (1 - 20 Reputation Level) 
Time spent in forums: 3 h 9 m 22 sec
Reputation Power: 0
Compile error:

Hi,

I just started using access this May so I apologize in advance for my basic questions.

My database is currently made of several forms, each form having its own table. I have linked each form with a previous and next button. I have also created a combo box for which each option (a specific form) will lead to the opening of the desired form and the closing of the current form. I have written the following code:

Private Sub Combo475_Click()
On Error GoTo Err_Combo475_Click:

Dim stDocName As String
Dim stLinkCriteria As String
DoCmd.Close
If (Combo475 = 1) Then
stDocName = "Background A"
DoCmd.OpenForm stDocName, , , stLinkCriteria
Else
If (Combo475 = 2) Then
stDocName = "Background B"
DoCmd.OpenForm stDocName, , , stLinkCriteria
Else
If (Combo475 = 3) Then
stDocName = "Background C"
DoCmd.OpenForm stDocName, , , stLinkCriteria
Else
If (Combo475 = 4) Then
stDocName = "Background D"
DoCmd.OpenForm stDocName, , , stLinkCriteria
Else
If (Combo475 = 5) Then
stDocName = "Background E"
DoCmd.OpenForm stDocName, , , stLinkCriteria
Else
If (Combo475 = 6) Then
stDocName = "Background F"
DoCmd.OpenForm stDocName, , , stLinkCriteria
Else
If (Combo475 = 7) Then
stDocName = "Background G"
DoCmd.OpenForm stDocName, , , stLinkCriteria
Else
If (Combo475 = 8) Then
stDocName = "Background H"
DoCmd.OpenForm stDocName, , , stLinkCriteria
End If
End If
End If
End If
End If
End If
End If
End If

Exit_Combo475_Click:
Exit Sub

Err_Combo_475_Click:
MsgBox Err.Description
Resume Exit_Combo475_Click:

End Sub

Problem: I keep getting a "Compile error: label not defined" message and the second line:
On Error GoTo Err_Combo475_Click:
is highlighted when this error message pops up.

Can someone tell me what is wrong with this line?

Thanks!

Reply With Quote
  #2  
Old June 8th, 2007, 12:30 AM
Doug G Doug G is offline
Grumpier Old Moderator
ASP Free God 11th Plane (10000 - 10499 posts)
 
Join Date: Sep 2003
Posts: 10,143 Doug G User rank is First Lieutenant (10000 - 20000 Reputation Level)Doug G User rank is First Lieutenant (10000 - 20000 Reputation Level)Doug G User rank is First Lieutenant (10000 - 20000 Reputation Level)Doug G User rank is First Lieutenant (10000 - 20000 Reputation Level)Doug G User rank is First Lieutenant (10000 - 20000 Reputation Level)Doug G User rank is First Lieutenant (10000 - 20000 Reputation Level)Doug G User rank is First Lieutenant (10000 - 20000 Reputation Level)Doug G User rank is First Lieutenant (10000 - 20000 Reputation Level) 
Time spent in forums: 3 Weeks 4 Days 23 h 57 m 26 sec
Reputation Power: 181
I may be remembering wrong, but I don't think you want to include the colon in this line
Code:
On Error GoTo Err_Combo475_Click:
__________________
======
Doug G
======
I didn't attend the funeral, but I sent a nice letter saying I approved of it. --Mark Twain

Reply With Quote
Reply

Viewing: ASP Free ForumsProgrammingVisual Basic Programming > Compile error:


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!
 
How to Present Effectively Online
This white paper offers practical and actionable advice on the key steps that any presenter should consider as they plan and execute a Webinar or online meeting.

 
Open Source Security Myths
Open Source Software (OSS) is computer software whose source code is available to the general public with relaxed or non-existent intellectual property restrictions (or arrangement such as the public domain), and is usually developed with the input of many contributors.

 
Power and Cooling Capacity Management for Data Centers
This paper describes the principles for achieving power and cooling capacity management.

 
Scalable, Fault-Tolerant NAS for Oracle - The Next Generation
For several years NAS has been evolving as a storage alternative for Oracle databases, and for good reason: NAS is quite often the simplest, most cost-effective storage approach for Oracle. Learn about the benefits that HP's approach to scalable NAS brings to Oracle environments in this comprehensive white paper.

 
Understanding Web Application Security Challenges
This white paper discusses many common threats and preventive measures for Web application security, and explains what you can do to help protect your organization.

 

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





© 2003-2009 by Developer Shed. All rights reserved. DS Cluster 1 hosted by Hostway
Stay green...Green IT