vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
TOP-Angebot: 17 bzw. 24 Entwickler-Vollversionen zum unschlagbaren Preis!  
 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

Fortgeschrittene Programmierung
Verzwickte Abfrage 
Autor: Timo Prestel
Datum: 11.06.03 09:26

Private Sub delete()

Dim daoDB36 As Database
Dim dbPath As String
Dim strSQL As String
dbPath = "d:\Telefon.mdb"
On Error Resume Next 'geht bei Fehler weiter
Set daoDB36 = DBEngine(0).OpenDatabase(dbPath)
strSQL = "UPDATE Alcatel SET Alcatel.NST='' WHERE NST ='" & Text1.Text & "';"

End If
daoDB36.Execute (strSQL)
daoDB36.Close

End Sub

Private Sub Command1_Click()
delete

End Sub


Hallo erst mal

Mit der oben aufgeführten Abfrage würde ich gerne noch zwei Dinge mehr tun.

1.) Zugriff auf eine 2. Tabelle (FNT) in der Datenbank Alcatel die NST löschen
2.) Mit dem Löschvorgang der NST sollte das Text1.Text seinen eingetragen Wert wieder verlieren.Was ich zwar schon probiert habe aber nicht klappt.

Vielen Dank schon für eure Hilfe

Gruß Timo
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Verzwickte Abfrage177Timo Prestel11.06.03 09:26
Re: Verzwickte Abfrage423JOMA11.06.03 09:41
Re: Verzwickte Abfrage81Timo Prestel11.06.03 10:36
Re: Verzwickte Abfrage436JOMA11.06.03 10:46
Re: Verzwickte Abfrage99bfritz11.06.03 14:40
Re: Verzwickte Abfrage424JOMA11.06.03 14:53
Re: Verzwickte Abfrage109Timo Prestel11.06.03 16:23

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