Forum



      Marina
     
      VBScript und Eingabeabfrage auf Access-DZS (HTM)
      Hallo,

ich bin Neuling in VBScript und kenn mich auch nicht wirklich mit der Microsoft-Entwicklungsumgebung aus.

Meine Problem:
Ich habe eine DZS (=Datenzugriffsseite - hat im Header leider nicht komplett reingepasst ;) ) in Access erstellt und möchte eine Abfrage auf die aktuellen, vom Benutzer eingegebenen Daten machen.

Ein Formular habe ich bereits erstellt mit der Abfrage, die auch funktioniert. Nur möchte ich nun eine Datenzugriffsseite, damit man bei der Eingabe nicht immer die DB und dann das Formular aufmachen muss.

Hier der Code vom Formular:

Private Sub RgNr_AfterUpdate()
Dim rs As DAO.Recordset
Set rs = CurrentDb().OpenRecordset("Auslagen", dbOpenDynaset)
rs.FindFirst "[RgNr] = '" & RgNr.Text & "'"
If Not rs.NoMatch Then
    MsgBox ("gleiche Rg-Nr. gefunden")
    If rs![Vorsatz RgNr] = Vorsatz_RgNr.Value Then
        MsgBox ("gleichen Vorsatz gefunden")
        If rs![Auftragsnummer] = Auftragsnummer.Value Then
        MsgBox ("Achtung! Die eingegebene Rechnung gibt es bereits in der Datenbank.")
    End If
Else
MsgBox ("weiter keine Übereinstimmungen gefunden")
End If
rs.Close
Set rs = Nothing
End If
End Sub


Ich hoffe auf Eure Hilfe! Indifferent [:|] Vielen Dank im voraus, Marina
       
      Mein Statement


Weitere Infos und Hilfestellungen bekommt
Ihr auch bei den folgenden Mailinglisten:
0 VB 6 - Mailingliste
0 VB.net - Mailingliste