Database Access

martedì 06 luglio 2004 - 17.01

Elenco Threads

Stanze Forum

Aggiungi ai Preferiti

Cerca nel forum

AntCiar Profilo | Expert

936 messaggi | Data Invio: mar 6 lug 2004 - 17:01

Avrei bisogno di connettermi ad un database di access crittografato che utilizza un .MDW per l'accesso. Impostando i parametri all'interno della creazione guidata della OLEdbConnection, non riesco ad accedere al database (ho usato Microsoft JET 4.0 come provider)
Come posso fare?
Grazie
Ciao

Brainkiller Profilo | Guru

7.999 messaggi | Data Invio: mar 6 lug 2004 - 17:04

Fornisci la ConnectionString che ti ha creato ed eventualmente l'errore durante la connessione.

Crittografato cosa significa ?

ciao
david

AntCiar Profilo | Expert

936 messaggi | Data Invio: mar 6 lug 2004 - 17:16

Non sono riuscito a creare la connection perchè mi da questo errore:

Impossibile effettuare la connessione al database. Impossibile avviare l'applicazione. Il file di informazioni sul gruppo di lavoro è mancante o aperto in modalità esclusiva da un altro utente.

Il file file del gruppo di lavoro, ossia il .Mdw è chiuso

Per aprire il database uso un file di collegnamendo nel quale è inserita come destinazione questa stringa:

"C:\Programmi\Microsoft Office\OFFICE11\MSACCESS.EXE" "C:\EC\ECGestLab\EcGest.mdb" /WRKGRP "C:\EC\ECGestLab\Protetto.mdw"

pecos81 Profilo | Junior Member

68 messaggi | Data Invio: mer 7 lug 2004 - 17:02

Ciao, fai così;

Public DBS As New OleDb.OleDbConnection
Public strcnn As String

Public Function OpenAccessDBConnection()
'-----Impostazione della connessione al Database------------
Dim dirdb As String
Dim dirmdw As String

dirdb = Application.StartupPath & "\db\db.mdb"
dirmdw = Application.StartupPath & "\db\file.mdw"

strcnn = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & dirdb & ";Jet OLEDB:System Database=" & _
dirmdw & ";User Id=" & utente & ";Password=" & password

DBS.ConnectionString = strcnn

Try
DBS.Open()

Catch exc As Exception
If Err.Number = 5 Then 'user o password errati
MessageBox.Show(exc.Message, "programma", MessageBoxButtons.OK, MessageBoxIcon.Error)
Else
Errore(exc)
End If
DBS.Close()
Return False
' End
End Try
Return True
'-----Connessione al db effettuata----------
End Function

Torna su

Stanze Forum

Elenco Threads

Partecipa anche tu! Registrati!

Hai bisogno di aiuto ?
Perchè non ti registri subito?

Dopo esserti registrato potrai chiedere
aiuto sul nostro Forum oppure aiutare gli altri

Consulta le Stanze disponibili.

Registrati ora !