Top-Themen

Aktuelle Themen (A bis Z)

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

gelöst Vba Fehler access 2003

Mitglied: iwi121

iwi121 (Level 1) - Jetzt verbinden

15.06.2010, aktualisiert 12:14 Uhr, 3892 Aufrufe, 7 Kommentare

Hallo zusammen, suche vba hilfe und komme nicht weiter... ich habe ein code einprogrammiert und bekomme immer die Fehlermeldung --> zwei parameter erwartet zuwenig parameter übergeben. die Felder sind mit Inhalt gefüllt , geprüft mit --> Debug.Print SQL... was mache ich verkehrt? hier mein code

01.
Private Sub speichern_Click() 
02.
On Error GoTo Err_speichern_Click 
03.
 
04.
Me.lblTest = Me.Liste2.Column(0) 
05.
Me.lblTest2 = Me.Liste2.Column(1) 
06.
Set db = CurrentDb 
07.
    SQLstr = "INSERT INTO Zwsp_Soll_SonstSchulung([Nachname], [Zuname]) " & _ 
08.
             "VALUES (" & Me.Liste2.Column(0) & ", " & Me.Liste2.Column(1) & " )" 
09.
    MsgBox SQLstr, vbOKOnly 
10.
    If MsgBox("Sollen die Daten wirklich in der Tabelle angelegt werden?", _ 
11.
              vbYesNo + vbQuestion) = vbYes Then 
12.
        Debug.Print SQL 
13.
        CurrentDb.Execute SQLstr 
14.
      Else 
15.
        Exit Sub 
16.
    End If 
17.
Me.Liste6.Requery 
18.
 
19.
Exit_speichern_Click: 
20.
    Exit Sub 
21.
 
22.
Err_speichern_Click: 
23.
    MsgBox Err.Description 
24.
    Resume Exit_speichern_Click 
25.
     
26.
End Sub
[Edit Biber] Codeformatierung, [/Edit]
Mitglied: Tsocin
15.06.2010 um 11:53 Uhr
Ist es möglich, dass deine Werte in Column(0) oder Column(1) ein Sonderzeichen enthalten? Probleme dürften ' und " machen.
Bitte warten ..
Mitglied: Biber
15.06.2010 um 12:20 Uhr
Moin iwi121,

was hättest du denn an Debug.Print's Stelle ausgegeben anstatt einen Fehler?
Hättest du dir eine Variable "SQL" aus dem Reservekanister eingeschenkt?

Grüße
Biber
Bitte warten ..
Mitglied: iwi121
15.06.2010 um 12:27 Uhr
Nein es sind keine Sonderzeichen... einfacher Text .... z.b. Column(0)=Schmidt und Column(1)=Ingo .....
ich glaube , das ich die zwei (" & Me.Liste2.Column(0) & ", falsch anspreche.
Gebe ich als VALUES 'D' ein, wird diese auch übergeben.... aber mit
VALUES (" & Me.Liste2.Column(0) & ", " & Me.Liste2.Column(1) & " )
klappt es nicht.
Hast du da eine Idee?
Danke im voraus.. Gruß Ines
Bitte warten ..
Mitglied: iwi121
15.06.2010 um 12:30 Uhr
bin eben ein Anfänger
aber mit ner zündenden Idee kannst du auch nicht aufwarten , oder ???

Grüße Ines
Bitte warten ..
Mitglied: Biber
15.06.2010 um 14:19 Uhr
Moin iwi121,

selbst an die Zeiten, in denen mir noch zündende ideen kamen, kann ich mich nur noch vage erinnern...

Wenn du meinst, es kann unmöglich an der nicht definierten Variable "SQL" liegen,
und es würde problemlos laufen, wenn du als Values 'D' eingibst..... hmm.
Okay, Anfängerglück.

Ohne auf dieses Glück zu vertrauen würde ich dennoch versuchen, diese Sollbruchstelle etwas systematischer einzukreisen.

1) Bitte gib doch die beiden "Me.Liste2.Column(0)" und...(1)-Werte auch per Debug.Print aus
2) -oder- Poste mal den erzeugten "SQLStr"... wir haben doch nichts davon, wenn der bei dir in einer MsgBox steht.
-3) Prüfe noch mal nach, ob hinter dem Zeilentrenn-Unterstrich in Zeile 10 auch tatsächlich das erforderliche Leerzeichen steht. der kann es nicht sein

4) Unabhängig vom Fehler Zähl mal durch, wie viele Variable du initialisierst/Werte zuweist und wie viele du davon verwendest.

