Foro de elhacker.net

Programación => Scripting => Mensaje iniciado por: z3nth10n en 8 Diciembre 2012, 14:52 pm



Título: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: z3nth10n en 8 Diciembre 2012, 14:52 pm
Hola llevo prisa, es algo así:

(http://i.imgur.com/D4XBY.png)

Como lo podria hacer?
Un saludo


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: Novlucker en 8 Diciembre 2012, 19:20 pm
Con HTA, son solamente un par de imágenes y botones, casi nada de trabajo.


Saludos


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: z3nth10n en 8 Diciembre 2012, 19:31 pm
A ver si, eso se hacer, lo que pasa que parate a pensar tengo un post hecho por mi sobre mi pack de mods de Minecraft,que para ejeuctarse ncesita batch entonces, hta no va a poder ejecutar eso, a no se que use Visual Basic 8 o 6, que tengo algo de experiencia, pero no se como lo podria hacer con Visual Basic, alguna idea, no tengo ni idea como ejecutar un BAT con Visual Basic, tampoco se como hacer para crear archivos TXT con algun nombre o algo, y luego que en un TextBox este escrito el texto que hay en ese TXT (algo asi como para hacer un login, entiendes?)

Se que necesito explicarme mejor, sorry. Un saludo.
Y si n oes posible asi, que alternativas hay?  ;)


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: Novlucker en 8 Diciembre 2012, 19:47 pm
En HTA puedes meter código vbs, con el cual si puedes ejecutar esos bat
Método run del wscript.shell ...
http://foro.elhacker.net/scripting/tutorial_vbscript-t229032.0.html

Saludos


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: z3nth10n en 8 Diciembre 2012, 20:04 pm
Gracias capo, pero una cosa, bueno 2, una, quiero que tenga un aspecto así sin marco de ventana, eso en HTA no  se puede hacer creo, y como pondriamos los codigos es decir, yo tengo la imagen que poner "Jugar", tendriamos que poner <a href="?" ????><img src="xxx" title="jugar"></a>

como seria, especificame nunca he tocado el vbs, (pero si visual basic, y hta, html), pero esto ya es algo nuevo para mi, nose como combinar vbs y html...

me podrias hacer un <body> de ejemplo en el que se ejecute un batch que se llama MC.bat que este en %appdata%/Ikillnukes/, solo para ver como quedaria. gracias :P
un saludo.


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: Novlucker en 8 Diciembre 2012, 20:30 pm
Código
  1. <html>
  2. <HEAD>
  3. <TITLE>HTA</TITLE>
  4. <HTA:APPLICATION
  5. ID="HTA"
  6. APPLICATIONNAME="HTA"
  7. BORDER="none"
  8. BORDERSTYLE="normal"
  9. CAPTION="yes"
  10. SCROLL="no"
  11. SELECTION="no">
  12.  <style type="text/css">
  13.  body { background-image: url('http://i47.tinypic.com/2mfhp53.jpg'); }
  14.  </style>
  15. </HEAD>
  16. <body>
  17. <center>
  18.  
  19. <script language="VBScript">
  20. Window.ResizeTo 256, 256
  21. </script>
  22. <input type="button" value="Ejecutar" name="btnEjecutar" onClick="ejecutar">
  23. <input type="button" value="Cerrar" name="btnCerrar" onClick="javascript:window.close();">
  24. <script language="VBScript">
  25. Function ejecutar()
  26. set objshell = createobject("wscript.shell")
  27. appdata = objshell.expandenvironmentstrings("%APPDATA%")
  28. objshell.run appdata & "\Ikillnukes\MC.bat"
  29. End Function
  30. </script>
  31.  
  32. </center>
  33. </body>
  34. </html>

Saludos


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: z3nth10n en 8 Diciembre 2012, 20:39 pm
Dioooooos, tu deberias dedicarte a ser mago XDxd xD xDDDDD y como haria un boton que cerrase la aplicacion, voy a buscar yo de mi cuenta, pero porfavro resuelveme tu esta duda... xDxdXD

y otra cosa, si quiero poner imagenes, funcionaria?
PD: Se ve con un poco de borde la ventana hay alguna forma de que sea ese marco plano completamente :)


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: Novlucker en 8 Diciembre 2012, 20:54 pm
Te he modificado el code anterior para que te hagas una idea, sobre el borde, deberás de probar :P

Saludos


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: z3nth10n en 8 Diciembre 2012, 20:57 pm
Oh lol, no se ya estuve tocando, ya vere lo que hago, otra cosilla...
Como haria un menu de opciones... es que no se explicar, tu le das click a un boton que ponga Opciones y hay se abre una ventanita con las opciones,

cosas que debo saber hacer hay:

Leer texto de un archivo dat o txt, ejemplo
user=Taldetal
el textbox deberia leer la variable user y poner dentro del mismo TaldeTal
algo asi, como un recordatorio, si se modifica que tambien cambie dentro del archivo cuando le demos a Ejecutar

eso esa son las dos primeras cosas que quiero saber hacer :P


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: z3nth10n en 8 Diciembre 2012, 23:35 pm
La primera parte de la ventanita y tal se como hacerla, lo que no se es eso del input text que lee el txt... un saludo


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: Novlucker en 9 Diciembre 2012, 01:29 am
Mejor ahora :P Lo de leer el archivo lo tienes en el mismo tutorial de vbs del cual te he dejado link antes, luego de leído el contenido, puedes asignarlo a un input haciendo uso de getelementbyid

Saludos
 


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: z3nth10n en 9 Diciembre 2012, 01:36 am
Justo lo lei,

Citar
Leer desde archivos de texto

Así  como abrimos archivos y podemos escribir en ellos, también existe la posibilidad de leer desde ellos, para lo cual utilizaremos readline, y readall.
Como se puede imaginar, con readline iremos leyendo una a una las líneas del archivo (cada vez que pongamos readline leeremos solo una), con este, leemos una línea, y el puntero se situa al final de la línea, para que a la próxima ejecución de esta función, sea la línea siguiente la que sea leída. Con readall en cambio, leeremos el total de archivo.
Existe además una función llamada skipline, con la cual saltaremos la lectura de una línea.

Ejemplo:
Código
Set objfso = createobject("scripting.filesystemobject")
Set archivotexto = objfso.opentextfile("C:\archivo.txt",1)   'abrimos el archivo
msgbox archivotexto.readline               'leemos una linea, la primera
archivotexto.skipline                     'saltamos una linea
msgbox archivotexto.readline               'leemos una linea, la tercera
archivotexto.close                     'cerramos el archivo


pero no se como indexarlo con el get element by id, hazmelo otra vez, es que soy nuevo y eso me suena a chino, plis :P

PD: A ser posible, puedes contestarme lo mas rapido que puedas? gracias, es que tengo que irme :P


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: z3nth10n en 9 Diciembre 2012, 02:16 am
aaaaa, pera imaginate tengo un input text con id... no se "perico", entonces pondria:

getElementById('perico').value = funcion ????

 ;)

PD: Edito

esto es lo que hice

Código:
<body onload="leer()">
<input id="test" type="text" />
<script>
Function leer()
Set objfso = createobject("scripting.filesystemobject")
appdata = objshell.expandenvironmentstrings("%APPDATA%")
Set archivotexto = objfso.opentextfile(appdata & "\Ikillnukes\test.txt",1)
msgbox archivotexto.readline               'leemos una linea, la primera
archivotexto.close                     'cerramos el archivo
End Function

</script>

 <script languaje="javascript">
function leer(){
document.getElementById('test').value = leer
}
</script>
...
</body>

y lo que me sale es:

function leer(){document.getElementById('test').value = leer}

XD

me deberia salir "caca"
 que es lo que puse en el test.txt

xD

