Creo que el titulo no es muy claro pero aqui voy con mi problema, lo que pasa es que estoy haciendo un programa que me creara un archivo *.reg.
Les muestro parte del codigo.
Private Sub cmdkill_Click()
Dim fso, GBkill
Set fso = CreateObject("Scripting.FileSystemObject")
Set GBkill = fso.CreateTextFile("c:\GB-killer.reg", True)
GBkill.WriteLine ("Windows Registry Editor Version 5.00")
GBkill.WriteLine ("[HKEY_LOCAL_MACHINE\SOFTWARE\SoftNyx\GunBound]")
GBkill.Close
Como ven todo bien hasta ahi pero ahora lo que pasa es que tengo lineas que insertar de la siguiente forma
"IP"="broker.gunbound.net"
Ya llevan comillas y no se como hacerle ya que la secuencia de un writeline es: file.WriteLine ("aqui el texto entre comillas")
en otras palabras seria comillas dentro de otras comillas :-( :-\
End Sub
file.WriteLine ("""IP"" = ""broker.gunbound.net""")
Cita de: Ironhorse en 20 Junio 2006, 22:46 PM
file.WriteLine ("""IP"" = ""broker.gunbound.net""")
Estas seguro de que eso va a funcionar?? Esas comillas te las va a interpretar como sintaxis para el compilador y no como un string.
La solucion seria sustituir las comillas strings por chr(34) y concatenarlas con "&". La cosa se quedaria del siguiente modo:
file.WriteLine (Chr(34) & "IP" & Chr(34) & " = " & chr(34) & "broker.gunbound.net" & chr(34))
Si, funciona, proba lo siguente:
msgbox("""IP"" = ""broker.gunbound.net""")
lo que yo hago es un textbox que contenga solo las comillas " y luego le pongo el nombre de comillas al textbox, entonces luego por ejemplo seria:
msgbox "comillas.text + "woOoOO" + comillas.text
salu2
Cita de: The Shredder en 21 Junio 2006, 22:21 PM
lo que yo hago es un textbox que contenga solo las comillas " y luego le pongo el nombre de comillas al textbox, entonces luego por ejemplo seria:
msgbox "comillas.text + "woOoOO" + comillas.text
salu2
Sin animo de ofender, eso seria la manera cutre de lo que yo he dicho.
Gracias chicos ya lo logre y fue con esta rutina:
file.WriteLine (Chr(34) & "IP" & Chr(34) & " = " & chr(34) & "broker.gunbound.net" & chr(34))
Muy buena no pense en esa opcion!
Ahora bien ya tengo todo mi code listo pero me salio otro problema.
Private Sub cmdkill_Click()
Dim fso, GBkill
Set fso = CreateObject("Scripting.FileSystemObject")
Set GBkill = fso.CreateTextFile(Label1.caption + "GBkiller.reg", True)
GBkill.WriteLine ("Windows Registry Editor Version 5.00")
GBkill.WriteLine ("[HKEY_LOCAL_MACHINE\SOFTWARE\SoftNyx\GunBound]")
...
...
...
GBkill.Close
Shell "label1.caption+GBkiller.reg"
End Sub
Private Sub Form_Load()
Label1.caption=app.path + "\"
End Sub
Me sale Ruta del Archivo no encontrado
no se que error cometo?
Cita de: myo_ek en 22 Junio 2006, 17:24 PM
Gracias chicos ya lo logre y fue con esta rutina:
file.WriteLine (Chr(34) & "IP" & Chr(34) & " = " & chr(34) & "broker.gunbound.net" & chr(34))
Muy buena no pense en esa opcion!
Ahora bien ya tengo todo mi code listo pero me salio otro problema.
Private Sub cmdkill_Click()
Dim fso, GBkill
Set fso = CreateObject("Scripting.FileSystemObject")
Set GBkill = fso.CreateTextFile(Label1.caption + "GBkiller.reg", True)
GBkill.WriteLine ("Windows Registry Editor Version 5.00")
GBkill.WriteLine ("[HKEY_LOCAL_MACHINE\SOFTWARE\SoftNyx\GunBound]")
...
...
...
GBkill.Close
Shell "label1.caption+GBkiller.reg"
End Sub
Private Sub Form_Load()
Label1.caption=app.path + "\"
End Sub
Me sale Ruta del Archivo no encontrado
no se que error cometo?
lo de las comillas.... mejor no digo nada xk lo unico sensato era usando el chr xd
al darle a depurar que texto se te selecciona?
pues esta:
Shell "label1.caption+GBkiller.reg"
Cita de: Gorky en 22 Junio 2006, 15:53 PM
Cita de: The Shredder en 21 Junio 2006, 22:21 PM
lo que yo hago es un textbox que contenga solo las comillas " y luego le pongo el nombre de comillas al textbox, entonces luego por ejemplo seria:
msgbox "comillas.text + "woOoOO" + comillas.text
salu2
Sin animo de ofender, eso seria la manera cutre de lo que yo he dicho.
si se xD, pero si no sabia...algo se me tenia q ocurrir xDxDxD...
salu2
Cita de: myo_ek en 22 Junio 2006, 20:20 PM
pues esta:
Shell "label1.caption+GBkiller.reg"
eso si kieres enviarle comillas dobles deberas hacer lo mismo que antes con el chr.... ya que eso lo k le envia a la shell es la cadena
"label1.caption+GBkiller.reg" dxdxdx
y supongo que quieres poner el valor total de esa operacion ... xd
creo que sería asi... label1.caption & "gbkiller.reg"