Lange SQL Query uitvoeren

[johanw]

Hoe kan ik een lange SQL query laten uitvoeren? Korte kan ik dmv van een macro doen maar als ik een hele lange daar in probeer te plakken zegt ie dat de query te lang is om te bewerken.

dit is de query:
INSERT INTO Bestellingen (Shell_PN, Buysite, CFP, GLRO, AIM, Leverancier, Bedrag, Special_Request, Requeisitor, Datum_Bestelling, Tijd_Bestelling, Aantal_Besteld, Aanmelding_Datum, Aanmelding_Tijd, Opmerkingen) VALUES (F_Shell_PN, F_Buysite, F_CFP, F_GLRO, F_AIM, F_Leverancier, F_Bedrag, F_Special_Request, F_Requeisitor, F_Datum_Bestelling, F_Tijd_Bestelling, F_Aantal_Besteld, F_Aanmelding_Datum, F_Aanmelding_Tijd, F_Opmerkingen)

De variabelen komen uit een formulier

 

[jaminon]

De Makro kun je ook omzetten in VB, hierin kun je de Sql instructie net zolang maken als noodzakelijk.

JJ

 

[johanw]

Ah oke

maar hoe?

 

[jaminon]

Als je SQL instructie goed is dan moet dit hem zijn:

---------------------------------------------------------------
SUb invoegen()
Dim MySql As String

MySql = "INSERT INTO Bestellingen (Shell_PN, Buysite, CFP, GLRO, AIM, Leverancier, Bedrag, Special_Request, Requeisitor, Datum_Bestelling, Tijd_Bestelling, Aantal_Besteld, Aanmelding_Datum, Aanmelding_Tijd, Opmerkingen) VALUES (F_Shell_PN, F_Buysite, F_CFP, F_GLRO, F_AIM, F_Leverancier, F_Bedrag, F_Special_Request, F_Requeisitor, F_Datum_Bestelling, F_Tijd_Bestelling, F_Aantal_Besteld, F_Aanmelding_Datum, F_Aanmelding_Tijd, F_Opmerkingen);"

DoCmd.SetWarnings False
DoCmd.RunSQL MySql
DoCmd.SetWarnings True

End Sub

'---------------------------------------------------------------

Veel succes

JJ

 

[johanw]

Bedankt, het werkt uistekend