Solved

Data Grid Wizard generated code won't compile

Posted on 2004-05-01
4
275 Views
Last Modified: 2013-12-25
I have an application that I have a datagrid in that I generated with the Wizard.  The application compiled and ran fine from within VB.  I then packaged and deployed my application and installed it on my computer.  Now when I run it from within VB this code won't compile:

Private Sub datPrimaryRS_MoveComplete(ByVal adReason As ADODB.EventReasonEnum, ByVal pError As ADODB.Error, adStatus As ADODB.EventStatusEnum, ByVal pRecordset As ADODB.Recordset)
  'This will display the current record position for this recordset
  datPrimaryRS.Caption = "Record: " & CStr(datPrimaryRS.Recordset.AbsolutePosition)
End Sub

Private Sub datPrimaryRS_WillChangeRecord(ByVal adReason As ADODB.EventReasonEnum, ByVal cRecords As Long, adStatus As ADODB.EventStatusEnum, ByVal pRecordset As ADODB.Recordset)
  'This is where you put validation code
  'This event gets called when the following actions occur
  Dim bCancel As Boolean

  Select Case adReason
  Case adRsnAddNew
  Case adRsnClose
  Case adRsnDelete
  Case adRsnFirstChange
  Case adRsnMove
  Case adRsnRequery
  Case adRsnResynch
  Case adRsnUndoAddNew
  Case adRsnUndoDelete
  Case adRsnUndoUpdate
  Case adRsnUpdate
  End Select

  If bCancel Then adStatus = adStatusCancel
End Sub

I believe the first method is just to put the record number in the caption of the ADODC and the second is just an empty template.

The error message I get is "Compile error.  Procedure declaration does not match description of event or procedure having the same name."

I don't think I made any changes in my code since I packaged and deployed it.

My questions are:

1.  Does it sound like I did something wrong in the packaging, deploying and installing process or does it sound like I made a change and didn't realize it?

2.  If it is was caused by the packaging, deploying and installing process, what can I do?

3.  If it sounds like I accidentally made a change to my code, what does that error message mean?

4.  Can I just comment out that code?

5.  Why am I being punished?  (No, just kidding)
0
Comment
Question by:NevaB
4 Comments
 
LVL 9

Expert Comment

by:p_sie
ID: 10968934
Do you get an error message at a specific line?
What does Run with full compile do (CTRL + F5) ?

Did you install an upgrade of ADO?
0
 

Author Comment

by:NevaB
ID: 10973463
I figured it out by myself.  I had to go into Project, References and uncheck the MS ActiveX Data Objects Library 2.0 and click the version 2.7

Evidently when I used the VB Package and Deploy wizard it screwed me up.  
0
 

Accepted Solution

by:
PashaMod earned 0 total points
ID: 11015201
Closed, 250 points refunded.
PashaMod
Community Support Moderator
0

Featured Post

Highfive Gives IT Their Time Back

Highfive is so simple that setting up every meeting room takes just minutes and every employee will be able to start or join a call from any room with ease. Never be called into a meeting just to get it started again. This is how video conferencing should work!

Join & Write a Comment

I’ve seen a number of people looking for examples of how to access web services from VB6.  I’ve been using a test harness I built in VB6 (using many resources I found online) that I use for small projects to work out how to communicate with web serv…
I was working on a PowerPoint add-in the other day and a client asked me "can you implement a feature which processes a chart when it's pasted into a slide from another deck?". It got me wondering how to hook into built-in ribbon events in Office.
Get people started with the process of using Access VBA to control Excel using automation, Microsoft Access can control other applications. An example is the ability to programmatically talk to Excel. Using automation, an Access application can laun…
Get people started with the utilization of class modules. Class modules can be a powerful tool in Microsoft Access. They allow you to create self-contained objects that encapsulate functionality. They can easily hide the complexity of a process from…

760 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

20 Experts available now in Live!

Get 1:1 Help Now