ayuda urgente!!!

[cibernet]

hola necesito ayuda para poder realizar una busqueda automatica en SQL es decir, tengo una ventana en la cual tengo un combo1 al darle clic me debe de hacer al busqueda automaticamente sobre unos eventos que existen, despues al elegir uno me debe de llenar el campo siguiente el cual seria alumno y esta en un combo2, cuando seleccione un alumno me debe de llenar los demas los 2 cuadros de texto que restan de manera automatica y opsteriormenet guardar. ( para guardar no hay problema por que ya esta esa accion) el problema es que no puedo realizar la busqueda de esa manera, tomando en cuenta que los eventos estan en una tabla, el nombre del alumno y edad en otra tabla y el nombre de al comundad en otra tabla... la verdad no eh trabajado en SQL y pues se me esta haciendo un poco complicado, de antemano le agradesco su ayuda y espero uan respuesta pronta. gracias.

[flaviovich]

Si es una aplicacion web, puedes usar AJAX.
Si es una aplicacion windows, en el evento onclick llamas a un SP.
No entiendo cual es tu problema.

[cibernet]

esk desde uncombo box tengo que hacer una busqueda en una tabla llamada eventos que esta en SQL en un servidor y cuando me despliegue los eventos al seleccionar uno me debe de mostrar lo que contiene en otro combo llamado combo2 y este los datos los tiene que jalar de otra tabla llamada alumnos y cuando elija a un alumno me debe de desplegar sus otros datos no se si asi me entienda un poco mas el programa lo estoy realizando en visual Basic 6.0

[superdesarrollador]

Lo que debes hacer no es tan sencillo, manda como es la estructura de tu base de datos y sera mas facil explicarte qué debes hacer.

[flaviovich]

Yo lo hago asi, en el evento click del combo1:

Código:

ConectarSQLServer SERVER_NAME, DB_NAME
SEL_ITEM = cbo_combo1.ItemData(combo1.ListIndex)
Call FillCombo2 SEL_ITEM
Set cmd.ActiveConnection = Nothing
DesconectarSQLServer

Para llenar el segundo combo:

Código:

Private Sub FillCombo2(ItemSeleccionado As Integer)

Set cmd = New ADODB.Command
cmd.ActiveConnection = conn
cmd.CommandType = adCmdStoredProc
cmd.CommandText = "sp_get_lista"

cmd.Parameters(1).Value = ItemSeleccionado
Set rtmp1 = cmd.Execute

If rtmp1.BOF And rtmp1.EOF Then
    MsgBox Mensaje, vbInformation, TITULO
    Exit Sub
End If

idx = -1
combo2.Clear
rtmp1.MoveFirst
While Not rtmp1.EOF
    combo2.AddItem rtmp1("TEXTO")
    rtmp1.MoveNext
Wend

rtmp1.Close
Set rtmp1 = Nothing

End Sub

[superdesarrollador]

Y cual es el error?

[Andres95]

Si el problema es de programacion, favor de realizar tu pregunta en el foro correspondiente.


Saludos!