un saludo  :xD


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: z3nth10n en 9 Diciembre 2012, 17:53 pm
OMG! Lo estuve probando todo sobre lo del borde no se ni que hacer, y del input text no se que hacer, por favor, ya te dije que me hicieras el codigo, a ser posible lo mas antes que puedas. Siento molestar, muchas gracias :D


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: Eleкtro en 9 Diciembre 2012, 19:12 pm
Si quieres hacer un buen launcher, ¿Porque no usar software profesional?.

También puedes hacerlo con VisualStudio (VB), es muy fácil y tienes mil tutoriales:
> http://forums.epicgames.com/threads/884734-Create-Standalone-Game-Launcher-for-your-UDK-Games
> http://www.youtube.com/watch?v=B9NZ4KT8gy4

Saludos


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: z3nth10n en 9 Diciembre 2012, 19:20 pm
Ya se que se usar VB (lo basico), pero xD es que no tengo ganas de programar así, prefiero aprender a escribir :P

Porfi si sabes que se esta cociendo responde a mi pregunta plis :P


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: Eleкtro en 9 Diciembre 2012, 19:57 pm
a no ser que use Visual Basic 8 o 6, que tengo algo de experiencia, pero no se como lo podria hacer con Visual Basic, alguna idea, no tengo ni idea como ejecutar un BAT con Visual Basic

Te he mostrado dos enlaces donde explican paso a paso como hacerlo con videos, ni siquiera tienes que programar, solamente tienes que copiar lo que ves y añadir 4 chorradas manualmente para asociar los archivos que quieres ejecutar.

Citar
tampoco se como hacer para crear archivos TXT con algun nombre o algo, y luego que en un TextBox este escrito el texto que hay en ese TXT (algo asi como para hacer un login, entiendes?)

(http://img687.imageshack.us/img687/8564/prtscrcapturemq.jpg)

http://www.mediafire.com/?hut531l0ax1hbaa

Afirmas que ya tienes algo de experiencia usando VB, pues ahí te dejo el ejemplo de launcher que te he hecho con el source, aunque lo del login mediante un archivo de texto...no te he captado la idea, espero que no tengas el morro de seguir pidiendoselo todo hecho al compañero NovLucker.

Saludos.



Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: z3nth10n en 9 Diciembre 2012, 20:04 pm
Jeje gracias. Lo vere ahora te comento.
PD: Yo me refiero a Visual Basic, no VB script, ni VB.net. xD
---

A ver te explico...
Tu me dijistes que de HTML no vas fino, pero de BATH y VB.net, y todo esto eres un fiera (segun tengo entendido), te paso un .HTA para que veas lo que tengo hecho...

Mas o menos segun tu hicistes este launcher bastante currado, pero en VBscript...

LOL

http://www.mediafire.com/?lv4o9jz2rivlldl

Un saludo.  Graciaaaaas ~~  ;)



Te he mostrado dos enlaces donde explican paso a paso como hacerlo con videos, ni siquiera tienes que programar, solamente tienes que copiar lo que ves y añadir 4 chorradas manualmente para asociar los archivos que quieres ejecutar.


Respondo a tu pregunta, prefiero hacerlo en VBscript, ya que entiendo mas de HTML y batch y lo puedo mezclar.

Que VB.net, porque no entiendo ni una chorra.

Con el VBscript solo me faltan saber algunas cosas y ya domino mi launcher.  >:D

Así que bueno, perdon por la confusion y todo eso.  :rolleyes:



[MOD] No hagas doble post plz


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: Eleкtro en 9 Diciembre 2012, 21:39 pm
Simplemente pensé que sabiendo VisualBasic 6 podrías defenderte con ese source en VB.NET, perdona por insistir,
creo que no tienes inconveniente en hacerlo en el lenguaje que séa y por eso insisto, porque en VB es muy fácil y te ahorras todo ese hardcodeo de botones y demás !!,
veo que te está costando más todas las preguntas que estás haciendo, que intentar editar el source que te pasé xD, dices que no tienes ni idea, vale, pero es que no hay que tener casi idea, de verdad, es fácil.


En batch no puedes hacerlo.
En vbs tampoco.

Puedes usar HTA para añadir código VBS, bien, eso ya lo sabes, también sabes que no puedo ayudar mucho en eso.
Puedes hacerlo en python o ruby con TK, pero tienes que hardcodear todos los elementos del menu y por eso no merece la pena el tiempo que se invierte para finalizarlo (Pienso lo mismo del menú en HTA).

Conclusión: La misma que antes, hazlo en VB6 o VB.NET !

PD: Ya no insisto más xD

Saludos.


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: z3nth10n en 9 Diciembre 2012, 22:02 pm
Simplemente pensé que sabiendo VisualBasic 6 podrías defenderte con ese source en VB.NET, perdona por insistir,
creo que no tienes inconveniente en hacerlo en el lenguaje que séa y por eso insisto, porque en VB es muy fácil y te ahorras todo ese hardcodeo de botones y demás !!,
veo que te está costando más todas las preguntas que estás haciendo, que intentar editar el source que te pasé xD, dices que no tienes ni idea, vale, pero es que no hay que tener casi idea, de verdad, es fácil.


En batch no puedes hacerlo.
En vbs tampoco.

Puedes usar HTA para añadir código VBS, bien, eso ya lo sabes, también sabes que no puedo ayudar mucho en eso.
Puedes hacerlo en python o ruby con TK, pero tienes que hardcodear todos los elementos del menu y por eso no merece la pena el tiempo que se invierte para finalizarlo (Pienso lo mismo del menú en HTA).

Conclusión: La misma que antes, hazlo en VB6 o VB.NET !

PD: Ya no insisto más xD

Saludos.


Como Nov si sabe de VBS el me puede ayudar.
Un saludo.


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: Novlucker en 10 Diciembre 2012, 01:53 am
Como Nov si sabe de VBS el me puede ayudar.
Un saludo.

Pero es que Nov trabaja como desarrollador de lunes a viernes, el da ideas, no codea todo por los demás :xD

Sobre tu problema con el leer, por que no tienes una sola función leer? desde vbs también puedes utilizar getelementbyid

Saludos


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: z3nth10n en 10 Diciembre 2012, 07:43 am
Pero es que Nov trabaja como desarrollador de lunes a viernes, el da ideas, no codea todo por los demás :xD

Sobre tu problema con el leer, por que no tienes una sola función leer? desde vbs también puedes utilizar getelementbyid

Saludos


La madre que te pario Pero si yo nunca he usado VBS si he usado JS, pero no lo se aplicar, por eso digo que para una vez que alguien no sabe, pues que se lo codees, le haces la vida posible a otros, con que me digas como se hace (el codigo) ya me las apaño yo con todo lo demas.

Tengo otra dudilla, pero mas adeltante te la cuestiono. Ahora, si eres tan amable, ¿me podrias decir el codigo?
Graciaaaaaas. ~~
Un saludo. :D


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: z3nth10n en 11 Diciembre 2012, 14:55 pm
Por favor, Nov, no se como lo puedo hacer, estoy en el mismo atasco que antes. Podrias aunque sea darme una pista.  :(


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: Novlucker en 11 Diciembre 2012, 15:06 pm
Pero es que te había dado una pista ...
Sobre tu problema con el leer, por que no tienes una sola función leer? desde vbs también puedes utilizar getelementbyid

Han pasado dos días y parece ser que sigues sin avances ... dices que has programado en varios lenguajes, ¿por que simplemente no lo intentas en uno de esos que si manejas?

Saludos


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: Eleкtro en 11 Diciembre 2012, 16:16 pm
@seazoux

Yo no sé CSS y de HTML lo justo, pero incluso a mi me sería muy fácil editar el code HTA que te pasó Novlucker, más que nada porque Nov ya se ha currado la escritura de los atributos y los parámetros necesarios, eso lo hace fácil y entendible.

¿Que es lo que necesitas que haga el code de Nov o que se supone que le falta?

Saludos


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: z3nth10n en 11 Diciembre 2012, 16:23 pm
Pero es que te había dado una pista ...
Han pasado dos días y parece ser que sigues sin avances ... dices que has programado en varios lenguajes, ¿por que simplemente no lo intentas en uno de esos que si manejas?

Saludos

Porque lo que pregunto no tengo npi como se programa en ninguno de los lenguajes.  ;-)

