---

Hej alle.

Der er vel ikke en eller anden der kan gennemskue hvordan jeg får mit vb
prog. til at hente data fra en access97 database som er beskyttet mod
"pilfingre" med et password.

Jeg henter data fra databasen således:

Set WorkBase = OpenDatabase(App.Path & "\MyDB.mdb")
SQL = "Select * from Table1"
Set WorkRS1 = WorkBase.OpenRecordset(SQL)

WorkRS1.MoveFirst

While (Not WorkRS1.EOF)
Combo1.AddItem WorkRS1!Value1
WorkRS1.MoveNext
Wend

Hvordan er syntaksen hvis jeg vil hente data fra databasen med password
f.eks. "ABC" ?

Anyone ?

Mvh Neo

---

"Neo" <neo___dk@hotmail.removethis.com> skrev i en meddelelse
news:403e293c$0$148$edfadb0f@dtext02.news.tele.dk...
> Hej alle.
>
> Der er vel ikke en eller anden der kan gennemskue hvordan jeg får mit vb
> prog. til at hente data fra en access97 database som er beskyttet mod
> "pilfingre" med et password.
>
> Jeg henter data fra databasen således:
>
> Set WorkBase = OpenDatabase(App.Path & "\MyDB.mdb")
> SQL = "Select * from Table1"
> Set WorkRS1 = WorkBase.OpenRecordset(SQL)
>
> WorkRS1.MoveFirst
>
> While (Not WorkRS1.EOF)
> Combo1.AddItem WorkRS1!Value1
> WorkRS1.MoveNext
> Wend
>
> Hvordan er syntaksen hvis jeg vil hente data fra databasen med password
> f.eks. "ABC" ?
>
> Anyone ?
>
> Mvh Neo

Nå .. her var tydeligvis ikke meget hjælp at hente ...

Men jeg kan måske så hjælpe andre ved at skrive "løsningen" på problemet

Set WorkBase = OpenDatabase(App.Path & "\MyDB.mdb", False, False, "MS
Access;PWD=ABC")

Mvh Neo