Skal trykke 2 gange

Jeg har en lille side med 3 bokse og 1 knap. De 3 bokse fyldes med data fra en database.

Her er koden:

Dim DataOleDB as new DataBaseOleDB()
Protected txtadminopsaetningBilledeHojde As System.Web.UI.Webcontrols.textbox
Protected txtadminopsaetningBilledeBredde As System.Web.UI.Webcontrols.textbox
Protected txtadminopsaetningAntalViste As System.Web.UI.Webcontrols.textbox
Protected lnkGemopsaetning As System.Web.UI.Webcontrols.linkbutton
Protected lblbesked As System.Web.UI.Webcontrols.label

Public sub Page_Load(Source as Object, E as EventArgs)
    If not page.ispostback
        Fyldbokse()
    end if
end sub
   
Public sub click_gem(Source as Object, E as EventArgs)
    try
        DataOleDB.opendb("blabla")
            'DataOleDB.SkrivData("UPDATE Setup SET Nyheder_Pager= " & txtadminopsaetningAntalViste.text & ", GemtBilledeHojde = " & txtadminopsaetningBilledeHojde.text & ", GemtBilledeBredde = " & txtadminopsaetningBilledeBredde.text & ";")
response.write("UPDATE Setup SET Nyheder_Pager = " & txtadminopsaetningAntalViste.text & ", GemtBilledeHojde = " & txtadminopsaetningBilledeHojde.text & ", GemtBilledeBredde = " & txtadminopsaetningBilledeBredde.text & ";")
    'DataOleDb.Data.close()
    DataOleDB.closedb()
    'lblbesked.text = "Der vises nu <b>" & txtadminopsaetningAntalViste.text & "</b> nyheder ad gangen"

catch ex as exception
    response.write(ex.tostring())
end try
    end sub
   
    Public sub Fyldbokse()
        try
            DataOleDB.opendb("blabla")
                DataOleDB.DanData("SELECT * from Setup")
                    If Dataoledb.Data.read() then
                        txtadminopsaetningBilledeHojde.text = Dataoledb.Data("GemtBilledeHojde")
                        txtadminopsaetningBilledeBredde.text = Dataoledb.Data("GemtBilledeBredde")
                        txtadminopsaetningAntalViste.text = Dataoledb.Data("Nyheder_Pager")
                    end if
                    DataOleDb.Data.close()
            DataOleDB.closedb()
        catch ex as exception
            response.write(ex.tostring())
        end try
    end sub
   
    Public sub click_annuller(Source as Object, E as EventArgs)
        response.redirect(request.path & "?sid=4")
    end sub

___________________________________________

Men jeg skal trykke 2 gange for at den skrive i databasen, ja endda bare for at den skal ændre teksten i label'en.. :(