xD
Por favor, te lo estoy diciendo. Gracias.  ;D



@seazoux

Yo no sé CSS y de HTML lo justo, pero incluso a mi me sería muy fácil editar el code HTA que te pasó Novlucker, más que nada porque Nov ya se ha currado la escritura de los atributos y los parámetros necesarios, eso lo hace fácil y entendible.

¿Que es lo que necesitas que haga el code de Nov o que se supone que le falta?

Saludos

A ver, simplemente esto no lo se hacer en ningun lenguaje...

Leer el contenido de una linea de texto y que salga en un input text

Eso lo hace ser en batch pero como no lo puedo mezclar con HTML, por eso, lo necesito



[MOD] No hagas doble post, segundo aviso...


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: Eleкtro en 11 Diciembre 2012, 16:30 pm
Leer el contenido de una linea de texto y que salga en un input text

Eso lo tienes más que documentado aquí y en Google  :xD

ya te ayudo, pero querrás decir en un textbox? como en la imagen del launcher que te pasé, no?


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: z3nth10n en 11 Diciembre 2012, 20:23 pm
Eso lo tienes más que documentado aquí y en Google  :xD

ya te ayudo, pero querrás decir en un textbox? como en la imagen del launcher que te pasé, no?

Si pero no xDDDD Es en html por eso lo digo... xD

Además mira que bien que tengo ya el launcher de terminado:

(http://i.imgur.com/usIAK.png)

Por eso. :P

Un saludo.

PD: elektro hago doble post porque si no me olvidais, necesito soporte rapido, llevo aqui dos dias y no he avanzado casi nada.  :silbar:


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: Eleкtro en 12 Diciembre 2012, 09:20 am
Pero postea el code de ese launcher, para saber la id o el nombre del textbox xD

PD: ¿Has probado getelementsbytagname("Usuario")?
http://msdn.microsoft.com/en-us/library/system.windows.forms.htmldocument.getelementsbytagname.aspx
http://msdn.microsoft.com/en-us/library/system.windows.forms.htmldocument.getelementbyid.aspx

Saludos.


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: z3nth10n en 12 Diciembre 2012, 14:59 pm
Pero postea el code de ese launcher, para saber la id o el nombre del textbox xD

PD: ¿Has probado getelementsbytagname("Usuario")?
http://msdn.microsoft.com/en-us/library/system.windows.forms.htmldocument.getelementsbytagname.aspx
http://msdn.microsoft.com/en-us/library/system.windows.forms.htmldocument.getelementbyid.aspx

Saludos.

No he probado nada porque no tengo npi:

toma el code:

http://pastebin.com/dRXLFUyw



Si ya lo vi, pero no se aplicarlo, no tengo nada de VBscript.  :-[

Ayuditaaaarl, Nov que te cuesta codearme esto?  :¬¬


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: Novlucker en 12 Diciembre 2012, 15:12 pm
No me cuesta nada, pero no me creo que hayas hecho siquiera el intento, y eso me molesta :¬¬

Aún sigues con el problema de asignar el nombre de usuario, así que te vuelvo a dar la misma idea por tercera vez;
Código
  1. <html>
  2. <HEAD>
  3. <TITLE>LAUNCHER</TITLE>
  4. <script>
  5. function show(myID) {
  6. document.getElementById(myID).style.display = "block";
  7. }
  8. function hide(myID) {
  9. document.getElementById(myID).style.display = "none";
  10. }
  11. </script>
  12. <style type="text/css">
  13. .panel
  14. {
  15. position:absolute;
  16. width:510px;
  17. height:340px;
  18. top:45px;
  19. left:0px;
  20. text-align:center;
  21. background: #fff url('images/fondo.png') repeat;
  22. }
  23. .subp {
  24. width:382px;
  25. height:340px;
  26. position:absolute;
  27. left:260px;
  28. margin-left:-191px;
  29. top:0;
  30. background-color:#e5eecc;
  31. border:solid 1px #c3c3c3;
  32. }
  33. #wbo {
  34. position:absolute;
  35. width:510px;
  36. height:430px;
  37. left:0;
  38. top:0;
  39. background: #000;
  40. display:none;
  41. }
  42. </style>
  43. <style>
  44. body {
  45. width:100%;
  46. height:100%;
  47. margin:0px;
  48. font-family:arial;
  49. font-size:12px;
  50. }
  51. #table {
  52. text-align:center;
  53. position:absolute;
  54. bottom:0px;
  55. left:0px;
  56. }
  57. #td {
  58. width:170px;
  59. }
  60. .bg {
  61. /* Set rules to fill background */
  62. background: #fff url('images/fondo.png') repeat;
  63. /* Set up proportionate scaling */
  64. width: 510px;
  65. height: 340px;
  66.  
  67. /* Set up positioning */
  68. position: absolute;
  69. top: 45;
  70. left: 0;
  71. }
  72.  
  73.  
  74. .logo {
  75. position:absolute;
  76. width:410px;
  77. height:75px;
  78. top:55px;
  79. left:260px;
  80. margin-left:-205px;
  81. }
  82. .logo2 {
  83. position:absolute;
  84. top:135px;
  85. left:260px;
  86. width:180px;
  87. height:32px;
  88. margin-left:-90px;
  89. }
  90. .login {
  91. width:350px;
  92. height:70px;
  93. background: #808080;
  94. position:absolute;
  95. left:260px;
  96. margin-left:-175px;
  97. top:174px;
  98. border: 5px #000 solid;
  99. }
  100. .wbg {
  101. width:510px;
  102. height:45px;
  103. position:absolute;
  104. top:0px;
  105. left:0px;
  106. background: url('images/wbg.png') repeat;
  107. }
  108. @font-face {
  109.    font-family: 'xeronregular';
  110.    src: url('fonts/xeron.eot');
  111.    src: url('fonts/xeron.eot?#iefix') format('embedded-opentype'),
  112.         url('fonts/xeron.woff') format('woff'),
  113.         url('fonts/xeron.ttf') format('truetype'),
  114.         url('fonts/xeron.svg#xeronregular') format('svg');
  115.    font-weight: normal;
  116.    font-style: normal;
  117.  
  118. }
  119. .back {
  120. width:510px;
  121. height:45px;
  122. background:#000;
  123. position:absolute;
  124. bottom:0px;
  125. left:0px;
  126. }
  127. #byr {
  128. width:125px;
  129. height:25px;
  130. }
  131. #cerrar {
  132. width:16px;
  133. height:16px;
  134. top:15px;
  135. right:16px;
  136. position:absolute;
  137. }
  138. .ser13 {
  139. position:absolute;
  140. left: 260px;
  141. margin-left:-90px;
  142. bottom:55px;
  143. }
  144. #wbod {
  145. width:100%;
  146. height:100%;
  147. }
  148. #back {
  149. position:relative;
  150. top:5px;
  151. }
  152. </style>
  153. <HTA:APPLICATION
  154. ID="HTA"
  155. APPLICATIONNAME="HTA"
  156. BORDER="none"
  157. BORDER STYLE="raised"
  158. CAPTION="yes"
  159. SCROLL="no"
  160. SELECTION="no">
  161. <body bgcolor="000000">
  162. </HEAD>
  163. <body>
  164. <center>
  165. <script language="VBScript">
  166. Function ejecutar()
  167. set objshell = createobject("wscript.shell")
  168. appdata = objshell.expandenvironmentstrings("%APPDATA%")
  169. objshell.run appdata & "\Ikillnukes\MC.bat"
  170. End Function
  171.  
  172. Function opciones()
  173. set objshell = createobject("wscript.shell")
  174. appdata = objshell.expandenvironmentstrings("%APPDATA%")
  175. objshell.run appdata & "\Ikillnukes\OPT.hta"
  176. End Function
  177. </script>
  178.  
  179. <div id="wbod">
  180. <div class="wbg">
  181. <h2 style="color:#fff; font-family: 'xeronregular'; position:absolute; top:3px; left:16px; width:510px; margin-left:-260px; left:260px;"><b>HugeCraft</b><b style="font-family: 'arial';">&#38;#8482;</b><b> - Login</b></h2>
  182. <img src="images/cerrar0.png" onmouseover="this.src='images/cerrar1.png';" onmouseout="this.src='images/cerrar0.png';" onClick="javascript:window.close();" name="btnCerrar" id="cerrar" />
  183. </div>
  184. <div class="bg">
  185. </div>
  186. <img src="images\image2.png" class="logo" />
  187. <img src="images\text.png" class="logo2" />
  188. <div class="login">
  189. <center><br>Usuario: <input type="text" style="width:200px;" name="username" /></center>
  190. </div>
  191. <img src="images/serie1.png" onmouseover="this.src='images/serie2.png';" onmouseout="this.src='images/serie1.png';" onClick="show('serie')" name="btnSerie" class="ser13" />
  192. <div class="back">
  193.  
  194. <table id="table">
  195. <tr><td id="td">
  196. <img src="images/opciones1.png" onmouseover="this.src='images/opciones2.png';" onmouseout="this.src='images/opciones1.png';" onClick="show('wbo')" name="btnOpciones" id="byr" />
  197. </td><td id="td">
  198. <img src="images/jugar1.png" onmouseover="this.src='images/jugar2.png';" onmouseout="this.src='images/jugar1.png';" onclick="ejecutar()" name="btnEjecutar" id="byr" />
  199. </td><td id="td">
  200. <img src="images/creditos1.png" onmouseover="this.src='images/creditos2.png';" onmouseout="this.src='images/creditos1.png';" onClick="show('credit')" name="btnCreditos" id="byr" />
  201. </td></tr></table>
  202.  
  203. </div>
  204. <div id="wbo">
  205. <div class="wbg">
  206. <h2 style="color:#fff; font-family: 'xeronregular'; position:absolute; top:3px; left:16px; width:510px; margin-left:-260px; left:260px;"><b>HugeCraft</b><b style="font-family: 'arial';">&#38;#8482;</b><b> - Opciones</b></h2>
  207. </div>
  208. <div class="panel"><div class="subp">Hello world!</div></div>
  209. <div class="back">
  210. <img src="images/back1.png" onmouseover="this.src='images/back2.png';" onmouseout="this.src='images/back1.png';" onClick="hide('wbo')" name="btnCreditos" id="back" />
  211. </div>
  212. </div>
  213. </div>
  214.  
  215. <script language="VBScript">
  216.    Sub Window_Onload
  217.        strComputer = "."
  218.        Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
  219.        Set colItems = objWMIService.ExecQuery("Select * From Win32_DesktopMonitor")
  220.        For Each objItem in colItems
  221.            intHorizontal = objItem.ScreenWidth
  222.            intVertical = objItem.ScreenHeight
  223.        Next
  224.        intLeft = (intHorizontal - 510) / 2
  225.        intTop = (intVertical - 430) / 2
  226.        window.resizeTo 510,430
  227.        window.moveTo intLeft, intTop
  228. document.getElementById("username").value = "Novlucker"
  229.    End Sub
  230. </script>
  231.  
  232.  
  233. </center>
  234. </body>
  235. </html>

