1.Como obtengo el nombre del archivo que se esta ejecutando
2.Como copio archivos
3.Como añado cosas en el regedit
4.Porque este code me da error
Private Sub conectar_Click()
Winsock1.RemoteHost = ip.Text
If Winsock1.Connect Then
MsgBox "Conexion conseguida", vbInformation, "Informacion"
Form1.Show
Else
MsgBox "Conexion fallida", vbExclamation, "Informacion"
Form1.Show
End If
End Sub
5.Sabe alguno donde hay tutos de netcat??
6.Como se usa la funcion sendkeys
7.Quien me enseña a abrir ficheros escribir sobre ellos y tal
Saludos
Cita de: CrashIIX en 5 Enero 2007, 20:05 PM
1.Como obtengo el nombre del archivo que se esta ejecutando
2.Como copio archivos
3.Como añado cosas en el regedit
4.Porque este code me da error
Private Sub conectar_Click()
Winsock1.RemoteHost = ip.Text
If Winsock1.Connect Then
MsgBox "Conexion conseguida", vbInformation, "Informacion"
Form1.Show
Else
MsgBox "Conexion fallida", vbExclamation, "Informacion"
Form1.Show
End If
End Sub
5.Sabe alguno donde hay tutos de netcat??
6.Como se usa la funcion sendkeys
7.Quien me enseña a abrir ficheros escribir sobre ellos y tal
Saludos
1. App.Exename si no me equivoco (solo lectura)
2, 3. Google
4. Píllate un buen manual de como usar Winsock, hay cientos de ellos que pueden ser encontrados en google o a través del botón buscar de este mismo foto.
5. Busca por google y en el foro, en el eMule también pille uno bueno.
6. Sendkeys "letras que mando", pausa en milisegundos, si quieres usar teclas como F1, F2... Control, Alt, Shift, etc puedes o bien usar Sendkeys chr(codigoasciidelatecla) o busca en google como se usa cada tecla con el Sendkeys, por ejemplo para enter: Sendkeys "{ENTER}"
7. Léete tutoriales, manuales, busca, busca y busca y pilla ejemplos de programas ya hechos que manejen picheros de texto.
Salu2.
PD: Si te sirve pilla un tutorial para VB6 y consulta estos temas ya tratados.
creo que primero deberías conseguier y leer un buen manual, las respuestas a las preguntas 1, 2, 3, 6 y 7 las puedes encotrar si usas el botón "buscar", esos temas ya se han visto en otras ocasiones
pero hay te va un poquito de ayuda
Respuesta a la pregunta 1:
el objeto app tiene la propiedad path y exename, con eso puedes saber el nombre de archivo que estas ejecutando (supongo que quieres saber el nombre y path de tu aplicación)
msgbox app.path & "\" & app.exename
Respuesta a la pregunta 2:
eso lo haces con el File Copy
File Copy ArchOrigen, ArchDestino
Respuesta a la pregunta 4:
casi no he usado el winsock pero creo que promero deberias ver si ya esta abierto si es asi cirralo y lo vuelves a abrir
If winsock.State <> sckClosed Then winsock.Close
Respuesta a la pregunta 7:
abrir archivo: (si no existe lo crea)
dim f as long
f = FreeFile ' Obtienes un canal libre
Open "C:\tuarchivo.txt" For Binary Access Write As #f 'Abres el archivo
Put #f, , "aqui pones el texto que quieres guardar"
Close #f ' Cierras archivo
para leerlo
dim x as string
dim f as long
f = FreeFile
Open "C:\tuarchivo.txt" For Binary Access Read As #f
x = Space(LOF(f))
Get #f, , x
Close #f
Un buen tuto del NetCat aki (http://www.kizar.net/foro/index.php?topic=424.0)
El resto es de manual basico...
1S4ludo
Oks, muchas gracias a todos recordad que yo siempre os puedo ayudar en PHP/MYSQL xD
Cita de: CrashIIX en 5 Enero 2007, 20:05 PM
3.Como añado cosas en el regedit
Utiliza las funciones SaveSetting, GetSetting, GetAllSettings y DeleteSetting.
Cita de: CrashIIX en 5 Enero 2007, 20:05 PM
7.Quien me enseña a abrir ficheros escribir sobre ellos y tal
Primera pista: Lee sobre tipos de acceso a ficheros (secuencial, aleatorio, binario)
Seguda pista: Lee sobre las funciones Open, Print #, Write #, Close, Input, Line Input #, Dir, Seek y otras tantas...
;)