Thema Datum  Von Nutzer Rating
Antwort
Rot Abfrage mit SQL in VBA Code
 07.11.2007 14:35:43 Micha
NotSolved

Ansicht des Beitrags:
Von:
Micha		 Datum:
07.11.2007 14:35:43		 Views:
1695		 Rating:
     
Antwort:
  Ja
Thema:
Abfrage mit SQL in VBA Code
Ich verusche mich zur DB zu verbinden und die Abfrage ausführen zu lassen um sie dann später in ein Recordset umzuwandeln
Das Problem ist nur dass er ständig Fehler bringt die ich nicht kenne!! Im Moment bringt er damit keinen Fehler, aber auch nicht das gewünschte Ergebniss


Dim db As Database
Dim qdf As QueryDef

Dim von As Integer
Dim bis As Integer
Dim sVon As String
Dim sBis As String
Dim qryString As String
Dim stAbfrage As String
Dim qryRecord As Recordset


' Laden der gesuchten Werte in die Variablen

sVon = [vonZellnummerTextfeld].Value
sBis = [bisZellnummerTextfeld].Value


' Abfrage String
qryString = "SELECT w.Zellnummer, w.Auftragsnummer FROM Wickeln AS w WHERE w.Zellnummer>= " & sVon & " AND w.Zellnummer<= " & sBis & " AND w.Rückstellprobe = TRUE;"


' aktuelle DB setzen
Set db = CurrentDb
Set qdf = db.QueryDefs("SucheRueckstellprobe")
qdf.SQL = qryString



Dim t As Integer
t = qdf.MaxRecords


[ZellNrRueckstellprobeTextfeld].Value = t
[ENrKatodeTextfeld].Value = qryString


Kennt jemand eine Lösung wie ich verbinden kann, die Abfrage ausführen und dann das ganze in ein Recordset umwandeln lassen kann?? Im


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Abfrage mit SQL in VBA Code
 07.11.2007 14:35:43 Micha
NotSolved