Debes de reemplazar "Novlucker" por el texto retornado desde tu archivo

Saludos


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: z3nth10n en 12 Diciembre 2012, 15:23 pm
Pero si es lo mismo que el JS.

Pero, lo necesito en archivo externo para poder editarlo con BAT.

? Si lo siento que no lo haya intentado, es que no se como hacer lo que quiero hacer.
Por eso. Sorry.  :silbar:


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: Novlucker en 12 Diciembre 2012, 16:00 pm
Debes de reemplazar "Novlucker" por el texto retornado desde tu archivo
Pero, lo necesito en archivo externo para poder editarlo con BAT.
Seguro que con un par de ajustes lo consigues ;-)


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: z3nth10n en 12 Diciembre 2012, 16:16 pm
Seguro que con un "par" de ajustes lo consigues ;-)

Ya estamos en el mismo caso de antes. No he tocado en mi vida VBscript... Si JS pero que no se como lo puedo hacer, dios, que te cuesta, nada, por favor, si no lo intento es porque no se como seguir, me arte a buscar y no encontre absolutamente NADA.  :¬¬


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: Eleкtro en 12 Diciembre 2012, 16:37 pm
me arte a buscar y no encontre absolutamente NADA.  :¬¬

No me lo creo!

Google + "read textfile vbs"
En la primera entrada tienes la solución.


EDITO:

Código
  1.    <script language="VBScript">
  2.       Sub Window_Onload
  3.           strComputer = "."
  4.           Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
  5.           Set colItems = objWMIService.ExecQuery("Select * From Win32_DesktopMonitor")
  6.           For Each objItem in colItems
  7.               intHorizontal = objItem.ScreenWidth
  8.               intVertical = objItem.ScreenHeight
  9.           Next
  10.           intLeft = (intHorizontal - 510) / 2
  11.           intTop = (intVertical - 430) / 2
  12.           window.resizeTo 510,430
  13.           window.moveTo intLeft, intTop
  14.  
  15.           ' Aquí lees la linea del archivo de texto
  16.            set objFileToRead = CreateObject("Scripting.FileSystemObject").OpenTextFile("User.txt",1)
  17.            strLine = objFileToRead.ReadLine()
  18.            objFileToRead.Close
  19.  
  20.            document.getElementById("username").value = strLine
  21.       End Sub
  22.    </script>


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: z3nth10n en 12 Diciembre 2012, 16:52 pm
Really???????

En serio, no miento me tire la media hora buscando y no encontre nada.

Esta es la diferencia en entre el español y el ingles (aunque tambien buque en ingles) enserio... O no uso palabras o no se buscar y encontrarrrrr DIOS xD

Gracias. Me tengo que ir luego le hecho un vistazo  ;-) ;-) ;-) ;-)



Ese texto me suena, lo que habeis hecho es ponerle lo del document MMM

Si vale... soy un zopenco, tienes razon Nov no a ver probado... Lo siento de veras.

Pero es que me he asustado un poco con esto del VBS y no queria cargarme nada, en fin... Muchas gracias.

Tengo otra dudilla...

Como puedo mezclar la function "jugar" con el Window.close(); es que me da error...

Y eso si que estuve probando.

Un saludo.



Sa p**a madre! Si que funciona si! XDXD

Y como haria para editar desde el input y que cada vez que pusieras algo automaticamente se guardara?  :xD

Subimos de nivel, intentare buscar algo y os cuento.  :silbar:


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: Eleкtro en 12 Diciembre 2012, 18:32 pm
Y como haria para editar desde el input y que cada vez que pusieras algo automaticamente se guardara?  :xD

intentare buscar

No te tienes que ir muy lejos

Google + "read textfile vbs"
En la primera entrada tienes la solución.

http://www.activexperts.com/activmonitor/windowsmanagement/adminscripts/other/textfiles/#WriteDataText.htm

EDITO: Creo que con un FOR podrías hacer una especie de evento para detectar cada vez que se añade/elimina una letra en el textbox y entonces guardar el valor en el archivo de texto,
eso si lo quieres hacer perfecto :xD pero yo lo que haría es escribir el valor del textbox en el archivo de texto cuando pulsas el botón de jugar, que se guarde cuando pulses ese botón.

