Hallo ihr Lieben,
vielleicht kann mir jemand von Euch weiter helfen?
Ich möchte mit meinen Text- und Combobox - Feldern auf meinem
Formular eine SQL Abfrage erreichen.
Wenn ich den Aktuellen Inhalt dieser Felder mit in die Abfrage aufnehme
müßte das ungefähr so gehen:
______________________________________________________________
'Prozedur fuer den Export Button Steht zur Zeit nur zum Test zur Verfuegung
Private Sub cmdExport_Click()
'Deklaration der Varibeln
Dim nSQL As String
Dim oRs As MYSQL_RS
' SQL-Abfragestring
nSQL = "SELECT * FROM " & cboTabelle.Text & " WHERE '" & _
cboSpalte.Text & cboVergleichsOperator.Text & txtInput.Text & cboLogischerOperator.Text
Set oRs = MYSQL_RS(nSQL)
If cmdExport.Value Then ExportToExcel 'Export nach Excel durchführen
End Sub 'Ende der Prozedur
________________________________________________________________
ODER?
Ich möchte, dann noch die abgefragten Daten nach Excel importieren.
Wie stelle ich das genau an?
Für Eure Hilfe bedanke ich mich jetzt schon mal! DANKE!
vielleicht kann mir jemand von Euch weiter helfen?
Ich möchte mit meinen Text- und Combobox - Feldern auf meinem
Formular eine SQL Abfrage erreichen.
Wenn ich den Aktuellen Inhalt dieser Felder mit in die Abfrage aufnehme
müßte das ungefähr so gehen:
______________________________________________________________
'Prozedur fuer den Export Button Steht zur Zeit nur zum Test zur Verfuegung
Private Sub cmdExport_Click()
'Deklaration der Varibeln
Dim nSQL As String
Dim oRs As MYSQL_RS
' SQL-Abfragestring
nSQL = "SELECT * FROM " & cboTabelle.Text & " WHERE '" & _
cboSpalte.Text & cboVergleichsOperator.Text & txtInput.Text & cboLogischerOperator.Text
Set oRs = MYSQL_RS(nSQL)
If cmdExport.Value Then ExportToExcel 'Export nach Excel durchführen
End Sub 'Ende der Prozedur
________________________________________________________________
ODER?
Ich möchte, dann noch die abgefragten Daten nach Excel importieren.
Wie stelle ich das genau an?
Für Eure Hilfe bedanke ich mich jetzt schon mal! DANKE!
