' Insert data into MS Access database Dim sql sql = "INSERT INTO Visitors (Name, Email, Message, Date) VALUES ('" & name & "', '" & email & "', '" & message & "', Now())" conn.Execute sql