saludos


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: z3nth10n en 12 Diciembre 2012, 19:43 pm
Mezclando lenguajes.
Elektro Rulez.


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: z3nth10n en 13 Diciembre 2012, 14:55 pm
Ha pasado un dia casi. Tecnicamente puedo volver a postear sin hacer doble post.

Ay! otra vez me ha entrado el panico...  :rolleyes:

Como lo podria hacer? Ideas, pistas, algo...  :P

Gracias.



A ver, si tengo el input... podria hacer un getElementById().value = srtrLine?

O no es igual que la multiplicacion, el orden de los factores no altera el producto?

Es que no se como obtener el vale de un txt para meterlo en una variable  :laugh:



Porque solo me sale asp, ademas lo quiero ya encontrar hecho a ver si lo encuentro...  >:D



Ostis: http://ezinearticles.com/?VBScript---FileSystemObject&id=294348

To enable the use of friendly names for these modes add the following constants to your script:


Citar
Const ForReading = 1
Const ForWriting = 2
Const ForAppending = 8

Es decir, a ver...  :o



Ehm vale....

objTextFile.WriteLine("Hallo world")

Problema, como le meto el input del text?  :-\

Un saludo.



Nov no te quejabas de que no probaba:

Código:
   set Linea = document.getElementById("username").value
   Set objTextFile = objFSO.OpenTextFile("User.txt", ForWriting, True)
   objTextFile.WriteLine(Linea)
            objTextFile.Close

Problema:

(http://i.imgur.com/NVkSE.png)

Un saludo.



Probando probando hice esto:

Código:
<script>
Function test()
Const ForAppending = 8
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objTextFile = objFSO.OpenTextFile _
    ("User.txt", ForAppending, True)   
    objTextFile.WriteLine("test")
objTextFile.Close
End Function

</script>

y

Citar
<input value="Test" onClick="test()" style="position:relative; top:30px;" type="button" />

Y si funciona, pero no se como poner en "Test"

La variable del input y que se actualice automaticamente.
Un saludo.  :o


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: Eleкtro en 13 Diciembre 2012, 16:03 pm
Seazoux, lo tienes todo hecho, solo hace falta este pequeño ajuste:

Código
  1. Function test(argumento)
  2.    Set objFSO = CreateObject("Scripting.FileSystemObject")
  3.  
  4.    ' el "8" hace un "appending", en el ejemplo de arriba lo usas pero no creo que séa lo que quieres, usa el "2" si pretendes reemplazar el contenido del archivo:
  5.    ' Set objTextFile = objFSO.OpenTextFile("User.txt", 2, True)
  6.  
  7.    Set objTextFile = objFSO.OpenTextFile("User.txt", 8, True)  
  8.    objTextFile.WriteLine(argumento)
  9.    objTextFile.Close
  10. End Function


Código:
<input value="Test" onClick="test(argumento)" style="position:relative; top:30px;" type="button" />

* donde onClick="test(argumento)" argumento debe ser el nombre de la variable que contiene el texto del texbox, si no recuerdo mal era "strline".

Saludos.


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: z3nth10n en 13 Diciembre 2012, 16:15 pm
Seazoux, lo tienes todo hecho, solo hace falta este pequeño ajuste:

Código
  1. Function test(argumento)
  2.    Set objFSO = CreateObject("Scripting.FileSystemObject")
  3.    ' el "8" hace un "appending", en el ejemplo de arriba lo usas pero no creo que séa lo que quieras, este es para reemplazar el contenido del archivo:
  4.    ' Set objTextFile = objFSO.OpenTextFile("User.txt", 2, True)
  5.    Set objTextFile = objFSO.OpenTextFile("User.txt", 8, True)  
  6.    objTextFile.WriteLine(argumento)
  7.    objTextFile.Close
  8. End Function


Código:
<input value="Test" onClick="test(argumento)" style="position:relative; top:30px;" type="button" />

* donde onClick="test(argumento)" argumento debe ser el nombre de la variable que contiene el texto del texbox, si no recuerdo mal era "strline".

Saludos.

Y tu decias que de HTML no eras bueno... xD y VBS? xD Dudo  :xD


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: Eleкtro en 13 Diciembre 2012, 16:20 pm
Y tu decias que de HTML no eras bueno... xD y VBS? xD Dudo  :xD

Es que eso son cosas muy fáciles, es muy básico, solo hay que entender la sintaxis.

Saludos!


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: z3nth10n en 13 Diciembre 2012, 17:38 pm
Es que eso son cosas muy fáciles, es muy básico, solo hay que entender la sintaxis.

Saludos!

Pues entonces yo no entiendo ni una ***** caca.


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: z3nth10n en 14 Diciembre 2012, 07:43 am
Error: No está definida StrLine  :-X Mira que te lo dije:

Code: http://pastebin.com/1Ge2ZY7C

 :-\


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: Eleкtro en 14 Diciembre 2012, 07:57 am
Error: No está definida StrLine  :-X Mira que te lo dije:
Código:
Function test(strLine)
...
Entendiste mal mi explicación.


Código
  1. ' Hacemos que la función pueda recibir UN argumento, a la variable del argumento le doy el nombre "ARGUMENTO" como podría darle cualquier otro nombre.
  2. Function test(ARGUMENTO)
  3.    Set objFSO = CreateObject("Scripting.FileSystemObject")
  4.    Set objTextFile = objFSO.OpenTextFile("User.txt", 8, True)
  5.    ' Escribimos en el archivo de texto la variable "ARGUMENTO" que contiene el argumento que le has pasado a la función, es decir, El contenido de "ARGUMENTO" será lo mismo que el contenido de "strLine".
  6.    objTextFile.WriteLine(ARGUMENTO)
  7.    objTextFile.Close
  8. End Function

Le enviamos la variable "strLine" como argumento a la función:
Código:
onClick="test(strLine)"


Saludos


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: z3nth10n en 14 Diciembre 2012, 14:49 pm
Código:
Function test(strLine)
...
Entendiste mal mi explicación.


Código
  1. ' Hacemos que la función pueda recibir UN argumento, a la variable del argumento le doy el nombre "ARGUMENTO" como podría darle cualquier otro nombre.
  2. Function test(ARGUMENTO)
  3.    Set objFSO = CreateObject("Scripting.FileSystemObject")
  4.    Set objTextFile = objFSO.OpenTextFile("User.txt", 8, True)
  5.    ' Escribimos en el archivo de texto la variable "ARGUMENTO" que contiene el argumento que le has pasado a la función, es decir, El contenido de "ARGUMENTO" será lo mismo que el contenido de "strLine".
  6.    objTextFile.WriteLine(ARGUMENTO)
  7.    objTextFile.Close
  8. End Function

Le enviamos la variable "strLine" como argumento a la función:
Código:
onClick="test(strLine)"


Saludos

Pero argumento lo dejamos o lo quitamos, pero si lo puse, en todos los lados  :laugh:



Despues de poner esto:

Código
  1. Function test(argumento)
  2.    Set objFSO = CreateObject("Scripting.FileSystemObject")
  3.    Set objTextFile = objFSO.OpenTextFile("User.txt", 8, True)  
  4.    objTextFile.WriteLine(argumento)
  5.    objTextFile.Close
  6. End Function
  7.  

Error: Se sobrepasó el final del archivo.

 :P Ale a codear hasta 2014.
Gagaga xDDD



Error: strLine no está definido.

Venga Nov a hacer turnos xDDDD
:P



Me estoy reventando la cabeza, he puesto un onchange="strLine = this.value" en el  input text y nada.

He probado un onload= en el Input, nada

En fin, alguna solucion alternativa, estuve buscando como sacar el value de un input text y meterlo en una variable con vbscript y con javascript, y nada  :¬¬

Lo estuve probando todo TODO

Un saludo.  :huh: :huh: :huh: :huh: :huh:


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: Eleкtro en 14 Diciembre 2012, 16:44 pm
El error está muy claro, LA VARIABLE NO ESTÁ DEFINIDA (ESTÁ VACÍA),
En el sub "Window_Onload" defines la variable, pero al salir del sub la variable se vuelve vacía, además, en el último code que pusiste en pastebin seteas la variable "strLine" como "Contenido del archivo de texto", y lo que tienes que pasarle a la función test es el contenido del "textbox", no el del jodid* archivo de texto xD.

Añade esto justo arriba de la función "test(argumento)":
Código
  1.    Function get_inputtext()
  2.        strLine = document.getElementById("username").value
  3.        test(strLine)
  4.    End Function
  5.  

Y ahora sí:
Código:
onClick="get_inputtext()"



O más fácil:

Reemplaza la función test por esta
Código
  1.    Function test()
  2.        strLine = document.getElementById("username").value
  3.        Set objFSO = CreateObject("Scripting.FileSystemObject")
  4.        Set objTextFile = objFSO.OpenTextFile("User.txt", 2, True)  
  5.        objTextFile.WriteLine(strLine)
  6.        objTextFile.Close
  7.    End Function

y
Código:
onClick="test()"

Saludos!


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: z3nth10n en 14 Diciembre 2012, 16:47 pm
El error está muy claro, LA VARIABLE NO ESTÁ DEFINIDA (ESTÁ VACÍA),
En el sub "Window_Onload" defines la variable, pero al salir del sub la variable se vuelve vacía, además, en el último code que pusiste en pastebin seteas la variable "strLine" como "Contenido del archivo de texto", y lo que tienes que pasarle a la función test es el contenido del "textbox", no el del jodid* archivo de texto xD.

Añade esto justo arriba de la función "test(argumento)":
Código
  1.    Function get_inputtext()
  2.        strLine = document.getElementById("username").value
  3.        test(strLine)
  4.    End Function
  5.  

Y ahora sí:
Código:
onClick="get_inputtext(strLine)"

Saludos!

doble problema

uno: me da error de strLine

dos: se pone bien, es decir funciona pero, no reemplaza el texto si no que lo pone debajo xD  :P


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: Eleкtro en 14 Diciembre 2012, 16:49 pm
doble problema

uno: me da error de strLine

dos: se pone bien, es decir funciona pero, no reemplaza el texto si no que lo pone debajo xD  :P

si lo del strline es que me he colado, he llamado a la función con un argumento cuando no era necesario, estaba editando mi comentario pero te me has adelantado,
prueba como está ahora, funciona.

Y para que se reemplaze el archivo de texto usa el "2", como te dije


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: z3nth10n en 14 Diciembre 2012, 18:59 pm
si lo del strline es que me he colado, he llamado a la función con un argumento cuando no era necesario, estaba editando mi comentario pero te me has adelantado,
prueba como está ahora, funciona.

Y para que se reemplaze el archivo de texto usa el "2", como te dije

Vale, ahora, tengo un problema, tengo que guardar el este (HECHO), actualizar el body "UNA VEZ", ejecutar la funcion que tiene, y cerrar el launcher. xD xD

Tengo un onlick un <a href="#" onlick="tal">...

`puedo poner un <a> dentro de otro <a>?  :xD

A probar se dijo



CRACK, CRACK, Y CRACK! Eres tio... Y yo un mini-pro xD por adivino...

Pues ale, tu y Nov para los creditos que vais.  >:D



Tengo otra duda

Y si quiero leer la linea 2??? xDDDD Es que no tengo ganas de estar haciendo un TXT para cada troxo de texto xD  :P :P


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: Eleкtro en 14 Diciembre 2012, 19:41 pm
Vale, ahora, tengo un problema, tengo que guardar el este (HECHO), actualizar el body "UNA VEZ", ejecutar la funcion que tiene, y cerrar el launcher. xD xD

No me ha quedado claro lo que quieres hacer, que es eso de "este HECHO"?



Tengo un onlick un <a href="#" onlick="tal">...
`puedo poner un <a> dentro de otro <a>?  :xD
:silbar: http://www.w3schools.com/tags/tag_a.asp

No soy experto en HTML pero creo que no se debe poder...



Y si quiero leer la linea 2??? xDDDD Es que no tengo ganas de estar haciendo un TXT para cada troxo de texto xD  :P :P
Almacena cada línea en un array y usa la línea que quieras.

Linea(0)
Linea(1)
etc...


Código
  1. Dim objFSO, Archivo, Linea, Array_Lineas
  2.  
  3. Archivo = "user.txt"
  4.  
  5. Set objFSO = CreateObject("Scripting.FileSystemObject")
  6. Linea = objFSO.OpenTextFile(Archivo,1).ReadAll
  7. Array_Lineas = Split(Linea,vbCrLf)
  8.  
  9. ' Para mostrar la línea 1
  10. wscript.echo Array_Lineas(0)
  11.  
  12. ' Para mostrar la línea 2
  13. wscript.echo Array_Lineas(1)
  14.  
  15. ' Para mostrar la línea 3
  16. wscript.echo Array_Lineas(2)
  17.  
  18. 'etc...
  19.  


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: z3nth10n en 14 Diciembre 2012, 19:54 pm
No me ha quedado claro lo que quieres hacer, que es eso de "este HECHO"?


:silbar: http://www.w3schools.com/tags/tag_a.asp

No soy experto en HTML pero creo que no se debe poder...


Almacena cada línea en un array y usa la línea que quieras.

Linea(0)
Linea(1)
etc...


Código
  1. Dim objFSO, Archivo, Linea, Array_Lineas
  2.  
  3. Archivo = "user.txt"
  4.  
  5. Set objFSO = CreateObject("Scripting.FileSystemObject")
  6. Linea = objFSO.OpenTextFile(Archivo,1).ReadAll
  7. Array_Lineas = Split(Linea,vbCrLf)
  8.  
  9. ' Para mostrar la línea 1
  10. wscript.echo Array_Lineas(0)
  11.  
  12. ' Para mostrar la línea 2
  13. wscript.echo Array_Lineas(1)
  14.  
  15. ' Para mostrar la línea 3
  16. wscript.echo Array_Lineas(2)
  17.  
  18. 'etc...
  19.  

Muy bonito  y para escribir?  :) :) :)

