vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Blitzschnelles Erstellen von grafischen Diagrammen!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Allgemeine Diskussionen
SyntaxFehler ???!!! 
Autor: m@c
Datum: 14.08.01 15:44

Wo ist ist diesem Code der Fehler ?????
-----------------------------------------------------------------------------------
Option Explicit
Dim dbFile As String
Dim DB As Database
Dim Table As Recordset

Private Sub Command1_Click()
SearchKunde
End Sub

Private Sub Form_Load()
dbFile = "C:Eigene DateienMaschineWartungen.mdb"
Set DB = Workspaces(0).OpenDatabase(dbFile, False, False)
Set Table = DB.OpenRecordset("T_Wartung")
End Sub

Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyReturn Then SearchKunde
End Sub

Public Sub SearchKunde()
Table.Index = "Nr"
####### Hier kommt die Fehlermeldung: Datenbank Konventierungsfehler######
Table.Seek "=", Text1.Text
#################################################################
If Not Table.NoMatch Then
Text2.Text = Table("Art")

Else
MsgBox "Artikel nicht vorhanden"
End If
Set Table = Nothing
End Sub
---------------------------------------------------------------------

Danke Euch !!!!!!!!!!!!!!!!!!
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
SyntaxFehler ???!!!56m@c14.08.01 15:44
Re: SyntaxFehler ???!!!276unbekannt14.08.01 16:27
Re: SyntaxFehler ???!!!33m@c15.08.01 08:06

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel