skrive til en accesfil

Jeg skal skrive noget tekst til en accesfil, og jeg skal bruge aspx...  Jeg har fået leveret en kode som ser således ud:

<%@ Page Language="VB" Debug="true" %>
<%@ Import Namespace="System.Data.OleDb" %>

<script  runat="server">
sub Page_Load
       
'Open the OledbConnection
Dim Con As New OleDbConnection
Con.ConnectionString = "Provider='Microsoft.Jet.OLEDB.4.0';Data Source='c:\bysted\expo2005.mdb';Jet OLEDB:SFP=False;User ID=Admin"
Con.Open()

' Open the oldbcommand
Dim strSQL As String
' strSQL = "Insert into expo(message) values (" & request("msg") & ")"
strSQL = "insert into expo (name,message,email,phone,curdate) Values('" & Request("name") & "','" & Request("msg") & "','" & Request("email") & "','" & Request("phone") & "','" & now & "')"
Dim Com As New OleDbCommand
Com.CommandText = strSQL
Com.Connection = Con

'adding the oledb parameters
Dim param1 As New OleDbParameter("@field1", OleDbType.VarChar)
Com.Parameters.Add(param1)
Com.Parameters("@field1").Value = Request("msg")

'execute the oledb command
Com.ExecuteNonQuery()

Com.Dispose()
Con.Close()
Con.Dispose()


end sub
</script>


Nogen der kan hjælpe...??