Hejsan
Jag har ett program som kör en databas access 97 och eftersom jag har 2002 vill jag nu att den ska stödja det istället, hur ska jag göra för att få den att stödja 2002

Min kod ser ut så här idag
dbPath = App.Path & "\972.mdb"
' Input: DataBaseType
' 1 = SQL Server
' 2 = Accessdatabas (default)

' Retur: StartConnection
' True = Ok
' False = Något fel

Select Case DatabaseType

Case 1: ConStr = "PROVIDER=MSDataShape;Data PROVIDER=Microsoft.Jet.OLEDB.3.51;Data Source= " & dbPath
Case Else: ConStr = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=c:biblio.mdb;" & _
"Persist Security Info=False"
End Select

Vad behöver jag göra för att få den att stödja min ny 2002 db

Det skall inte vara någon skillnad i din kod vad jag vet!

Har du provar att uppdatera din access databas och kört din application?

Jag har gjort det och det funka.

japp har provat det, men då blir det fel på anslutningen

Hej
Ja är det underligt att man kräks över MS
Dom kan inte stava till BackCompabilitet,bar lura
på folk nytt "skit", glöm dom gamla användarna dom får
köpa nytt om dom vill hänga med. Kass !!!!

Tycker
Sven

Hmm. Tycker det ser lite skumt ut med en hårdkådat sökväg. Desutom är inte första strängen SQL Server:
<code>
dbPath = App.Path & "\972.mdb"
'dbserver = "Min SQL Server"
'dbNamn = "Min SQL Databas"

' Input: DataBaseType
' 1 = SQL Server
' 2 = Accessdatabas (default)

' Retur: StartConnection
' True = Ok
' False = Något fel

Select Case DatabaseType
Case 1
ConStr = "Provider=SQLOLEDB;" & _
"Data Source=" & dbServer & ";" & _
"Initial Catalog=" & dbNamn & ";
Case Else
ConStr = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & dbPath & ";" & _
"Persist Security Info=False"
End Select
</code>