Tack för hjälpen, men jag skrev så:
sqlInsert = "insert into TIME_TimeTable UserName,Position,RegDate,RegTime,"
sqlInsert = sqlInsert + "ProjectID,PhaseID,PartID) "
sqlInsert = sqlInsert + "values ('WY',1,"&date()&",5,"&Request.Form("sel_proj")&", "
sqlInsert = sqlInsert + "14,4)"
rs.Open sqlInsert,conn
set rs = conn.Execute(sqlInsert)

Varför fick jag sådanat fel medlande:
Syntax error in INSERT INTO statement.

Antalet fältnamn måste överenstämma med antalet kolumner, om jag inte är ute och cyklar. Ofta kan det bli fel där!

Sedan känns det som om att följande kodrad är överflödig:
rs.Open sqlInsert,conn

Du exekverar med denna:
set rs = conn.Execute(sqlInsert)

mvh
Torbjörn

Hej,Tobbe:

Tack för hjälpen.Jag tycker inte att det var de två fel som jag har. Jag skriver en gång till:

sqlInsert = "insert into TIME_TimeTable(UserName,Position,RegDate,RegTime,"
sqlInsert = sqlInsert + "ProjectID,PhaseID,PartID) "
sqlInsert = sqlInsert + "values('WY',1,#"&date()&"#,5,"&Request.Form("sel_proj")&", "
sqlInsert = sqlInsert + "14,4)"
conn.Execute (sqlInsert)