"Rysiek" <ri******@neostrada.pl> wrote in message
news:20*********************@vector.linux.vnet...
O
I'm afraid I don't know anything about php. Is this running on
Windows? If so, you should be able to use an ADO connection without
needing any dsn file.
As I don't know anything about access :) It's all done under
Windows. Anyway it seems not to be a problem with php. When I try for
example to compact database (on system DSN tab there's a option to do
this), I receive the same error.
Hmm, "ADO connection" could you in short describe this ?
But anyway, did you try removing the database password? (hopefully
you believe me that it should be removed)
Of course I believe, but I'm not allowed do this. I've got access to
this *.mdb file "as is".
Dobrze.
If you are running Windows, you can create a plain text file with note pad
and cut and paste the code below. Change the username, passwords and file
locations, then close and save the file as TestMe.vbs and then run it by
double-clicking it.
This will verify that you really do have the right details. Once you have
done this test, you can move on to changing the code to do some useful work
with the database - such as reading or updating the data.
' **** Code Starts *******
Option Explicit
If TestDb()=0 Then
MsgBox "I can connect"
Else
MsgBox "I cannot connect"
End If
Function TestDb()
On Error Resume Next
Dim cnn
Dim strConn
Dim strSQL
Dim lngReturn
lngReturn=1
strConn = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=C:\MyFolder\Database.mdb;" & _
"Jet OLEDB:System Database=C:\MyFolder\Workgroup.mdw;" & _
"User Id=MyLoginName;Password=MyPassword;" & _
"Jet OLEDB:Database Password=DatabasePassword;"
Set cnn = CreateObject("ADODB.Connection")
cnn.Open strConn
If Not cnn Is Nothing Then
If cnn.State > 0 Then
lngReturn=0
cnn.Close
End If
Set cnn = Nothing
End If
End Function
' **** Code Ends *******
