ok - så hvis man skal tilføje rækker til tabel 1 skal man altså redesigne tabel 2 (tilføje nye kolonner).
Det kan du ikke lave noget join på - data er ikke normaliseret. Jeg ville lave db-strukturen om. Men hvis det ikke er muligt, bliver det vel noget med at lave en stored procedure eller sqlfuntion, der tager ID'en og opbygger SQL sætninger runtime.
select tekst,dbo.GetVærdi(ID) from table1. Det er absolut ikke en fed løsning.
Har klippet og klistret forskellige steder - og nu er den vist lige ved at være der...
'Put user code to initialize the page here Dim oConnection As Odbc.OdbcConnection = New Odbc.OdbcConnection(Application("ConnString")) Dim OneCommand, TwoCommand As Odbc.OdbcCommand Dim OneDataReader, TwoDataReader As Odbc.OdbcDataReader Dim OneSQL As String = "SELECT * FROM Tabel1" Dim TwoSQL As String = "SELECT * From Tabel2" Dim OneArray(), TwoArray() As String Dim F1, F2 As String Dim T, U As Integer
oConnection.Open() OneCommand = New Odbc.OdbcCommand(OneSQL, oConnection) OneDataReader = OneCommand.ExecuteReader While OneDataReader.Read() F1 = F1 & " " & CStr(OneDataReader("FeltEtiket")) & ";,,; " F2 = F2 & " " & CStr(OneDataReader("FeltNavn")) & ";,,; " End While oConnection.Close()
OneArray = Split(F1, ";,,;") TwoArray = Split(F2, ";,,;") Dim dt As New DataTable
For T = LBound(OneArray) To UBound(TwoArray) 'Create the columns 'Add the columns to the DataTable's Columns collection dt.Columns.Add("" & OneArray(T) & "") Next
oConnection.Open() TwoCommand = New Odbc.OdbcCommand(TwoSQL, oConnection) TwoDataReader = TwoCommand.ExecuteReader Dim dr As DataRow While TwoDataReader.Read() dr = dt.NewRow() For U = LBound(OneArray) To UBound(OneArray) dr("" & OneArray(U) & "") = CStr(TwoDataReader("" & TwoArray(U) & ""))' HER GÅR DET STADIG GALT Next dt.Rows.Add(dr) End While oConnection.Close()
'Bind the DataTable to the DataGrid dgPeople.DataSource = dt dgPeople.DataBind()
jeg har dog problemer i den linie, hvor jeg også skriver det går galt... Hvis jeg i stedet skriver : dr("" & OneArray(U) & "") = "test" , så får jeg en fin tabel med rigtige kolonnenavne, men selvfølgelig med teksten "test" i alle celler.
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.