Tilføje data til 2 tabeller

Jeg har følgende script som virker fint. Men hvad skal jeg tilføje hvis jeg gerne vil have "Mail" ind i 2 tabeller. Både i "Users" og i en tabel jeg kalder "News"???

Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("liste.mdb")
Conn.Open DSN

strSQL = "select count(*) as antal FROM Users where username='" & Request.Form("Username") & "'"
set rs = Conn.Execute(strSQL)

if rs("antal")>0 then
Response.Redirect "fejl.asp"
Response.end
else

'------------ INSERT---
' SQL sætning opCitygges
strSQL = "Insert into Users (FirstName, LastName, Mail, Username, Password) values('"                
& Request.Form("FirstName") & "','"
& Request.Form("LastName") & "','"
& Request.Form("Mail") & "','"
& Request.Form("Username") & "','"
& Request.Form("Password") & "')"

' SQL sætning eksekveres
Conn.Execute(strSQL)
'---------------------
end if

' Luk databaseforbindelse
Conn.Close
Set Conn = Nothing
%>