Visual Basic - Urgente

Life is soft - evento anual de software empresarial
 
Vista:

Urgente

Publicado por Kelvin Gil (11 intervenciones) el 24/06/2006 16:11:29
Buenos dias amigos necesito saber como puedo hacer para reflejar en un listview los datos de una base de datos en access.. Pro favor alguien que me ayude es para mi tesis...
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:Urgente

Publicado por kiko (26 intervenciones) el 24/06/2006 18:57:34
Qué quieres mostrar en el ListView, las tablas de la base de datos, o los datos de una de las tablas?
Saludos
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:Urgente

Publicado por kelvin gil (11 intervenciones) el 24/06/2006 19:01:41
Quiero mostrar los datos de una tabla. la idea es colocar los datos en un formulario y que lo refleje en un listview o grid de forma automatica. si tienes la manera de hacerlo con otros controles te lo agradeceria.
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:Urgente

Publicado por kiko (26 intervenciones) el 24/06/2006 19:24:36
Una vez que tengas abierta la conexión a la BD, creas un recordset (rs) con los campos de la tabla que quieras mostar y para cargar el ListView:
Dim nItem As ListItem
Dim i As Long
Do While Not rs.EOF
Set nItem = ListView1.ListItems.Add(, , rs.Fields(0))
For i = 1 To rs.Fields.Count - 1
nItem.SubItems(i) = rs.Fields(i)
Next
rs.MoveNext
Loop
Con un DbGrid o DataGrid (depende si control data es DAO o ADO) solamente tendrías que asignar el recordset a la propiedad DataSource del grid.
Saludos
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:Urgente

Publicado por Kelvin Gil (11 intervenciones) el 24/06/2006 19:37:06
Disculpa, pero cuando me dices que si tengo abierta la conexion con cual me recomientas que lo haga sera de esta manera, con un data?

With datElemento
.Recordset.AddNew
.Recordset.Fields("HoraE") = txtHora.Text
.Recordset.Fields("MinutoE") = txtMinuto.Text
.Recordset.Fields("SegundoE") = txtSegundos.Text
.Recordset.Fields("HoraA") = txtHoraF.Text
.Recordset.Fields("MinutoA") = txtMinutoF.Text
.Recordset.Fields("SegundoA") = txtSegundosF.Text
.Recordset.Update
MsgBox "Registro Almacenado", vbInformation + vbOKOnly, "Alamcenamiento"
End With

porque de verdad nunca he hecho una conexion para un listview

la forma que tu me dices de crear la codificacion es de esta manera??

Private Sub cmdProgramar_Click()
With datElemento
.Recordset.AddNew
.Recordset.Fields("HoraE") = txtHora.Text
.Recordset.Fields("MinutoE") = txtMinuto.Text
.Recordset.Fields("SegundoE") = txtSegundos.Text
.Recordset.Fields("HoraA") = txtHoraF.Text
.Recordset.Fields("MinutoA") = txtMinutoF.Text
.Recordset.Fields("SegundoA") = txtSegundosF.Text
.Recordset.Update
MsgBox "Registro Almacenado", vbInformation + vbOKOnly, "Alamcenamiento"
End With
End Sub

Private Sub Form_Load()
tmpTiempo_Timer
With datElemento
.DatabaseName = App.Path & "\ElementoControl.mdb"
.RecordSource = "Bombillo"
End With
End Sub

Dim nItem As ListItem
Dim i As Long
Do While Not rs.EOF
Set nItem = ListView1.ListItems.Add(, , rs.Fields(0))
For i = 1 To rs.Fields.Count - 1
nItem.SubItems(i) = rs.Fields(i)
Next
rs.MoveNext
Loop

el "datelemento" en un control (data1)

Te agradezco la ayuda y disculpa la molestia
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:Urgente

Publicado por kiko (26 intervenciones) el 24/06/2006 20:17:48
Bien, por lo que veo trabajas con DAO:
Lo mas sencillo es utilizar el control DBGrid no necesitas nada de código, lo puedes hacer todo en tiempo de diseño, las propiedades del DataBaseName y RecordSource del control Data y para enlazar el DBGrid le pones la propiedad DataSource a datElemento.
Si lo quieres hacer en un control ListView sólo tienes que reemplazar en el código que puse antes rs por datElemento.Recordset.
Recomendación: Pasar a ADO. DAO no soporta versiones superiores a Access 97
Saludos
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:Urgente

Publicado por Kelvin Gil (11 intervenciones) el 24/06/2006 20:55:48
Coloque un control (microsoft ADO data control 6.0 (oledb) le cambie las propiedades de conectionstring (Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Documents and Settings\kel\Escritorio\Nueva carpeta (2)\ELEMENTOCONTROL.MDB;Persist Security Info=False) y le coloque un RecordSourse (bombillo) .

Luego segui tus indicaciones colocando la codificacion de esta manera:

Dim nItem As ListItem
Dim i As Long
Do While datelemento.Recordset.EOF
Set nItem = ListView1.ListItems.Add(, , datelemento.Recordset.Fields("HoraE"))
For i = 1 To datelemento.Recordset.RecordCount - 1
nItem.SubItems(i) = datelemento.Recordset.Fields(i)
Next
datelemento.Recordset.MoveNext
Loop

pero de verdad da un error al ejecurtar

Variable de tipo objetc o variable de bloque with no establecida

los campos de la tabla son los siguientes

HoraE
MinutoE
SegundoE

HoraA
MinutoA
SegundoA
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:Urgente

Publicado por kiko (26 intervenciones) el 24/06/2006 22:29:29
en qué parte del código te dá el error?
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

DATAGRID Urgente

Publicado por Nelson Gomez (24 intervenciones) el 28/06/2006 19:16:52
Buenas tardes kiko tengo unos problemas que se me estan presentando y es para mi tesis.
La conexion la estoy haciendo por data environment

como hago para agregar datos desde un cuadro de texto a un data grid, pero que a su vez se me almacenen en la BD. La idea es que me muestre en el datagrid no todos los datos de la BD sino que me muestren los datos que he hecho en el dia de hoy.

Otra cosa como hago si quiero salir del sistema cuando yo entre me muestre el lo que yo he grabado en el data grid

Saludos espero respuesta
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