用惯了sql server 突然发现要写基于Access的语句时写不来了

Set conn = GetSQLServerConnection( DBName,DBUserName,DBPassWord,"classtable")
Set cmd = Server.CreateObject( "ADODB.Command")
Set cmd.ActiveConnection = conn
cmd.CommandText= = "insert into classtable (username,pwd,zhucedate) VALUES ('" & getusername & "','" & getpassword & "','" & now() & "')"
cmd.Execute


以上是连接sql的语句,getusername之类的都是变量不用管它,请问支持mdb数据库的话,该怎么改