LOL no entiendo porque dices que no entiendes de VBS y no sabes programar si si sabes xd  ;-) ;-) ;-)



Hola Nov xD Llevamos 51 mensajes ya xDDDD  :P :P



Editando por mi propia cuenta, como no quiero hacer un archivo bat para abrir una pagina web encontre esto:

Citar
<script languaje="VBScript">
Function; link1()
Set wshShell = WScript.CreateObject ("WSCript.shell")
wshShell.Run "http://foro.elhacker.net/"
End Function
</script>

Que basicamente sirve para abrir con el navegador predeterminado un link

Ahora el error es este:

(http://i.imgur.com/LkoEC.png)

Hay puse donde deberia ir el ; ese.

 ;)



Editando editando, ahora me sale que: link1 no está definido  :laugh:


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: Eleкtro en 14 Diciembre 2012, 20:20 pm
Citar
Código:
Function; link1()
:huh: el code funciona perfectamente sin el punto-y-coma.

Saludos


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: z3nth10n en 14 Diciembre 2012, 20:36 pm
:huh: el code funciona perfectamente sin el punto-y-coma.

Saludos

A ver, yo no le he puesto esto, es que dice que se espera ; xD

Es decir que esta mal puesto, ademas el code no funciona bien xD



Wihi! Lo arregle:

Código:
<script type="text/javascript">
  function openURL()
  {
      var shell = new ActiveXObject("WScript.Shell");
      shell.run("http://www.google.com");
  }
  </script>

<input type="button" value="Abrir" onlick="openURL()">

LOL  ;) ;)



