Virker på en server, men ikke på den anden

Hej

Jeg har et problem som jeg ikke helt forstår.

Jeg har lavet disse 2 filer


<%
Set Conn = Server.CreateObject("ADODB.Connection")
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("../db/data.mdb")
Set objRS = server.CreateObject("ADODB.Recordset")
Set objRS.ActiveConnection = Conn

%>


<%
navn = Request.form ("Navn")
Pass = Request.form ("password")
Adresse = Request.form ("Adresse")
Post = Request.form ("post")
Telefon = Request.form ("Telefon")
Telefon2 = Request.form ("Telefon2")
Email = Request.form ("Email")
Bnavn = Request.form ("Bnavn")
Gpass = Request.form ("gpass")
hp = Request.form ("hp")
Tp = "B"
if pass <> gpass then
Session("navn") = Navn
Session("pass") = pass
Session("Adresse") = Adresse
Session("Post") = Post
Session("Telefon") = Telefon
Session("Telefon2") = Telefon2
Session("Bnavn") = Bnavn
Session("email") = Email
Session("hp") = hp
Session("gpass")
Session("logon") = 1
Response.Redirect "opretsombruger.asp"
End if
Sql = "INSERT INTO BRUGER(navn, password, type, Adresse, post, telefon, telefon2, email, Hjemmeside,  bnavn)"
SQL = SQL & "Values("
    SQL = SQL & "'" & Navn & "',"
    SQL = SQL & "'" & Pass & "',"
    SQL = SQL & "'" & Tp & "',"
    SQL = SQL & "'" & Adresse &"',"
    SQL = SQL & "'" & Post & "',"
    SQL = SQL & "'" & Telefon & "',"
    SQL = SQL & "'" & Telefon2 & "',"
    SQL = SQL & "'" & Email & "',"
    SQL = SQL & "'" & HP & "',"
    SQL = SQL & "'" & Bnavn & "'"
    SQL = SQL & ")"
    Set RS = conn.execute(SQL)

%>


Det er en hjemmeside jeg er ved at lave for en. Jeg hat en anden fil hvor jeg lægger noget ind på serveren og det virker. Filer der lægget dette ind virker også på min server, men ikke den server, som han har. Er der noget der har en ide om hvad der kan være galt.

Håber jeg har beskrevet problemet godt nok