VB.net - In DIV Feld ausgeben?

Dieses Thema im Forum "Programmieren" wurde erstellt von penDEJO, 15. August 2004.

Status des Themas:
Es sind keine weiteren Antworten möglich.
  1. penDEJO

    penDEJO Byte

    Registriert seit:
    16. November 2001
    Beiträge:
    53
    Morgen zusammen,

    also ich versuche mich zZ an nem News script. Und zwar versuche ich daten aus meiner datenbank in eine tabelle auslesen zu lassen. leider weiß ich nich recht wie ich das machen soll. Also ich hab schon woanders ähnliche sachen gemacht, da allerdings mit vs.net 2002. da habe ich z.b den ganzen text in ein div feld auslesen lassen. jetzt habe ich hier vs.net 2003 und ich kann das nicht mehr machen :(

    Kann mir vielleicht jemand sagen wie ich das jetzt am besten mache?
    Also ich hab in einem Datensatz: id, autor, text und datum stehen. die will ich jetzt in eine tabelle einfügen, wie mach ich das?

    Grüße

    ps:

    Code:
            Dim sSql, sSpalte As String
            sSql = "SELECT * FROM TBL_news"
    
            'DB Verbindungsaufbau
            Dim CONNSTR As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + sDatabase + ";Persist Security Info=False"
            Dim MyConnection As New OleDb.OleDbConnection(CONNSTR)
            MyConnection.Open()
            Dim MyCommand As New OleDb.OleDbCommand(sSql, MyConnection)
            Dim MyReader As OleDb.OleDbDataReader = MyCommand.ExecuteReader()
    
            While MyReader.Read
                If Not (MyReader(sSpalte).GetType Is GetType(DBNull)) Then
                    txt_label.Text = MyReader("content")
                End If
            End While
    
    
            MyReader.Close()
            MyConnection.Close()
            MyCommand.Dispose()
            'DB Verbindungsaufbau Ende
        End Function
    
    ps: in ein datagrid kann ich auslesen!
     
  2. penDEJO

    penDEJO Byte

    Registriert seit:
    16. November 2001
    Beiträge:
    53
    So ich bin jetzt schon weiter nur leider wird beim ausrufen (z.b. test.aspx?id=1) die id nicht wirklich übergeben. Hier nmald er code:

    Code:
        Private Function ladeSeite(ByVal nId As Integer)
    
            Dim sSql, sSpalte As String
            sSql = "SELECT * FROM tbl_news WHERE id = 2"
    
            'DB Verbindungsaufbau
            Dim CONNSTR As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + sDatabase + ";Persist Security Info=False"
            Dim MyConnection As New OleDb.OleDbConnection(CONNSTR)
            MyConnection.Open()
            Dim MyCommand As New OleDb.OleDbCommand(sSql, MyConnection)
            Dim MyReader As OleDb.OleDbDataReader = MyCommand.ExecuteReader()
    
            sSpalte = "content"
            If MyReader.Read Then
                txt_label.Text = MyReader(sSpalte)
            End If
    
            MyReader.Close()
            MyConnection.Close()
            MyCommand.Dispose()
            'DB Verbindungsaufbau Ende
        End Function
    So wie es oben steht funzt es, doch wenn ich anstatt der "2" ne variable übergeben will, dann sagt der mir "Für mindestens einen erforderlichen Parameter wurde kein Wert angegeben." Also die Felder in der Datenbank sind nicht leer und die Variable ist auch richtig definiert. Habtr ihr noch ideen?
     
Status des Themas:
Es sind keine weiteren Antworten möglich.

Diese Seite empfehlen