DevTrain Forum - Re: Anfängerfrage: Dim irgendwas As Database

Forum: Visual Basic | Thema: Re: Anfängerfrage: Dim irgendwas As Database | Von: G. Guest ( 12.03.2004 08:42)

		Sven, vielen Dank für den Tip. 

Vielleicht war meine Frage etwas unpräzise. Daher hier der Quelltext. Der Compiler meckert in der Zeile: "Dim tbArtikel As Database". Doch warum akzeptiert er die Deklaration in diesem Projekt nicht, in einem anderen aber tut er es mit gleichem Code.

Option Explicit
Dim tbArtikel As Recordset (WARUM MECKERT DER COMPILER HIER?) 
Dim mNum As Double
Dim mBez As String
Dim mLief As String
Dim mzeile As String

Private Sub Form_Load()
przListe
End Sub

Sub przListe()
Set tbArtikel = OpenDatabase("E:\vb6wm\MDB\Betrieb.mdb").OpenRecordset("Artikel")
tbArtikel.MoveFirst
Do While Not tbArtikel.EOF

mNum = tbArtikel!Num
mBez = tbArtikel!Bezeich
mLief = tbArtikel!Lief

mzeile = CStr(mNum) + "    " + CStr(mBez) + Space(10 - Len(mBez)) + CStr(mLief)
lstArtikel.AddItem mzeile
tbArtikel.MoveNext
Loop
End Sub

Dank und Gruß
Markus



	

Betreff Von Datum

Re: Anfängerfrage: Dim irgendwas As Database

ist das visaual Basic 6? und auch Viusal Studio weil die ADO geschichte in der das Recordset drinnen ist ist ja eine externe Komponente und NICHT Sprachbestandteil von VB Wenn nun die Referenz auf...

Hannes Preishuber 12.03.2004 09:25

Re: Anfängerfrage: Dim irgendwas As Database

Das ist schon VB 6.0. Was mich so verblüfft: in einem Projekt läuft dieser Quelltext, im anderen eben nicht! Irgendein Detail, irgendeine Eigenschaft oder was auch immer muss anders sein,...

G. Guest 12.03.2004 11:26

Re: Anfängerfrage: Dim irgendwas As Database

Hi, ich vermute mal ganz stark, dass du in deinem Projekt den Verweis auf die "Microsoft ActiveX DataObjects 2.X Library" nicht gesetzt hast. Das geht in VB6 im Hauptmenü unter...

Rainer Jeschor 12.03.2004 14:38

Antworten Vorsicht bei der Eingabe: Die Zeichen ' oder -- sind nicht erlaubt!