Neuigkeiten:

Ist euer Problem gelöst, dann bitte den Knopf "Thema gelöst" drücken!

Mobiles Hauptmenü

Laufzeitfehler 13 Typen unverträglich

Begonnen von IchmagZüge, August 06, 2020, 11:30:44

⏪ vorheriges - nächstes ⏩

IchmagZüge

moin,
ja ich hab schon einige Posts zu dem Thema gesehen kann aber keinen davon so richtig für meine Situation verwenden.
ich habe das Problem dass ich eine errechnete Ticketnummer aus einem Formular in einer Tabelle Speichern will, dabei taucht immer wieder besagter laufzeitfehler 13 auf.

kann mir da so wer weiterhelfen?


Code:
Private Sub Befehl44_Click()
Dim Netzwerk



Set Netzwerk = CreateObject("wscript.network")

Chronik.Value = "  " & Day(Date) & "." & Month(Date) & "." & Year(Date) & "  " & Hour(Time) & ":" & Minute(Time) & " - Erstellung durch : " & Netzwerk.UserName
   
 
CurrentDb.Execute "INSERT INTO Ticket (Ticketnummer,Ersteller,Bearbeiter,Prio,Betroffener,Telefon,Gerät,Seriennummer,Bezug,Problembeschreibung,Chronik)
Values ('" + Me.Ticketnummer + "','" + Me.Ersteller + "','" + Me.Bearbeiter + "','" + Me.Priorität + "','" + Me.Betroffener + "','" + Me.Telefon + "','" + Me.Gerät + "','" + Me.Seriennummer + "','" + Me.Bezug + "','" + Me.Problembeschreibung + "','" + Me.Chronik + "')"
   
   
   
End Sub

DF6GL

Hallo,

schreib so:


   
.
.
.
Me!Chronik = Format(Now(), "dd.mm.yyyy  hh:nn") & " - Erstellung durch : " & Netzwerk.UserName

CurrentDb.Execute "INSERT INTO Ticket " & _
" (Ticketnummer,Ersteller,Bearbeiter,Prio,Betroffener,Telefon,Gerät,Seriennummer,Bezug,Problembeschreibung,Chronik) Values " & _
" ('" & Me!Ticketnummer & "','" & Me!Ersteller & "','" & Me!Bearbeiter & "','" & Me!Priorität & "','" & Me!Betroffener & "','" & Me!Telefon & _
"','" & Me!Gerät & "','" & Me!Seriennummer & "','" & Me!Bezug & "','" & Me!Problembeschreibung & "','" + Me!Chronik & "')"
.
.
Set Netzwerk =Nothing
.
.
   

Voraussetzung ist, dass alle aufgeführten Tabellenfelder den Datentyp TEXT haben.
Viele Grüße vom Bodensee
Franz, DF6GL

Hilfestellung:  http://www.access-o-mania.de/forum/index.php?topic=6969.msg118738#msg118738

Links und Tipps:
1.   http://v.hdm-stuttgart.de/~riekert/lehre/db-kelz/
1a. http://www.tinohempel.de/info/info/datenbank/normalisierung.htm
1b. https://support.office.com/de-de/article/Grundlagen-des-Datenbankentwurfs-eb2159cf-1e30-401a-8084-bd4f9c9ca1f5#bmterms
2.   http://www.donkarl.com
3.   https://web.archive.org/web/20201201233522/http://www.dbwiki.net/
4.   http://www.access-tutorial.de/
5.   http://www.tty1.net/smart-questions_de.htm
6.   http://access.joposol.com/accept

Last but not least:   < F1 > für Hilfe
;) Learning by doing not by spoon-feed ;)

Tipp: Find and Replace for Access

MzKlMu

Hallo,
das Vorhaben ist schlicht und ergreifend überflüssig. Man speichert in einer Datenbank keine berechneten Werte, das ist Fehleranfällig, weil Du immer sicher sein musst, dass der Wert auch geschreiben wird, auch wenn ein alter Datensatz geändet wird. Dann musst Du nämlich eine Aktualisierungsabfrage laufen lassen.

Soclche zusammengesetzten Werte werden immer bei Bedarf per Abfrage ermittelt und angezeigt, aber nicht gespeichert.
Gruß Klaus

IchmagZüge

@MzKlMu da der Berechnete Wert die Ticketnummer ist ist die Speicherung (zumindest in meinem gedankenspiel) sehr wohl notwendig aber danke für den hinweis, ich schau ob ich da ne bessere lösung finde


@DF6GL hab das noch etwas angepasst weil n anderer fehler kam aber jetzt Funktioniert es also dankesehr für die schnelle hilfe

MzKlMu

Hallo,
Zitatda der Berechnete Wert die Ticketnummer ist ist die Speicherung (zumindest in meinem gedankenspiel) sehr wohl notwendig
nein, ist sie nicht. Du kannst diese zusammengesetzte Ticketnummer jederzeit über eine Abfrage anzeigen. Ohne jede Einschränkung. Eine Abfrage ist einer Tabelle gleich zu setzen. Damit bist Du 100% sicher, dass die angezeigte Ticketnummer richtig ist.
Im Regelfall verwendet man ohnehin keine Tabellen für den Zugriff auf die Daten, sondern immer Abfragen.
Gruß Klaus