Elite Veteran
Beiträge: 874
Ort: Wien | Donar68 - 23.05.2011
habe ich beim Durchlesen der Hilfe bei Access gelesen das man Daten in eine Tabelle via Textfeld machen kann
Private Sub InsertInto_Befehl7_Click()
...
Select As "[Form_Messgeräte Temperatur für Projekt] = INSERT INTO Projekt (reserviertfürProjekt,Projektnummer) VALUES "
'DoCmd.SetWarnings False
On Error Resume Next
DoCmd.RunSQL strSQL
'DoCmd.SetWarnings True
Donar
Naja, da steht sicher etwas anderes in der Hilfe, als du hier gecodet hast. ;-) Das sollte ca. so aussehen:
Dim strSQL As String
strSQL = "INSERT INTO Projekt (reserviertfürProjekt,Projektnummer) VALUES ('" & _
Forms![DeinFormular]![DeinTextfeld1] & "','" & Forms![DeinFormular]![DeinTextfeld2] & "')"
Currentdb.Execute strSQL, dbFailOnError
Falls sich die Schaltfläche "Befehl7" im selben Formular wie die Textfelder befindet, reicht statt Forms![DeinFormular]![DeinTextfeld1] auch der Bezug: Me![DeinTextfeld1]
Dieser Code fügt einen neuen Datensatz in die Tabelle "Projekt" ein und belegt die Felder "reserviertfürProjekt" und "Projektnummer" mit den Werten aus den Formularsteuerelementen "DeinTextfeld1" und "DeinTextfeld2". Wobei davon ausgegangen wird, dass diese beiden Tabellenfelder vom Typ Text sind.
Wenn der Code nicht funktioniert, dann stelle richtig, welche Objekt- und Feldnamen, Datentypen usw. du hast.
Du solltest ürigens generell keine Umlaute, Sonder- und Leerzeichen in Feld- und Objektnamen verwenden.
s.a. http://www.donkarl.com?FAQ1.5
----- Servus
Karl
*********
Access-Entwickler-Konferenz: https://www.donkarl.com/?aek - Jetzt anmelden für 19./20.10. in Nürnberg
Access DevCon Vienna: https://www.donkarl.com/devcon
Access Forever: https://www.accessforever.org
Access News: https://www.youtube.com/playlist?list=PLVCeBbJIMDvdJ8ghMbEakJ6_EQyvy... |