/ Forside / Teknologi / Udvikling / VB/Basic / Nyhedsindlæg
Login
Glemt dit kodeord?
Brugernavn

Kodeord


Reklame
Top 10 brugere
VB/Basic
#NavnPoint
berpox 2425
pete 1435
CADmageren 1251
gibson 1230
Phylock 887
gandalf 836
AntonV 790
strarup 750
Benjamin... 700
10  tom.kise 610
Fejl : Current provider does not support t~
Fra : Søren Altmann


Dato : 13-09-02 09:57

Hej NG,

Jeg får - uvist af hvilken årsag - ovenstående fejl når jeg forsøger at
sætte et index i VB.NET mod en MS Access 2002 database.

Kan nogen hjælpe mig ? Min rutine står nedenfor... messageboxen returnerer
false - skulle gerne være true.

// Søren

Sub OpenDatabase()

Dim sDatabaseName As String
Dim rstTable as ADODB.RecordSet

sDatabaseName = Application.StartupPath & "\database.mdb"

rstTable.Open("Table", "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source="
& sDatabaseName & ";" & "user id=admin;password=;",
ADODB.CursorTypeEnum.adOpenKeyset, ADODB.LockTypeEnum.adLockOptimistic)

MsgBox(recWeek.Supports(ADODB.CursorOptionEnum.adIndex))

End Sub



 
 
Søren Altmann (15-09-2002)
Kommentar
Fra : Søren Altmann


Dato : 15-09-02 20:18

Ingen hjælp ??

Snøft..

// Søren


"Søren Altmann" <soren@altmann.dk> wrote in message
news:3d81a8f9$0$169$edfadb0f@dspool01.news.tele.dk...
> Hej NG,
>
> Jeg får - uvist af hvilken årsag - ovenstående fejl når jeg forsøger at
> sætte et index i VB.NET mod en MS Access 2002 database.
>
> Kan nogen hjælpe mig ? Min rutine står nedenfor... messageboxen returnerer
> false - skulle gerne være true.
>
> // Søren
>
> Sub OpenDatabase()
>
> Dim sDatabaseName As String
> Dim rstTable as ADODB.RecordSet
>
> sDatabaseName = Application.StartupPath & "\database.mdb"
>
> rstTable.Open("Table", "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data
Source="
> & sDatabaseName & ";" & "user id=admin;password=;",
> ADODB.CursorTypeEnum.adOpenKeyset, ADODB.LockTypeEnum.adLockOptimistic)
>
> MsgBox(recWeek.Supports(ADODB.CursorOptionEnum.adIndex))
>
> End Sub
>
>



Peter Lykkegaard (15-09-2002)
Kommentar
Fra : Peter Lykkegaard


Dato : 15-09-02 20:22

Som svar på skriblerier forfattet af Søren Altmann

> Ingen hjælp ??

Jeg skal da gerne give et forsøg
>
> Snøft..

Men jeg bruger ikke VB dotNET

>> rstTable.Open("Table", "Provider=Microsoft.Jet.OLEDB.4.0;"...

Det er Access 2000 provideren

>> MsgBox(recWeek.Supports(ADODB.CursorOptionEnum.adIndex))

Er du sikker på at Access 2002 supporterer indexes via OLEDB/ADO?

mvh/Peter Lykkegaard






Søren Altmann (17-09-2002)
Kommentar
Fra : Søren Altmann


Dato : 17-09-02 11:30

> >> rstTable.Open("Table", "Provider=Microsoft.Jet.OLEDB.4.0;"...
>
> Det er Access 2000 provideren
Hmmm.. Hvad skulle den hedde til Access 2002 ?


> >> MsgBox(recWeek.Supports(ADODB.CursorOptionEnum.adIndex))
> Er du sikker på at Access 2002 supporterer indexes via OLEDB/ADO?

Ja, det gør den ihvert fald når jeg bruger VB6, med identisk kode...

Jeg er gået i en anden retning nu: System.Data.OleDb

Men det ville nu være nemmere at gøre som man plejer

// Søren



Søg
Reklame
Statistik
Spørgsmål : 177552
Tips : 31968
Nyheder : 719565
Indlæg : 6408847
Brugere : 218887

Månedens bedste
Årets bedste
Sidste års bedste