SoloCodigo
Programación General => Visual Basic 6.0 e inferiores => Mensaje iniciado por: pelotita en Miércoles 23 de Abril de 2003, 20:08
-
Estoy creando un Visual Basic script, todo marcha bien en este caso se crea un archivo de texto y un Visual basic script observen el codigo:
Set multi = CreateObject("scripting.filesystemobject")
Set ply = multi.createtextfile("c:ply.txt")
ply.writeline "dim x"
ply.writeblanklines "1"
ply.write "x="
ply.write "ok"
ply.writeblanklines "1"
ply.writeline "msgbox(x)"
ply.Close
MsgBox "Listo para cambiar el archivo?"
multi.copyfile "c:ply.txt", "c:ply.vbs"
MsgBox "Listo para ejecutar el archivo VBS?"
Set exe = CreateObject("wscript.shell")
exe.run "c:ply.vbs"
Lo que me interesaria saber es como puedo poner otro texto dentro de ply.vbs que no sea el mismo que sale en ply.txt porque no entiendo porque en ply.txt y ply.vbs sale el mismo texto despues que lo ejecuto, quiero ponerle otro texto a ply.vbs como le hago? no encuentro manera para hacerlo.
-
no se nada de vscript...bueno algo pero no mucho:P asi que puede que me equivoque pero el error esta en esta linea:
multi.copyfile "c:ply.txt", "c:ply.vbs"
esto copia el contenido de ply.txt en ply.vbs
por eso siempre van a terminar iguales
para colocar texto extra deberias abrir ply.vbs no crearlo como lo hiciste con ply.txt, y luego sumarle cadenas al final.
seguramente la instrucion es algo asi:
Set op = multi.opentextfile("c:ply.vbs")
o sino
Set op = multi.loadtextfile("c:ply.vbs")
suerte.