-
Nov 18th, 2011, 10:51 PM
#1
Thread Starter
Member
[RESOLVED] run time error '2147467259(80004005)
I have the following error message
run time error '2147467259(80004005)
could not find installable ISAM when I running the following code
Private Sub Form_Load()
Dim s As String
Dim rsitem As New ADODB.Recordset
s = "provider =microsoft.jet.OLEDB.4.0;”"
DB.ConnectionString = s = s & "data source=\" & App.Path & "\InventoryControl1.mdb\"
DB.Open
End Sub
kindly try to help me
Thank's for all
fkwinna
-
Nov 18th, 2011, 11:25 PM
#2
Re: run time error '2147467259(80004005)
I think your Connection String should be:
Code:
DB.ConnectionString = s & "data source=" & App.Path & "\InventoryControl1.mdb"
you also need to establish DB as an ADODB.Connection
eg
Code:
Dim DB As ADODB.Connection
Set DB = New ADODB.Connection
-
Nov 18th, 2011, 11:33 PM
#3
Thread Starter
Member
Re: run time error '2147467259(80004005)
Dear Doogle
Thank you for your urgent reply,But I'm sorry , the problem still
I tried your statement but I get the same error,
I think that the error at MSACCESS2000
I tried to repaire it or reinstall but nothing happen
-
Nov 18th, 2011, 11:56 PM
#4
Re: run time error '2147467259(80004005)
Can you copy and paste your actual code please. There seems to be a typo in your Provider string
Code:
s = "Provider=Microsoft.Jet.OLEDB.4.0;"
-
Nov 19th, 2011, 01:06 AM
#5
Thread Starter
Member
Re: run time error '2147467259(80004005)
ok dear
the following is a copy from the project
module
Public DB As New ADODB.Connection
form_load
Dim s As String
Dim DB As ADODB.Connection
Set DB = New ADODB.Connection
Dim rsitem As New ADODB.Recordset
s = "provider =microsoft.jet.OLEDB.4.0;”"
DB.ConnectionString = s & "data source=" & App.Path & "\InventoryControl1.mdb"
DB.Open
-
Nov 19th, 2011, 01:31 AM
#6
Re: run time error '2147467259(80004005)
What's that strange character at the end of the provider string ? (the last character before the double quote at the end) It shouldn't be there.
-
Nov 19th, 2011, 03:53 AM
#7
Thread Starter
Member
Re: run time error '2147467259(80004005)
ok
it is mitype
but the problem is still
-
Nov 19th, 2011, 03:55 AM
#8
Re: run time error '2147467259(80004005)
The most common cause of the problem you are experiencing is a syntax error in the Connection string. Can you copy and past the code from your project so we can see exactly what it looks like. Thanks
-
Nov 19th, 2011, 04:23 AM
#9
Thread Starter
Member
Re: run time error '2147467259(80004005)
this is the code
Dim s As String
Dim DB As ADODB.Connection
Set DB = New ADODB.Connection
Dim rsitem As New ADODB.Recordset
s = "provider =microsoft.jet.OLEDB.4.0;"
DB.ConnectionString = s & "data source=" & App.Path & "\InventoryControl1.mdb"
DB.Open
-
Nov 19th, 2011, 05:46 AM
#10
Thread Starter
Member
Re: run time error '2147467259(80004005)
Dear Doogle
Thank's for your time and your truly assistance
my problem is solved by
1) uninstal Msaccess and visual basic
2) reinstall both of msaccess and visual basic 6
what the reasons ! I don't know
ok
thank's
fkwinna
-
Oct 22nd, 2017, 12:21 PM
#11
New Member
Re: run time error '2147467259(80004005)
HI,
As, I am getting "Mircosoft Visual Basic Run-time error '-2147467259 (80004005)". Could you please help me.
Sub DbConnection()
Dim cn As ADODB.Connection
Set cn = New ADODB.Connection
Dim rs As ADODB.Recordset
Dim StrConn As String
StrConn = "Driver = {oracle};server=XE;Database=system;UID=system;PWD=tiger"
cn.Open StrConn
cn.Close
Set cn = Nothing
MsgBox "Connected"
End Sub
Posting Permissions
- You may not post new threads
- You may not post replies
- You may not post attachments
- You may not edit your posts
-
Forum Rules
|
Click Here to Expand Forum to Full Width
|