Erro Windows 98 - Vb com Firebird

Estou fazendo uma aplicação VB 6 com Firebird 1.5 utilizando o driver IbOleDb para conexão com o banco..No windows XP funciona perfeitamente, inclusive client x server, porém ao executar no windows 98, depois de ter rodado o pacote de instalação o sistema emite a seguinte mensagem abaixo quando tenta criar o objeto para ativar a conexão e executar o sql Run-time error '13' Type MismatchConexão (Sem problemas)Db.ConnectionString = "Provider=IbOleDb;Data Source= " & caminho & "siag.gdb" Password = ReadINI("Geral", "Password", App.Path & "\Info.ini") Usuario = ReadINI("Geral", "User", App.Path & "\Info.ini") Db.Open , Usuario, PasswordRotina para execução de sql O sistema emite o erro ao tentar executar a linha abaixo: Set Rs = CreateObject("ADODB.Recordset") Set Rs.ActiveConnection = Db Rs.CursorLocation = adUseClient ' adUseServer ' adUseClient com firebird Rs.CursorType = adOpenStatic Rs.LockType = adLockBatchOptimistic On Error Resume Next Rs.Open SqlAlguém passou por algo do tipo???