Foro de elhacker.net

Programación => .NET (C#, VB.NET, ASP) => Mensaje iniciado por: bsosa en 25 Enero 2012, 01:00 am



Título: Ayuda con Codigo en Visual Basic 6.0
Publicado por: bsosa en 25 Enero 2012, 01:00 am
Hola a todos.

En la sección de trucos de visual basic encontre el siguiente codigo:

Private Sub Command1_Click()
Dim canalLibre As Integer
'Obtenemos un canal libre que nos dará
'el sistema oparativo para poder operar
canalLibre = FreeFile
'Abrimos el fichero en el canal dado
Open "C:\fichero.txt" For Output As #canalLibre
'Escribimos el contenido del TextBox al fichero
Print #canalLibre, Text1
Close #canalLibre
End Sub

Sera que pueden explicarme su funcionamiento ya que lo intente creando un programa con un textbox y un command butom y al empaquetar el programa funciona correctamente pero cuando lo instalo en otra maquina desaparece el tipo de letra que le puse y no copia el archivo en Windows con el contenido del texbox..

Repito.. solo funciona en mi maquina y en otras no..
tambien probe cambiando el contenido del texbox en modo paswoord para que sea oculto al escribirlo y me lo decifre el en archivo txt que se copia al C...

y solo funciona en mi maquina

Ayudenme..


Título: Re: Ayuda con Codigo en Visual Basic 6.0
Publicado por: $Edu$ en 25 Enero 2012, 20:56 pm
Como que "desaparece el tipo de letra que le puse" ? ese codigo funciona, no lo probe pero tiene que andar sin problemas, que tu codigo no sea SOLO eso y tenga otras cosas... es otro tema.

Tambien si no anda en otra pc tendria que dejar algun error aunquesea.