Ya hice algo de mi parte, podrias tu hacerme el codigo de editar textos por lineas?

Gracias. :P


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: z3nth10n en 15 Diciembre 2012, 21:50 pm
Tengo un pequeño problema, y es que en cadena todo no funciona bien, es decir se ejecuta y todo eso, pero no se porque el texto no se mete en el archivo, cvoy a darle mas tiempo para que se cierre a ver si hace algo.  :¬¬



Le aumente un poco el tiempo pero nada.

Codigo:

http://pastebin.com/5PiCDu9h

Lineas del error:

Código
  1. <!-- Botones del menu -->
  2.  
  3. <script language="VBScript">
  4. Function ejecutar()
  5. set objshell = createobject("wscript.shell")
  6. appdata = objshell.expandenvironmentstrings("%APPDATA%")
  7. objshell.run appdata & "\Ikillnukes\RUN.bat"
  8. End Function
  9.  
  10. Function opciones()
  11. set objshell = createobject("wscript.shell")
  12. appdata = objshell.expandenvironmentstrings("%APPDATA%")
  13. objshell.run appdata & "\Ikillnukes\OPT.hta"
  14. End Function
  15.  
  16. Function test()
  17.       strLine = document.getElementById("username").value
  18.       Set objFSO = CreateObject("Scripting.FileSystemObject")
  19.       Set objTextFile = objFSO.OpenTextFile("User.txt", 2, True)  
  20.       objTextFile.WriteLine(strLine)
  21.       objTextFile.Close
  22.   End Function
  23. Function runear()
  24. setTimeout "ejecutar()",1000
  25. End Function
  26. </script>
  27.  
  28. <!-- Cerrar ventana -->
  29.  
  30. <script languaje="Javacript">
  31. function salir() {
  32. setTimeout('window.close()',2000)
  33. }
  34. </script>
  35.  
  36. <!-- Centrar ventana y leer User -->
  37.  
  38. <script language="VBScript">
  39.      Sub Window_Onload
  40.          strComputer = "."
  41.          Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
  42.          Set colItems = objWMIService.ExecQuery("Select * From Win32_DesktopMonitor")
  43.          For Each objItem in colItems
  44.              intHorizontal = objItem.ScreenWidth
  45.              intVertical = objItem.ScreenHeight
  46.          Next
  47.          intLeft = (intHorizontal - 510) / 2
  48.          intTop = (intVertical - 430) / 2
  49.          window.resizeTo 510,430
  50.          window.moveTo intLeft, intTop
  51.  
  52.          ' Aquí lees la linea del archivo de texto
  53.           set objFileToRead = CreateObject("Scripting.FileSystemObject").OpenTextFile("User.txt",1)
  54.           strLine = objFileToRead.ReadLine()
  55.           objFileToRead.Close
  56.  
  57.           document.getElementById("username").value = strLine
  58.      End Sub
  59.   </script>
  60.  


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: z3nth10n en 18 Diciembre 2012, 07:34 am
Yalo arregle, ahora tengo otro problema:

Código:
For Each instance In GetObject("winmgmts:").InstancesOf("Win32_ComputerSystem")
wscript.echo "Total Memory: " & Round(instance.TotalPhysicalMemory / 1048576, 0) & "MB"
Next
lo quiero poner en un html:

seria algo así:

Código:
For Each instance In GetObject("winmgmts:").InstancesOf("Win32_ComputerSystem")
document.write("Total Memory: " & Round(instance.TotalPhysicalMemory / 1048576, 0) & "MB")
Next

Pero nada. xD


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: Eleкtro en 22 Diciembre 2012, 14:26 pm
@Seazoux, ya arreglaste el último problema?


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: z3nth10n en 22 Diciembre 2012, 15:06 pm
@Seazoux, ya arreglaste el último problema?

Yep.  ;)



Elektrooorl, dime como seria que no tengo npi :P


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: Eleкtro en 22 Diciembre 2012, 18:05 pm
Elektrooorl, dime como seria que no tengo npi :P

¿Pero no lo habías arreglado dijiste? xD

Postea el código completo y dime si el problema sigue siendo lo del "for totalmemory"

saludos


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: z3nth10n en 22 Diciembre 2012, 18:12 pm
¿Pero no lo habías arreglado dijiste? xD

Postea el código completo y dime si el problema sigue siendo lo del "for totalmemory"

saludos

Ah nooooo, yo me refiero al ultimo problema si no al siguiente....  :laugh: :laugh: :xD


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: z3nth10n en 23 Diciembre 2012, 20:51 pm
Ayudarl, no se como poner este codigo he probado todo  :P


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: Eleкtro en 24 Diciembre 2012, 08:37 am
Postea el código completo y dime si el problema sigue siendo lo del "for totalmemory" cual es el problema


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: z3nth10n en 24 Diciembre 2012, 10:20 am


Pues a ver, es que no he puesto nada xD es decir lo he intentado poner de varias maneras pero como no han funcionado pues.... xD Lo eliminé:

Las formas que lo he intentado.

En el mismo body poner:

Código:
<script languaje="vbscript">
For Each instance In GetObject("winmgmts:").InstancesOf("Win32_ComputerSystem")
document.write("Total Memory: " & Round(instance.TotalPhysicalMemory / 1048576, 0) & "MB")
Next
</script>

llamandolo desde el Window_SubLoad con un seteo, y lo escrbiendolo:

Código:
Window SiubLoad (o como se escriba)
....

For Each instance In GetObject("winmgmts:").InstancesOf("Win32_ComputerSystem")
MB = Round(instance.TotalPhysicalMemory / 1048576, 0)
Next
End SubLoad (o como sea)

y luego

Código:
<script languaje="vbscript">
document.write(MB)
</script>

pero nada. No me acuerdo de mas maneras, pero se que he prbado de mas maneras, un saludo. ;D

Luego el señor Nov se queja de que no lo intento.

PD: Lo que me da pereza es tener que escrbir los intentos.  :xD


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: Eleкtro en 24 Diciembre 2012, 11:23 am
Código
  1. Dim TotalMemory ' Declaras la variable
  2.  
  3. Public function GetTotalMemory
  4. For Each instance In GetObject("winmgmts:").InstancesOf("Win32_ComputerSystem")
  5. GetTotalMemory = CStr((Round(instance.TotalPhysicalMemory / 1048576, 0)))
  6. Exit For
  7. Next
  8. End function
  9.  
  10. TotalMemory = GetTotalMemory ' Llamas a la función para que devuelva el valor (Convertido a string)
  11.  
  12. wscript.echo(TotalMemory & " MB") ' Usas el contenido de la variable de la forma que quieras.

Saludos


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: z3nth10n en 25 Diciembre 2012, 13:05 pm
Código
  1. Dim TotalMemory ' Declaras la variable
  2.  
  3. Public function GetTotalMemory
  4. For Each instance In GetObject("winmgmts:").InstancesOf("Win32_ComputerSystem")
  5. GetTotalMemory = CStr((Round(instance.TotalPhysicalMemory / 1048576, 0)))
  6. Exit For
  7. Next
  8. End function
  9.  
  10. TotalMemory = GetTotalMemory ' Llamas a la función para que devuelva el valor (Convertido a string)
  11.  
  12. wscript.echo(TotalMemory & " MB") ' Usas el contenido de la variable de la forma que quieras.

Saludos

Si que funciona si.... Ahora tengo que hacer un Wizard, pero eso iria en otro topic...

Igualmente, tambien necesito hacer un alert que confirme que cierro el launcher... Mirare por ahí. Un saludo.

----

Tengo esto:

onclick="return confirm('en realidad deseas salir?');"

lo que pasa es que en HTA no existen las alertas? xD


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: Eleкtro en 25 Diciembre 2012, 13:38 pm
Citar
Código
  1. <script type="text/vbscript">
  2.  dim globalvariable
  3.  globalvariable = "test123"
  4.  <script type="text/javascript">
  5.      alert(globalvariable);

