Win98 vs WinXP

Hejsa!

Jeg har et lille program som jeg har lavet på en XP maskine, nu skal programmet køre på en Win98 maskine, men jeg kan ikke få den til at gemme/hente data fra den tilhørende access database, hvad gør jeg galt?

Jeg bruger flg kode:

Dim Conn As New Connection
Dim DBData As Recordset
Dim SQL As String

Function Open_Connection()
    Conn.Open "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & App.Path & "\DB.mdb", "Administrator", "ElData"
End Function
   
Function Close_Connection()
    Conn.Close
End Function

Private Sub Form_Load()
    Open_Connection
        SQL = "SELECT * FROM stat"
        Set DBData = Conn.Execute(SQL)
        While DBData.EOF = False
            Data1(DBData.Fields("ar").Value) = "X"
            Antal1 = Antal1 + 1
            DBData.MoveNext
        Wend
    Close_Connection
End Sub

Det virker fint på WinXP men ikke på Win98?