Jag har en vanlig listbox (ASP.NET och VB-kod) med en kolumn som visas enligt följande kod: <code> Dim sql as string = "SELECT Förnamn + ' ' + Efternamn As Namn, [Fler kolumner kanske...] FROM Larare ORDER BY Efternamn" ASP.NET...flera kolumner i listbox
<%@ Page Language="vb" %>
<%@ import Namespace="System.Data" %>
<%@ import Namespace="System.Data.OleDb" %>
<script runat="server">
Dim intWdth, intID as integer
Dim strFornamn, strEfternamn as string
Sub Page_Load(Source as Object, E as EventArgs)
if not Page.IsPostBack then
BindData
End If
End Sub
Sub BindData()
Dim strConn as string = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath("\dbSchema.mdb") & ";"
Dim sql as string = "SELECT * FROM Larare ORDER BY Efternamn"
Dim conn as New OleDbConnection(strConn)
Dim Cmd as New OleDbCommand(sql, conn)
Dim objDR as OleDbDataReader
conn.Open()
objDR=Cmd.ExecuteReader(system.data.CommandBehavior.CloseConnection)
list1.datasource=objDR
list1.DataValueField="ID"
list1.datatextfield="Efternamn"
list1.databind
list1.selectedindex=0
conn.Close()
End Sub
Är det någon som vet hur man gör för att kunna visa ytterligare en kolumn i listboxen ex.vis kolumn "Fornamn"?Sv:ASP.NET...flera kolumner i listbox
<%@ Page Language="vb" %>
<%@ import Namespace="System.Data" %>
<%@ import Namespace="System.Data.OleDb" %>
<script runat="server">
Dim intWdth, intID as integer
Dim strFornamn, strEfternamn as string
Sub Page_Load(Source as Object, E as EventArgs)
if not Page.IsPostBack then
BindData
End If
End Sub
Sub BindData()
Dim strConn as string = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath("\dbSchema.mdb") & ";"
Dim sql as string = "SELECT * FROM Larare ORDER BY Efternamn"
Dim conn as New OleDbConnection(strConn)
Dim Cmd as New OleDbCommand(sql, conn)
Dim objDR as OleDbDataReader
conn.Open()
objDR=Cmd.ExecuteReader(system.data.CommandBehavior.CloseConnection)
list1.datasource=objDR
list1.DataValueField="ID"
list1.datatextfield="Fornamn" & " " & "Efternamn"
list1.databind
list1.selectedindex=0
conn.Close()
End Sub
</code>
Har för mig detta ska fungera :)Sv:ASP.NET...flera kolumner i listbox
och sen gör du databind på Namn - som den sammansatta kolumnen heter.
/micke