MS Access and other applications on VB6.0

Expand Post »

Hi! I have to problems regarding VB6.0 and Access and some other applications...

1. I can not open a database from access.

Dim mydb1 as Database
Dim myrs1 as Recordset

Set mydb1 = OpenDatabase("MyDatabase.mdb")
Set myrs1 = mydb1.OpenRecordset("student")

The error appears on the bold text.

It says either "Unrecognized database format..." or "Couldn't find file..."
I am sure that I typed the filename properly, that it is located in the same folder as my program/project and that it is created in MS Access.

2. I can not open an application using VB6.0

My code is simply

Private Sub CmdGo_Click()
Shell Text1.Text, vbNormalFocus
End Sub

The user types the path and the program runs it. The program works for all applications except one. There is a bot program in this PC and it doesn't seem to run/load when I use my VB program. The window pops for a second and then disappears. Are there limitations to which kinds/types of programs/applications VB can open/run/load? Hope you can help me. Thanks!

Similar Threads

create a query in access from vb6 in Visual Basic 4 / 5 / 6
I'm connected but cant access any sites or email in Web Browsers
MS Access vs. MySQL in MS Access and FileMaker Pro
Is it possible to display report in Visual Basic which is created in Microsoft Access in Visual Basic 4 / 5 / 6
VB6 Access error Please Please Help !!! in Visual Basic 4 / 5 / 6

xairylle

Reputation Points: 10

Solved Threads: 0

Newbie Poster

Offline

2 posts
since Feb 2007

Permalink

Feb 20th, 2007

Re: MS Access and other applications on VB6.0

well first you have to do is apply the references to Dao in the menu project -> references and selecting
Microsoft Dao 3.x Object Library then the code:

Dim MyDb1 as Dao.Database
Dim MyRs1 as Dao.Recordset

Set MyRs1 = Mydb1.OpenRecordset("student")
... well here the rest of your code for the query

then on the form load: (this is the first line runs so don`t forget, because this for open the database before to do the recordset!)
Set MyDb1 =OpenDatabase(App.path & "\MyDatabase.mdb")

remember save the project first and put the DB on the same diretory of your project , if you don't do `t no works because App.path get
C:\Archivos de programa\Microsoft Visual Studio\VB98 as default
am i guest your Bd is another place!

hiddenben

Reputation Points: 10

Solved Threads: 2

Newbie Poster

Offline

8 posts
since Feb 2007

Permalink

Feb 22nd, 2007

Re: MS Access and other applications on VB6.0

Make sure you have the latest drivers (think JET4.0) from microsoft.

Mr.Markt

Reputation Points: 10

Solved Threads: 0

Newbie Poster

Offline

6 posts
since Feb 2007

This thread is more than three months old

No one has posted to this discussion for at least three months. Please let old threads die and do not reply to them unless you feel you have something new and valuable to contribute that absolutely must be added to make the discussion complete. Otherwise, please start a new thread in this forum instead.

Previous Thread in Visual Basic 4 / 5 / 6 Forum Timeline: Writing function results

Next Thread in Visual Basic 4 / 5 / 6 Forum Timeline: Create accounts

DaniWeb Message

Cancel Changes

User Name
Password