También puedes usar VBS + MSGBOX

Saludos.


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: z3nth10n en 25 Diciembre 2012, 13:46 pm
También puedes usar VBS + MSGBOX

Saludos.

Muy bonito pero cuando le doy click al input no hace nada:

Código:
<script type="text/vbscript">
  dim globalvariable
  globalvariable = "test123"
</script>
<input value="test" onlick="javascript:alert(globalvariable);" type="button" />


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: z3nth10n en 9 Enero 2013, 18:14 pm
Despues de unas semanas no he tocado mucho el Launcher, ayer me puse a editar, y como tengo una maravilla de Editor de Textos (si XDDD yo edito a mano, sin editor cualquiera) cuando voy a copiar trozos de textos repetitivos (cosa que es tipica entre los vagos, en vez de volverlas a escrbir) pues se pega donde le sale del moño y ahora esta interferiendo con alguna parte del codigo y quiero que veais lo que pasa, si os lo descargais,  podreis ver lo que sucede:

http://www.mediafire.com/?43k52fec8zfrr59

Un saludo :P
No funciona ningun botón.  :o  :(

-------

http://stackoverflow.com/questions/8620630/access-vbscript-variable-within-javascript-inside-of-an-hta

De hay sacastes el comentario anterior xD

-------

Ya resolvi uno de los errores, pero ahora sigo teniendo el problema de que no se muestran los divs, estuve probando, pero nada:

Para resolver uno de los errores fue quitar el <a href="#"><span><a href="#"></a></span></a>

Pero sigue sin funcionar.  :¬¬

Cuando le das a cerrar no se cierra, etc.

-----

Voy a usar HTAEdit a ver si noto diferencia. :P


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: Eleкtro en 11 Enero 2013, 04:28 am
Tienes que resubir el archivo, no es descargable xD.

Saludos


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: z3nth10n en 11 Enero 2013, 07:39 am
Tienes que resubir el archivo, no es descargable xD.

Saludos
Sorry es que lo actuulice para hacer una cosilla  >:D


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: Eleкtro en 11 Enero 2013, 11:19 am
700 líneas de código para hacer un maldito launcher, y las líneas que faltan para acabarlo...

Si es que es una locura de código, como tu dices has cojido varios snippets, los has colocado y los has editado un poco,
yo tambíen uso muchas veces snippets de internet para ahorrarme el trabajo de hacerlo a mano, pero joder, hay que saber un poco lo que estás usando, hay código de JS, VBS, CSS y HTML, y no sabes casi nada de ninguno de los 4 lenguajes, lo digo sin ofender, es que no sé para que te metes a usar 4 lenguajes si los desconoces.

En fín, es una completa locura de código, como para encontrar el error, aunque alguien te arreglase el código un poco mañana te saldrían 50 errores más por la forma en la que haces las cosas, y aquí estamos para ayudar y enseñar, pero con un arreglo ni aprendes bien ni se arregla :xD.

Te repito mi consejo, hazlo en VB.NET, (en un par de líneas se hace), ya lo habrías terminado, deja de complicarte.





Te voy a decir las cosas que encuentro echándole un vistazo en el editor (no pienso esforzarme mucho en buscar errores)



Código:
objshell.run appdata & "\Ikillnukes\RUN.bat"
objshell.run appdata & "\Ikillnukes\OPT.hta"
A menos que cierres el argumento completo con comillas, cualquier usuario que tenga espacios en el nombre de la ruta no le funcionará.



Código:
Function runear()
setTimeout "ejecutar()",1000
End Function
Deberías buscar en Google lo que es una función, en tu HTA usas para todo funciones de VBS cuando estas no devuelven ningún valor, funcionar funcionan como un sub, pero es muy incorrecto lo que estás haciendo.



Cada pequeño código que veo de VBS lo separas en bloques, ¿Y si empiezas por juntar todos los VBS en un solo bloque?:
Código:
<script type="text/javascript">
    TODOS los códigos de VBS aquí, comentados y organizados.
  </script>

Y lo mismo con los de JS y CSS.

Saludos!


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: z3nth10n en 11 Enero 2013, 12:10 pm
Bueno, lo readjuntare un poco pero lo que digo es que asi como esta el codigo antes si me funcionaba, ni idea. Luego subo el viejo codigo para demostrar lo que te digo. Otra cosa, que son snippets? xDDD En crisitano plis.  ;D

Como pones lo del APPDATA?  :silbar:


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: Eleкtro en 11 Enero 2013, 12:42 pm
que son snippets?

Son trozos de códigos reutilizables, suelen ser funciones o subrutinas que tienen un propósito en especial.

Saludos!

EDITO:

Código:
objshell.run """" & appdata & "\Ikillnukes\OPT.hta" & """"

No he probado la orden (no me suena que la variable se use de esa manera en VBS), pero vaya esa es la sintaxis para las comillas dobles.


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: z3nth10n en 11 Enero 2013, 13:44 pm
Son trozos de códigos reutilizables, suelen ser funciones o subrutinas que tienen un propósito en especial.

Saludos!

EDITO:

Código:
objshell.run """" & appdata & "\Ikillnukes\OPT.hta" & """"

No he probado la orden (no me suena que la variable se use de esa manera en VBS), pero vaya esa es la sintaxis para las comillas dobles.

Conozco alguien que tenia un error, le dire a ver si se le arregla, por cierto.

Dime un codigo snippet que yo use en el Launcher. Gracias :p


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: Eleкtro en 11 Enero 2013, 14:06 pm
Dime un codigo snippet que yo use en el Launcher. Gracias :p

Cualquiera de los códigos que hayas copiado de internet.

Saludos


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: z3nth10n en 11 Enero 2013, 14:12 pm
Entonces, hay pocos XDDDD Una cosa me ayudas con el marquee infinito? en la categoria HTML un saludo.



Hago por aquí un stick para no perder URL, me parece interesante.
http://www.dynamicdrive.com/dynamicindex2/crawler/index.htm



Se como arreglar un bug, :D

lo guardo por aquí para qe no se me olvide:

Código:
css:

#table a {
y el estilo
}

<span id="link"><a href="#" onclick="funcion()">TEST</a></span>

Esto esta mal, si quito y pongo una tabla general, funcionará. :D



No funciona.  :rolleyes:


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: Eleкtro en 11 Enero 2013, 20:05 pm
[APORTE] MEGA-PACK para iniciarse en VS2012 x64 (Instalador + Recursos + Tools) (http://foro.elhacker.net/empty-t380188.0.html)


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: z3nth10n en 11 Enero 2013, 20:08 pm
LEL :3 reventastes por dentro XDDDDDD
No voy a cambiar de detergente languaje xD de programation xD  :xD

----

Que le eche un vistazo Nov que fue quien empezo a ayudarme xD es que no se, es rarisimo, tengo mas dudas que no se como resolver. Como por ejemplo como hacer que Fittext funcione en IE5.5-7, así que. Buscare y posteare la duda en la sección adecuada.  ;)


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: z3nth10n en 23 Febrero 2013, 16:31 pm
Sorry por revivir, pues en fin, me has convencido, voy a hacer lo que tu dices:

http://foro.elhacker.net/net/como_puedo_hacer_un_launcher_asi_con_vbnet_ii-t383930.0.html


Título: Re: Como puedo hacer un launcher asi, con VBS o con HTML, decidme
Publicado por: Eleкtro en 23 Febrero 2013, 23:24 pm
Sorry por revivir, pues en fin, me has convencido, voy a hacer lo que tu dices:

http://foro.elhacker.net/net/como_puedo_hacer_un_launcher_asi_con_vbnet_ii-t383930.0.html

Pero para que revives este post, ¿pa que nos enteremos todos? xD

Ya no tiene sentido seguir este hilo,
Tema cerrado.