'insert a new project
if action = 1 then
set Conn = server.createobject("adodb.connection")
Conn.Open "PROVIDER=MICROSOFT.JET.OLEDB.4.0;DATA SOURCE=" & dbPath
mySQL = "INSERT INTO tblProj(ProjName,ProjDate,ProjPrivate,projlastuser,projrand) VALUES ('NEW: Click To Edit',#" & date() & "#,'off','" & stampedname & "','" & randgen() & "');"
conn.execute(mySQL)
closeconn()
response.redirect("projects.asp")
end if