Connecte til Access DB (VB.NET)

se på denne:
    private void database(string sql){
        String sConnection = "Provider=Microsoft.Jet.OLEDB.4.0;" + "Data Source=c:/Medlemmer.mdb;Jet OLEDB:Database Password=G77;";
        IDbConnection dbConn = new OleDbConnection(sConnection);
        dbConn.Open();

        try{
            IDbCommand  dbCmd;
            dbCmd = new OleDbCommand();
            dbCmd.CommandText = sql;
            dbCmd.Connection = dbConn;
            dbCmd.ExecuteNonQuery();
            dbConn.Close();
        }
        catch(Exception){

        }
    }

C# som du skal konvertere til VB :-)

Øhhhh.... det er jeg så lidt lost i.. ;o/

Men har fundet frem til noget på nettet...
Poster det lige i en ny kommentar

Public Class MinSide
    Inherits System.Web.UI.Page

#Region " Web Form Designer Generated Code "

    'This call is required by the Web Form Designer.
    <System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()

    End Sub
    Protected WithEvents Label1 As System.Web.UI.WebControls.Label
    Protected WithEvents Label2 As System.Web.UI.WebControls.Label
    Protected WithEvents ImgDIV As System.Web.UI.HtmlControls.HtmlControl

    'NOTE: The following placeholder declaration is required by the Web Form Designer.
    'Do not delete or move it.
    Private designerPlaceholderDeclaration As System.Object

#End Region

    Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim Side, Body, Img, Feet As String
        Dim StrDSN, StrSQL, StrPath as String
       
        'StrPath = "D:\DS\Data.mdb"
        'StrDSN = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & StrPath
        'StrSQL = "SELECT Sider.ID, Side.Body, Sider.Feet FROM Sider;"
       
        'Dim Conn As New OleDbConnection(StrDSN)
        'Dim Comm As New OleDbCommand(StrSQL, Conn)
        'Dim Datr As OleDbDataReader = Nothing
        'Try
       
        'Conn.Open()
        'Datr = Comm.ExecuteReader()
        'While Datr.Read()
       
        'End While

        'Finally
        'Conn.Close
        'End Try

            Side = Request.QueryString("Side")

            Select Case (side)
                Case "Forside"
                    Img  = "000"
                    Body = "Forside inholdet kommer her"
                    Feet = "Forsidens Feeter ses her"
                Case "Portfolio"
                    Img  = "001"
                    Body = "Portfolio siden kommer her"
                    Feet = "Portfolio sidens Feeter ses her"
                Case "Kontakt"
                    Img  = "002"
                    Body = "Kontakt siden kommer her"
                    Feet = "Kontakt sidens Feeter ses her"
                Case "Kompetenser"
                    Img  = "003"
                    Body = "Mine Kompetenser kommer her"
                    Feet = "Feeteren til kompetence siden kommer her"
                Case "Salg"
                    Img  = "004"
                    Body = "Salgs siden vil være her"
                    Feet = "Feeteren til salgssiden ses her"
                Case "OmMig"
                    Img  = "005"
                    Body = "Informationer om mig ses her"
                    Feet = "Feeteren på siden om mig kommer her"
                Case Else
                    Img  = "000"
                    Body = "Forside inholdet kommer her"
                    Feet = "Forsidens Feeter ses her"
            End Select

        ImgDIV.Style.Add( "background-image", "url('Img/" & Img & ".jpg')" )
        Label1.text = Body
        Label2.text = Feet
    End Sub

End Class

Har dog ikke testet det endnu, for jeg ved ikke hvordan jeg fx udskriver Body fra min tabel...

First of all, jeg kan ikke kode VB, så den kode jeg postede er mere for at give dig et indtryæ af hvordan man opstiller en db-ting i asp.net
Prøv at beskriv hvad skrial bruge mere præcist :-)

Nå ok... så må jeg håbe der kommer en anden forbi der kan hjælpe mig... ;o/
Indtrykket havde jeg lidt i forvejen, men mangler lige det sidste input, for det er ikke helt som jeg er vandt til...

Skal bare have udskrevet mine poster fra min DB til variablerne Body, Feet, og senere skal det lige en Img på, så jeg kan få min Select Case væk...

for det er egentlig det det dræjer sig om, det er at min Select Case sætninge skal erstattes af en Database forbindelse...

Du kan finde lidt ASP.NET (VB) kode her:
http://www.kursusmaterialer.dk/ASP.NET%20I/Datakontroller/Simpel%20visning%20af%20data.aspx

Ja, det er jo næsten så langt jeg er kommet, + det så udskrives, men i et data grid, og det er jeg ikke interesseret i, jeg vil have udskrevet Sider.Body hvor jeg vil have den... osv... det er lige det jeg mangler...

Men det andet hjælper alligevel, for så kan jeg få det sat lidt mere overskueligt op...

Ahh... tror jeg har fundet noget brugbart et andet sted på samme side...

rart at høre

Den melder fejlen:

ompiler Error Message: BC30002: Type 'OledbConnection' is not defined.

Poster kode lige om lidt...

Public Class MinSide
    Inherits System.Web.UI.Page

#Region " Web Form Designer Generated Code "

    'This call is required by the Web Form Designer.
    <System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()

    End Sub
    Protected WithEvents Label1 As System.Web.UI.WebControls.Label
    Protected WithEvents Label2 As System.Web.UI.WebControls.Label
    Protected WithEvents ImgDIV As System.Web.UI.HtmlControls.HtmlControl

    'NOTE: The following placeholder declaration is required by the Web Form Designer.
    'Do not delete or move it.
    Private designerPlaceholderDeclaration As System.Object

#End Region

    Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim Side, Body, Img, Feet As String
        Dim StrDSN, StrSQL, StrPath as String
       
        Dim objConn as OledbConnection
        Dim objComm as OledbCommand
        Dim objDataR as OledbDataReader
       
        Side = Request.QueryString("Side")
       
        StrPath = "D:\DS\Data.mdb"
        StrConn = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & StrPath
        objConn = New OledbConnection(strConn)
        objConn.Open
   
        strSQL = "SELECT Sider.ID, Side.Body, Sider.Feet, Sider.Img FROM Sider WHERE Side = '" & Side & "';"
   
        objComm  = New OleDbCommand(strSQL, objConn)
        objDataR = objComm.ExecuteReader()
   
        While (objDataR.Read())
            Body = CStr(objDataR("Body"))
            Feet = CStr(objDataR("Feet"))
            Img  = CStr(objDataR("Img"))
        End while

        ImgDIV.Style.Add( "background-image", "url('Img/" & Img & ".jpg')" )
        Label1.text = Body
        Label2.text = Feet
    End Sub

End Class

Du mangler:
  Imports system.data
  Imports system.data.oledb
i starten af din kode

Ahh... så det derfor jeg ikke har kunne importere de forskellige navnerum, har hele tiden skreve Import.... Uden S...
Takker for hjælpen, så kan du lide smide et svar, så fik jeg faktisk løst 2 ting på en gang...

Dejligt at høre :-)
Og tak for point