Visual Basic - Necesito Una Ayudita Urgernte Para Hoy Por favor

Life is soft - evento anual de software empresarial
 
Vista:

Necesito Una Ayudita Urgernte Para Hoy Por favor

Publicado por Rod (1 intervención) el 20/05/2002 17:55:57
Estoy contruyendo una pequeña aplicacion que setrata de un formulario donde utilizo una DataList para mostrar los registros de una base de datos. Pero quiero que cuando pulse uno o Elija uno de estos Registros
mustre los campos correspondiente a cada Registros.

Ayuda Por fava
Gracias chicos
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Necesito Una Ayudita Urgernte Para Hoy Por fav

Publicado por Mariano (21 intervenciones) el 20/05/2002 18:46:10
en el evento clik debes hacer una consulta con el parametro * para q te devuelva todos los campos y luego mostrar el que desees
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Necesito Una Ayudita Urgernte Para Hoy Por fav

Publicado por Apolonio (3 intervenciones) el 23/05/2002 23:45:31
Lo tengo utilizando dos formularios. Uno para seleccionar el registro (form1) y otro para mostrar todos los campos del mismo (form2)
form1 contiene: ADO Data Control (adodc1) y DataList (DataList1)
' Form1 permite elegit los registros a visualizar

Private Sub Form_Load()
' Para el control Data
With Adodc1
'Cadena de conexion a la base de datos que se llama Prueba.mdb
.ConnectionString = "Provider=Microsoft.Jet.OLEDB.3.51;Persist Security Info=False;Data Source=C:\Documents and Settings\AODH1\Mis documentos\Proyectos\Pruebas\Prueba.mdb"
.CommandType = adCmdTable ' Se conecta el data a un objeto tabla
.RecordSource = "Libros" ' La tabla se llama Libros
End With
'Para el control DataList
With DataList1
Set .DataSource = Adodc1 ' Indica el control data que contiene los datos
Set .RowSource = Adodc1 ' Origen de datos de los elementos de la lista
.BoundColumn = "IdLibro" ' Campo que va a devolver el DataList al
' seleccionar el registro
.ListField = "Titulo" ' Campo de la tabla que se va a mostrar en el DataList
' No necesariamente igual al que se devuelve
End With
End Sub
Private Sub DataList1_Click()
' Se ejecuta al seleccionar un registro del DataList
Form2.Tag = DataList1.BoundText ' En la propiedad Tag de form2, carga el
' Id del registro elegido
%0
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar