una ayudita chiquita señores

Iniciado por choquito, 10 Marzo 2007, 17:50 PM

0 Miembros y 1 Visitante están viendo este tema.

choquito

hola señores, necesito su ayuda ,. mi caso es que tengo un procedimiento que esta en un modulo.. lo pusse ahi por q necesito llamar a ese procedimiento en un momento indicado...el procedimiento es:
como hago para llamar a este procedimiento de un cmdaceptar que esta en frm1..nesecito llamar al procedimiento enfocar1.. gracias por su ayuda

Private Sub Enfocar1()
Set DataGrid1.DataSource = Nothing \'esto lo desconecta del origen de datos
    With DataZaga.rsCmdclientes1
        If .State = adStateOpen Then
        .Close
        End If
        If .State = 0 Then
        .Open
        End If
    End With
Set DataGrid1.DataSource = [DataZaga] \'El nombre del origen de datos cuando es un dataenvironmet va entre corchetes
Call Enfocar2
End Sub
Private Sub Enfocar2()
X = DataZaga.rsCmdClientes.Fields(\"cod_cliente\")
        DataZaga.rsCmdclientes1.MoveFirst
        DataZaga.rsCmdclientes1.Find \"cod_cliente=\'\" & X & \"\'\"
        If Not (DataZaga.rsCmdclientes1.BOF Or DataZaga.rsCmdclientes1.EOF) Then
End If
\'X = DataZaga.rsCmdClientes.Fields(\"cod_cliente\").Value
X = DataZaga.rsCmdclientes1!cod_cliente
End Sub

<--v1c1ous-->

¿Entendi mal o es exactamente la misma pregunta con otra funcion que posteaste antes?

llamar a un procedimiento de un modulo
http://foro.elhacker.net/index.php/topic,158922.0.html


Sancho.Mazorka

Jjajaj que boludo man, si ya te lo habian respondido! En vez de poner Private pone Public y listo, dsp pones el nombre de la funcion desde cualkier lado y la llama!
Me acabo de dar cuenta de que cesaron los atakes DDOS, que bueno  :D


Sancho.Mazorka    :P
Ganador Xeon Web Server ! ! !    Sancho.Mazorka :D
http://foro.elhacker.net/index.php/topic,171903.75.html



choquito

estoy muy agradecido por su ayuda... la verdad es que no me fije bien en el otro post que puse. disculpando la insistencia.. ;D