Lås en Access DB?

Du sætter et password på databasen... I Access.

funktioner -> sikkerhed ->angiv adgangskode til Database
- der står en masse om det i hjælpen til access - et godt søgeord i hjælpen er "password" eller "sikkerhed"

Det med at nagive et password i Access Databasen har jeg prøvet... det virkede ikke!

Den skriver:
Run-time error '-2147217843 (80040e4d)':
Programmet kan ikke startes. Arbejdsgruppeoplysningesfilen mangler eller er åbnet med udelt adgang af en anden bruger.

"den" skriver - hvad er den - Access eller VB
Hvad mener du med at det ikke virker - når du har sat password på, kan du så åbne den i access uden at angive password?

Den er når jeg prøver at kører mit VB program at den kommer med fejlen!

Jeg kan nemt lave et password i accessen, men kan ikke få VB til at åbne den!

Prøv lige at forklar hvad du har gjort.

Har du fået sat password på databasen? Og virker det, hvis du bruger databasen fra access?

Hvis det virker, så fortæl hvordan du connecter fra vb

og hvor fejlbeskedden komme...

Den kommer når jeg starter mit VB program

I hvilken linie

rsData.Open SQL, SQL_String

Hvor meget tror du ovenstående hjælper, når vi ikke kan se, hvad der står i SQL_string?

SQL_String = "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=db.mdb;Password=kurt"
Set rsData = New ADODB.Recordset
SQL = "SELECT distinct PipeDN from data"
rsData.Open SQL, SQL_String

Hurraaaa. Altså:

Du har en accessdatabase med et password. Den bruger du i et VB-program (ikke VBA). Koden er vist nedenfor. Når du kører VB-programmet, kommer følgende fejlbesked:

Run-time error '-2147217843 (80040e4d)':
Programmet kan ikke startes. Arbejdsgruppeoplysningesfilen mangler eller er åbnet med udelt adgang af en anden bruger.

Koden:

SQL_String = "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=db.mdb;Password=kurt"
Set rsData = New ADODB.Recordset
SQL = "SELECT distinct PipeDN from data"
rsData.Open SQL, SQL_String  '<-Her kommer fejlbeskeden


Havde du skrevet ovenstående fra starten, havde vi sparet 15 indlæg. Ikke et surt opstød, bare en opfordring til at bruge lidt tid på at beskrive hvad du skal have hjælp til, så andre gider og kan besvare dit spørgsmål.

Nå - db.mdb, er du sikker på at den ikke er åben i access mens du køre programmet? Læser du fejlbeskeden, tyder det på at den er åben

Ja.. det er jeg 100% sikker på at den ikke er.. åben altså!

Jeg har åbnet den med uddelt adgang, laver et password, og lukker den igen...

Kører mit VB program, og BANG... stopper den med fejlen!

Hmmm.
Mystisk - forstår ikek fejlbeskedden. Prøv den gode gamle "genstart" - måske er der en access-process der hænger et sted, og som blokerer. Efter genstat, så kør VB-programmet FØR du evt. åbner i access

ok

Nope.. virkede heller ikke!

Kan det være at der skal en bruger på osse???

Jeg synes fejlbeskeden indikerer, at der ikke er noget i vejen med din connectionstring, men at databasen er "optaget"

Jeg kan nemt åbne DB'en og trykke passwordet ind... og vupti så kører jeg Access... men jeg kan bare ikke åbne den via VB!

Det er jeg klar over.

Du kunne godt connecte før du satte password på?

Ja... selve programmet kørte fint inden!

Dvs hvis du fjerner passwordet, så virker det...

Nå - så er det msåke et spørgsmål om at sætte det i " eller ' - prøv at søg på eksperten, det er vist en masse steder hvordan

... eller sætte user på.

Nu har du to ens spørgsmål (dette og http://eksperten.dk/spm/589224)

Løsningen på begge spørgsmål står her:

http://eksperten.dk/spm/406507

PS: Søgemaskinen er din ven!

Nej... det er to forskellige programmer! Så det er ikke HELT samme spm! Og fejlen bliver heller ikke skrevet på samme måde!

Ja det virker fint på den ene... altså dette spm.. men jeg kan ikke ændrer i VB koden til det andet program!

Fint. Så luk dette.

Hvis du ikke kan ændre i koden i det andet spørgsmål hvordan vil du så kunne løse fejl?