Hej! Set DB = OpenDatabase(vilkenFil) Du slår ihop katalogens sökväg med den fullständiga sökvägen till databasen. Testa att istället enbart skicka variabeln med den fullständiga sökvägen till OpenDatabase() funktionen: Tack för era snabba svar!OpenDatabase ...
Jag har en rad som ser ut såhär:
Set DB = OpenDatabase(App.Path & "\databas.mdb")
Jag har oxo en variabel vilkenFil (string) som innehåller denna sökväg:
"C:\temp\databas.mdb" (innehåller även kaninöronen)
nu vill jag byta ut "\databas.mdb" mot variaben vilkenFil
men om jag skriver:
Set DB = OpenDatabase(App.Path & vilkenFil)
så får jag error runtime 3055
not a valid file name
Vad gör jag för fel?Sv: OpenDatabase ...
Du har ju redan hela sökvägen, då behöver du inte App.Path
/JohanSv: OpenDatabase ...
<code>
Dim vilkenFil as String
vilkenFil = "C:\temp\databas.mdb"
Set DB = OpenDatabase(vilkenFil)
</code>
<br>
<br>
Om du vill strippa bort "-tecken använder du enklast Replace():
<code>
Dim vilkenFil as String
Dim CleanString as String
vilkenFil = """C:\temp\databas.mdb"""
CleanString = Replace(vilkenFil,"""","")
Set DB = OpenDatabase(CleanString)
</code>
<br>
<br>
Du kan oxå ploka ut strängen mellan första och sista tecknet:
<code>
Dim vilkenFil as String
Dim CleanString as String
vilkenFil = """C:\temp\databas.mdb"""
CleanString = Mid(vilkenFil,2,Len(vilkenFil)-2)
Set DB = OpenDatabase(CleanString)
</code>Sv: OpenDatabase ...
funkar perfa nu!
tack ska ni ha och fortsatt trevlig natt =)
/Christoffer