#
Código: Seleccionar todo
#include<Clipboard.au3>
#include<screencapture.au3>
#include<misc.au3>
_ScreenCapture_Capture ("pp.jpg")
$r= @ScriptDir & "\pp.jpg"
_ClipPutFile ($r)
gracias.
Código: Seleccionar todo
#include<Clipboard.au3>
#include<screencapture.au3>
#include<misc.au3>
_ScreenCapture_Capture ("pp.jpg")
$r= @ScriptDir & "\pp.jpg"
_ClipPutFile ($r)
Código: Seleccionar todo
#include<clipboard.au3>
#include<screencapture.au3>
#include<misc.au3>
$St=Random (100 ,500,1)
_ScreenCapture_Capture ($St&"pol.jpg")
$S=@ScriptDir & $St&"\pol.jpg"
_ClipPutFile ($S)
msgbox(0,"",$s)
Código: Seleccionar todo
#include<clipboard.au3>
#include<screencapture.au3>
#include<misc.au3>
While 1
$St=@ScriptDir & "\"&Random (100 ,50000,1)&"\"&"pol.jpg"
if not Filexist($St) then ExitLoop
Wend
_ScreenCapture_Capture ($St)
_ClipPutFile ($St)
msgbox(0,"",$st)
Gracias no lo sabia aunque no entedy muy bien lo el "/"BasicOs escribió:Hola
te hice alguna mejora para evitar sobreescribir algún jpg, y por otro lado un ejemplo porque es conveniente que solo crees el nombre del fichero una sola vez en una variable, porque tenías un error de diferente denominación (no escribiste un \).
Salu22:)
Código: Seleccionar todo
#include<clipboard.au3> #include<screencapture.au3> #include<misc.au3> While 1 $St=@ScriptDir & "\"&Random (100 ,50000,1)&"\"&"pol.jpg" if not Filexist($St) then ExitLoop Wend _ScreenCapture_Capture ($St) _ClipPutFile ($St) msgbox(0,"",$st)