vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Top-Preis! AP-Access-Tools-CD Volume 1  
 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

Visual-Basic Einsteiger
Re: DB-Problem... 
Autor: VisualNeewbie
Datum: 17.06.03 14:08

hallo nochmal!
so sieht mein Quellcode aus:

Private Sub cmd_save_Click()

Dim nCount As Integer

Main_frm.Adodc1.Recordset = ("SELECT * FROM Firm_Dat WHERE Name = '" & text_visitor_company.Text & "';")
nCount = Main_frm.Adodc1.Recordset.RecordCount

If nCount <> 0 Then
MsgBox "Die Firma ist noch nicht angelegt, sie müssen eine neue Anlegen!", vbOKOnly
End If

'With Main_frm.Adodc1.Recordset
'.AddNew
' If Me.text_visitor_company <> "" Then ![Firma] = Me.text_visitor_company.Text
' If Me.text_visitor_name <> "" Then ![Pers_dat.Name] = Me.text_visitor_name.Text
' If Me.text_visitor_first_name <> "" Then ![Vorname] = Me.text_visitor_first_name.Text
' If Me.text_visitor_time <> "" Then ![Ankunftszeit] = Me.text_visitor_time.Text
' If Me.text_visitor_title <> "" Then ![Titel] = Me.text_visitor_title.Text
' .Update
' Main_frm.DataGrid1.ReBind
' Main_frm.DataGrid1.Refresh
'End With

End Sub

Da kommt immer "Ungültige Verwndung einer Eigenschaft" ARGHH, bitte, ich brauche hilfe...
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
DB-Problem...225VisualNeewbie17.06.03 08:08
Re: DB-Problem...328Sina17.06.03 08:57
Re: DB-Problem...63Richie17.06.03 10:08
Re: DB-Problem...56VisualNeewbie17.06.03 10:28
Re: DB-Problem...56VisualNeewbie17.06.03 14:08
Re: DB-Problem...49VisualNeewbie18.06.03 08:30
Re: DB-Problem...331ModeratorDieter18.06.03 09:14
Das geht so nicht!331Dietmar18.06.03 09:20
Re: Das geht so nicht!49VisualNeewbie19.06.03 08:27

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