title image


Smiley SQL-Anweisung im VBA-Editor
Hi,



habe ein kleines SQL Problem!

Habe in einem Formular ein Listenfeld, welches ich per SQL "Beim Öffnen" des Formulars füllen lasse. No Problem!



Bei Betätigen einer Schaltfläche (es handelt sich um eine Optionsgruppe), möchte ich die Datenherkunft ändern. Habe entsprechend eine SQL Anweisung gebastelt - aber ich sehe keine Daten - Listenfeld bleibt leer!? Warum?

Die Spaltenanzahl ist analog der Datenherkunft 'Beim Öffnen'



Meine Anweisung:











Private Sub cboAuswahl_AfterUpdate()



With Me

Select Case cboAuswahl

Case 1

    .lst_Filter.RowSource = "SELECT ErstErfassungVorgang.[TGB-Nr],

ErstErfassungVorgang.Ereignis," & _         

ErstErfassungVorgang.EreignisVonDatum, ErstErfassungVorgang.EreignisBisDatum" &

_

    "FROM ErstErfassungVorgang WHERE (((ErstErfassungVorgang.Ereignis)

LIKE '*AsylVfG*'))" & _

    "ORDER BY ErstErfassungVorgangEreignisVonDatum;"

Case 2

    .lst_Filter.RowSource = "SELECT ErstErfassungVorgang.[TGB-Nr],

ErstErfassungVorgang.Ereignis, " & _   

ErstErfassungVorgang.EreignisVonDatum, ErstErfassungVorgang.EreignisBisDatum" &

_

    "FROM ErstErfassungVorgang WHERE (((ErstErfassungVorgang.Ereignis)

LIKE '*AuslG*'))" & _

    "ORDER BY ErstErfassungVorgangEreignisVonDatum;"

End Select

End With



End Sub









Gibt es im "www" eine Seite, die sich mit SQL Anweisung aus VBA beschäftigt?



Danke im voraus



Michael
Gruß Michael

Image Hosted by ImageShack.us

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: