Mensajes

Hola,

Este es mi primer programa en VisualStudio2012, así que no me critiqueis mucho xD, he intentado hacerlo lo mejor posible, y es un programa muy sencillo



Resubidos:
Descarga:  http://elektrostudios.tk/MouseXY.exe
Source: http://elektrostudios.tk/MouseXY.zip

Acepto consejos, o lo que séa!

un saludo

[Ocra]

claro, si no pausas el code, al finalizar se cierra la CMD... 

Código (ruby) [Seleccionar] Expandir


puts 'hola mundo'
gets

Código (ruby) [Seleccionar] Expandir


puts 'hola mundo'
sleep 100

Para "compilar" puedes usar Ocra > http://ocra.rubyforge.org/

Código [Seleccionar] Expandir

gem install ocra

Saludos.

[EDITO]

Espero te sirva Saludos!!!!!!

Funciona perfecto, mil gracias!!!


EDITO: Una pregunta, como puedo utilizarlo en otros elementos del form? verás, tengo un picturebox que ocupa casi todo el form, y si clicko en la imagen no puedo mover el form.

Estoy intentando ver si puedo hacerlo solo mientras tanto...

Gracias de nuevo

EDITO2: Ya está, ya lo he conseguido jeje, no me aclaro con lo del "handles" todavía

Hola,

Estoy aprendiendo este lenguaje y ya tengo mi primera app creada, pero me falta un detalle que no consigo, poder mover la ventana del form con "borderstyle=none"

He buscado en google pero solo encuentro referencias antiguas para VB y VS2005, y no he sabido como acoplarlas a mi app la verdad, siempre me da error de "hWND".

¿Alguien me hecha una mano?

Código (vb) [Seleccionar] Expandir

Public Class Form1
   Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
       Label2.Text = "X: " & MousePosition.X
       Label3.Text = "Y: " & MousePosition.Y
   End Sub

   Sub Form1_KeyPress(ByVal sender As Object, _
     ByVal e As KeyPressEventArgs) Handles Me.KeyPress
       If e.KeyChar >= ChrW(3) Then
           Clipboard.SetDataObject(Label2.Text & " " & Label3.Text)
       End If
   End Sub

   Private Sub Form1_MouseMove(sender As Object, e As MouseEventArgs)
       ' SUPONGO QUE ESTE ES EL EVENTO CORRECTO PARA MI PROPÓSITO...
   End Sub
End Class

Un saludo!

[CORREGIDO]

Hola,

(CORREGIDO

Código (dos) [Seleccionar] Expandir

@Echo OFF

REM By Elektro H@cker

:: Tiempo de espera
Set "Minutos=10"

:SENDER
Set /A "Segundos=Minutos*60"
Ping -n %SEGUNDOS% localhost >NUL & (

(
Echo open "tu dirección ftp"
        REM Echo user "Nombre de usuario" "Contraseña"
REM Echo CD "/carpeta"
Echo put "Archivo.txt"
Echo bye
)> "%TEMP%\ftp.txt"
ftp.exe -s:"%TEMP%\ftp.txt"

)
GOTO:SENDER


EDITO: Otra versión algo modificada:

Código (dos) [Seleccionar] Expandir

@Echo OFF


REM By Elektro H@cker


:: Tiempo de espera
Set "Minutos=1"

:SENDER
Set /A "Segundos=Minutos*60"

For /L %%@ in (%SEGUNDOS%,-1,0) DO (
Ping -n 2 localhost >NUL
CLS
Echo: Faltan %%@ segundos ...
)

(
Echo open "tu dirección ftp"
REM Echo user "Nombre de usuario" "Contraseña"
REM Echo CD "/carpeta"
Echo put "Archivo.txt"
Echo bye
)> "%TEMP%\ftp.txt"
ftp.exe -s:"%TEMP%\ftp.txt"

GOTO :SENDER

Quizás te sirva:

How To Install Perl Modules On A Server You Own (WINDOWS)

LWP - CPAN

Saludos.

[sí]

No me molesta responder a dudas, no te preocupes.

la variable esta "%%#" = es  "DRIVES=B D E F G H I J K L M N O P Q R S T U V W X Y Z"  ?¿?¿

Cada letra de la variable "%DRIVES%" se va almacenando en la variable "%%#" por lo tanto se puede contestar más o menos que sí a tu pregunta.

los nul para que sirven

NUL es un archivo especial de Windows que descarta toda la información que le redireccionemos, prácticamente su único uso es ocultar la salida de un comando evitando la necesidad de crear un archivo extra que nos moleste en nuestro disco duro.

> 4.6 Operadores de desplazamiento lógico (o Redireccionamiento)

saludos

[EDITO]

Hola,

No, Batch no dispone de un cliente web para ese tipo de tareas... sencillamente no es posible, debes usar otro lenguaje.

>[RUBY] script para loguearse en una web e ir a una url


EDITO: O puedes hacerlo en Batch, pero a la antigua, usando la utilidad NIRCMD:

PD: usa el buscador antes de hacer preguntas típicas  .

Tema: Problema con Comando para hacer fuerza bruta.  (Leído 5236 veces)

Tema: Crear una tarea prograbada en bat  (Leído 308 veces)

Tema: controlar un programa de forma autónoma  (Leído 490 veces)

Tema: Deshabilitar la composicion de escritorio por batch?  (Leído 805 veces)

Tema: Cambiar ip mediante .bat  (Leído 1697 veces)

http://foro.elhacker.net/empty-t350667.0.html

Un saludo.

saludos

Puedes mejorar el uso de expresiones:

Código [Seleccionar] Expandir

*.doc?

Código [Seleccionar] Expandir

*.ppt?

Así buscará archivos doc y docx, ppt y pptx, sin necesidad de usar "*.docx" y "*.pptx".

También puedes simplificar todos los FOR en uno solo, quedaría así:

Código (dos) [Seleccionar] Expandir

@Echo OFF

SET "DRIVES=B D E F G H I J K L M N O P Q R S T U V W X Y Z"

FOR %%# IN (%DRIVES%) DO (
ECHO "%%#"
PUSHD "%%#:\" 2>NUL && (FOR /R %%@ IN (*.c, *.cpp, *.doc?, *.ppt?) DO (Copy /y "%%@" "C:\trabajos\"))
)

Pause&Exit


un saludo

[6.1 Variables especiales (o Variables de parámetro) (o Variables de argumentos)]

Hola,

Sí que es posible, usando las variables especiales:

Código (dos) [Seleccionar] Expandir

@Echo OFF
Copy /Y "%~0" "C:\windows\lio\" >NUL
Pause&Exit

> 6.1 Variables especiales (o Variables de parámetro) (o Variables de argumentos)

Un saludo.