2012-08-10 28 views
5

Estoy intentando hacer un programa de instalación en VB6 que instalará todos los archivos necesarios para el programa.Incruste un archivo en el archivo EXE en VB6

Puedo usar un archivo CSV para almacenar datos y leerlo usando:

file="C:\users\admin\desktop\table.csv" 
Open file For Input As fnum 

Sin embargo, el archivo EXE no puede ser ejecutada en otro ordenador portátil como me sale el error "file not found".

Así que: cómo incrustar este documento CSV en el archivo .EXE para que el programa pueda ejecutarse en cualquier PC con Windows?

+0

hay muy buenas razones * no tratar de hacer esto en absoluto * Por un lado hay muchos escollos en la instalación proceso, y podría arruinar otras aplicaciones si no las suyas. Por otro, es probable que los programas que incorporan programas se activen como "droppers" en antimalware, por una buena razón. Ya hay herramientas de embalaje perfectamente buenas, tómese un minuto para aprender una. Si tiene que autoextraerse, use una de las herramientas comunes que el antimalware "confía" en lugar de escribir algo ad-hoc. – Bob77

Respuesta

6
  1. Abra el proyecto, Complementos elemento de menú, abra la Add-In gerente & doble clic en el Editor de recursos VB6para cargarlo, cerca gerente.

  2. Haga clic Proyecto elemento de menú y luego Añadir nuevo archivo de recursos en la parte inferior. Ingrese un nombre de archivo & guárdelo en el directorio con sus archivos de código.

  3. Desde el Explorador de proyectos árbol doble clic XXX.RES de los nuevos Documentos relacionados nodo.

  4. Seleccionar Agregar recurso personalizado de la barra de herramientas en la ventana que aparece

  5. Examinar para su .csv y agregarlo, debería ver que añade como CUSTOM \ 101

  6. Ahora se integrará en el exe en tiempo de compilación. Si el archivo cambia, vuelva a agregarlo al recurso, hay un límite de 64k por entrada.

  7. para cargarlo en el código en tiempo de ejecución:.

    strCSV = strconv(LoadResData(101, "CUSTOM"), vbunicode)

+0

hola gracias por su publicación .... agregué el archivo csv como recurso personalizado y lo usé en el programa ... y funcionó como la mantequilla. Pero después de hacerlo como exe, traté de ingresar valor en el cuadro de texto, luego se muestra: Runtime error 9, "subíndice fuera de rango" ... Creo que es posible que no esté almacenando los valores del archivo .csv, por lo que saber alguna solución a este problema? – Santosh

+0

El recurso no se puede escribir, si desea hacerlo, cárguelo, escríbalo en el disco y use esa copia; si es otro problema, una nueva pregunta sería lo mejor. –

+0

+1 Aquí hay un enlace a los [temas de documentación de VB6] (http://msdn.microsoft.com/en-us/library/aa228672 (v = vs.60) .aspx) sobre este complemento – MarkJ

Cuestiones relacionadas