Das ist der Programmcode:
____________________________
Dim db_server= "localhost"
Dim db_port= "3306"
Dim db_user= "root"
Dim db_pass= ""
Dim db_name= "ecowash"
Dim db_tabelle= "barverkauf"
Dim conn, strConnectString, Sql, rs
' sql-Anweisung
Sql = "INSERT INTO " & db_tabelle & "...