gem i db på en windowsform

Hej eksperter

Jeg programmere normalt i webapp, og mit problem er nu at gemme på en winform, jeg har noget kode som virker på en webfform, men kan ikke få den til at virke på en winform, hvad gør jeg forkert???

Har følgende kode:

Sub GemIDatabase()

        Dim connectionStr As String  ' Forbindelses-streng til databasen
        Dim con As OleDbConnection    ' Forbindelse-objekt til databasen
        Dim cmd As OleDbCommand      ' kommando-objekt

        ' Opbyg connectionStr
        connectionStr = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="
        connectionStr += Request.PhysicalApplicationPath + "database/db.mdb"

        ' Skab forbindelses-objekt udfra connectionStr
        con = New OleDbConnection(connectionStr)

        ' Skab kommando-objekt og tilknyt til forbindelses-objekt
        cmd = New OleDbCommand
        cmd.Connection = con

        ' Opbyg SQL-kommando
        cmd.CommandText = "INSERT INTO freelance (navn, antalProjekterPrUge)"
        cmd.CommandText += " VALUES (@navn, @antalProjekterPrUge)"

        cmd.Parameters.Add("@navn", OleDbType.VarChar).Value = txtNavn.Text
        cmd.Parameters.Add("@antalProjekterPrUge", OleDbType.VarChar).Value = txtAntal.Text


        con.Open()              ' Åben forbindelsen til databasen
        cmd.ExecuteNonQuery()  ' Udfør kommando (SQL-streng)
        con.Close()            ' Luk forbindelsen

    End Sub

    Private Sub Opret_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Opret.Click
        GemIDatabase()
    End Sub