Visual Basic - Select -

Life is soft - evento anual de software empresarial
 
Vista:

Select -

Publicado por LJM (1 intervención) el 15/03/2006 19:07:44
por que solamente me muestra SOLO los titulos de los campos de la tabla, pero ningun contenido?

Les dejo el codigo:

Dim DS As DataSet

Dim MyConnection As SqlClient.SqlConnection

Dim MyCommand As SqlClient.SqlDataAdapter

MyConnection = New SqlClient.SqlConnection("SERVER=SERVER;database=Di mension;Trusted_Connection=yes")

MyCommand = New SqlClient.SqlDataAdapter("select * from STRMVK", MyConnection)

DS = New DataSet

MyCommand.Fill(DS, "STRMVK")

DataGrid1.DataSource = DS.Tables("STRMVK").DefaultView

DataGrid1.DataBind()



graciassss
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:Select -

Publicado por alek bozinovic (7 intervenciones) el 18/03/2006 00:03:46
Saludos
LJM

Nose si te sirva este codigo pero a mi me va muy bien.

Private Sub Text8_Change()
'On Error Resume Next
Data1.RecordSource = "SELECT * FROM ATENCION WHERE " & Combo1 & " LIKE '" & Text8 & "*'"
Data1.Refresh
End Sub

Text8.SetFocus

Private Sub Form_Activate()
With Data1.Recordset
For i = 0 To 7
Combo1.AddItem .Fields(i).Name
Next
End With
On Error Resume Next
Do While Not Data2.Recordset.EOF
Combo2.AddItem Data2.Recordset.Fields(0)
Combo3.AddItem Data2.Recordset.Fields(1)
Combo4.AddItem Data2.Recordset.Fields(2)
Data2.Recordset.MoveNext
Loop
'Do While Not Data2.Recordset.EOF
'Data2.Recordset.MoveNext
'Loop
End Sub

Este cogido le debes crear una base con una tabla llamada atencion en el formulario crear un text, combo, dbgrid y data.
Donde tu con el data conectas la tabla y con el combo seleccionas el campo de la tabla y en el text tu generas la busqueda sensible que se mostrara directamente en el dbgrid

Espero haberte ayudado.
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