Programación General > Visual Basic 6.0 e inferiores
Leer Block De Notas Desde Vb 6.0
Vate:
Estoy muy agradecido amigos, el codigo funciona que me proporcionaron perfectamente y ahora mi cadena esta en archivo de texto. Sin embargo me queda una duda(es la primer vez que voy a hacer un instalador, mil disculpas si la pregunta es ingenua): cuando termine el programa y tenga que hacer el instalador,de que manera se incluira este archivo
Gracias de nuevo y hasta la vista
Vate
ElNapster:
Al generar tu instalador debes de decirle el path donde obtendras tu archivo(donde se instalara tu exe o bien tu le das la ruta desde tu aplicacion c:\archivo.txt )
:comp:
ArKaNtOs:
yo generalmente cuando realizo aplicaciones con archivos que servirán en mi sistema, lo que hago es crear una ventana de bienvenida como la de muchos programas como el word, el corel, etc, y en esa ventana no hago mas que cargar todos los elementos de mi programa entre ellos, checo si es la primera vez que se carga mi proyecto, si estan todos los archivos necesarios para que se corra la aplicación, si existe el archivo de texto que necesito, sino lo creo
Para crear uno seria de esta forma:
<!--xc1--></div><table border='0' align='center' width='95%' cellpadding='3' cellspacing='1'><tr><td>XCODE </td></tr><tr><td id='XCODE'><!--exc1-->
Ruta = IIf(Right(App.Path, 1) = "\", App.Path & "Users.dat", App.Path & "\Users.dat")
Open Ruta For Append As #1
If LOF(1) = 0 Then
datos="En tu caso la cadena de conexion"
Write #1, datos
Close #1
Else
Close #1
End If<!--xc2--></td></tr></table><div class='postcolor'><!--exc2-->
Con esto verifico si el archivo existe, si así es no hago nada o solo leo los datos que necesito, sino es así, simplemente creo el archivo dentro de mi carpeta y listo ;) con esto no cargas con archivos innecesarios en tu installer :)
Navegación
[*] Página Anterior
Ir a la versión completa