Grüße
Biber
Bitte warten ..
Mitglied: Bolle97
15.06.2010 um 17:07 Uhr
Hallo,

ändere Zeile 8 wie folgt
01.
"VALUES ("' & Me.Liste2.Column(0) & "', '" & Me.Liste2.Column(1) & "' )" 
Die beiden Variablen sind alphanumerische Werte, die Du noch in einfache Hochkomma "einpacken" musst.

Gruß René
Bitte warten ..
Mitglied: iwi121
16.06.2010 um 09:42 Uhr
Hallo Bolle97,

das war die Lösung . Vielen Dank . Das Problem hat mich zwei Tage Nerven gekostet ... nu nimmer ...
also vielen Dank und schöne Woche noch ...

Grüße Ines
Bitte warten ..
Ähnliche Inhalte
Datenbanken
ACCESS 2010 Datum über vba
gelöst Frage von CrashOverDatenbanken4 Kommentare

Hallo an Alle, ich habe da eine Frage, ich habe eine Access Datenbank einwickelt, und bin an einem Phänomen ...

VB for Applications
Access 2010 vba Recordset
gelöst Frage von EUuserVB for Applications3 Kommentare

Hallo zusammen, ich arbeite seit langem mal wieder mit Access und vba: Ich habe eine Datenbank, zwei Tabellen (identisch ...

Microsoft Office
Kreuztabelle Access + VBA Code
Frage von Dr.CornwallisMicrosoft Office7 Kommentare

Hallo zusammen, ich habe eine Kreuztabelle aus einer Query erzeugt, aus dieser entsteht wiederum ein Bericht, nun habe ich ...

VB for Applications
Umkreissuche mit Access 2013 VBA
gelöst Frage von evolutionVB for Applications11 Kommentare

Hallo, ich bin auf der Suche nach einer Anleitung zur Umkreissuche mit Access 2013. Wir haben hier von der ...

Neue Wissensbeiträge
Windows 10

USB Maus und Tastatur versagen Dienst unter Windows 10

Erfahrungsbericht von hardykopff vor 15 StundenWindows 103 Kommentare

Da steht man ziemlich dumm da, wenn der PC sich wegen fehlender USB Tastatur und Maus nicht bedienen lässt. ...

Administrator.de Feedback
Update der Seite: Alles zentriert
Information von Frank vor 18 StundenAdministrator.de Feedback14 Kommentare

Hallo User, die größte Änderung von Release 5.8 ist das Zentrieren der Webseite (auf großen Bildschirmen) und ein "Welcome"-Teaser ...

Humor (lol)

WhatsApp-Nachrichten endlich auch per Bluetooth versendbar

Information von BassFishFox vor 1 TagHumor (lol)4 Kommentare

Genau darauf habe ich gewartet! ;-) Der beliebte Messaging-Dienst WhatsApp erhält eine praktische neue Funktion: Ab dem nächsten Update ...

Google Android

Googles "Android Enterprise Recommended" für Unternehmen

Information von kgborn vor 2 TagenGoogle Android3 Kommentare

Hier eine Information, die für Administratoren und Verantwortliche in Unternehmen, die für die Beschaffung und das Rollout von Android-Geräten ...

Heiß diskutierte Inhalte
Server-Hardware
Welche Rolle spielt Design bei Enterprise IT Hardware?
Frage von ApolloXServer-Hardware17 Kommentare

Ich arbeite für einen internationalen Elektronikhersteller in der Forschung und meine Aufgabe ist es, Feedback von Nutzern in Hinsicht ...

Windows Netzwerk
WSUS4 und Windows 10 Updates automatisch installieren
Frage von sammy65Windows Netzwerk15 Kommentare

Hallo miteinander, ich habe mit einen neuen WSUS Server aufgesetzt Server 2016 darauf einen aktuellen WSUS. Grund, wir stellen ...

Speicherkarten
Vergessliche USB-Sticks?
Frage von hanheikSpeicherkarten14 Kommentare

Ich habe in den letzten Tagen 500 USB-Sticks mit Bilddateien bespielt. Obwohl ich die Dateien mit größter Sorgfalt kopiert ...

Hyper-V
Hyper-V mit altem XEON-Server. Was ist falsch?
Frage von LollipopHyper-V11 Kommentare

Hallo Bin etwas frustriert. Kleinbetrieb, ca. 15 PC's, 2 Stk. Server mit einigen virtuellen PC's für Fernwartung, VaultServer für ...