retrieving data for a selected item in a list(veryyyyyyy urgent)

srivalli

Well-known member
Joined
May 4, 2005
Messages
189
Programming Experience
Beginner
hello

i have one form in which i have the following fields :

bankname, transactionid,trandate,validationdate etc.

As there may be any transactions for a single bank ,

my query is if i select a bank from the list available

i want to display the transaction details like (trnaid,trandate etc) for that selected bank in a data grid.
send me as early as possible
thank u
 

tommybeer

Member
Joined
May 4, 2005
Messages
15
Programming Experience
Beginner
Private Function opzoekendata()

Dim dstdatum As New DataSet

Dim datdatum As OleDbDataAdapter

DTPDatumbezoek.Format = DateTimePickerFormat.Custom

DTPDatumbezoek.CustomFormat = "yyyy-MM-dd"

datdatum =
New OleDbDataAdapter("SELECT [g].[Naam], [g].[Woonplaats], [r].[Aantal] , [r].[Leeftijd], convert(char(5),[r].[BeginUur],8) as Beginuur, [v].[Omschrijving], [r].[Auditorium], [r].[ExtraPlanetarium] " & _

"FROM [Eures4].[dbo].[Reservaties] r,[Eures4].[dbo].[Groepen] g," & _

"[Eures4].[dbo].[Voorstellingen] v WHERE [r].[Groep_id] = [g].[Groep_id] AND" & _

"[r].[Voorstelling_id] = [v].[Voorstelling_id] AND [r].[DatumBezoek] = '" & DTPDatumbezoek.Text & "' ORDER BY [r].[BeginUur] ASC", con)

dstdatum.Clear()

con.Open()

Try

datdatum.Fill(dstdatum)

Catch ex As Exception

MsgBox(ex.Message.ToString)

End Try

con.Close()

dgagenda.DataSource = dstdatum.Tables(0)

DTPDatumbezoek.Format = DateTimePickerFormat.Long



End Function

 
Top Bottom