atip

Te sugiero que uses el OLEDB provider de Oracle. En la línea "conexion.Open ...", reemplaza "DSN=Neptuno" por: "Provider=MSDAORA.1;Password=manager;User ID=system;Data Source=MI_ORACLE;Persist Security Info=True" Donde: "DataSource" es el nombre del...

Prueba con el método CopyFile del objeto FileSystemObject. Se encuentra en la librería Microsoft Scripting Runtime (SCRRUN.DLL): Dim fso As New FileSystemObject fso.CopyFile "c:\temp\prueba.sql", "c:\temp\prueba2.sql", True

Tienes que controlar todas aquellas cosas que los programas controlan al imprimir: 1. Si tengo varias líneas, hay que imprimir en la siguiente línea. 2. Si el texto no me cabe en una línea tienes que romper el texto y pasar el resto a la siguiente....

El control de Crystal tiene una propiedad SelectionFormula para filtrar los registros. Es una propiedad tipo string que debe tener el mismo formato que desde el diseñador. Ejemplo: "{mitabla.micampo} = 'VALOR'} Esto te permite filtrar por cualquier...

Utiliza el FileSystemObject que se encuentra en la librería Microsoft Scripting Runtime. Si tienes una versión reciente del Explorer la tendrás en tu sistema. Puedes buscar con los objetos del FileSystemObject, llamando a una función recursivamente....

OpenDatabase("tudatabase.mdb", 0, False, ";pwd=tupassword")

Lanza un timer antes de ejecutar la consulta y actualiza la barra de progreso. Pero quizá una barra de progreso no sea lo más adecuado ya que no sabes el tiempo que va a tardar en ejecutarse. Si lo que quieres es mostrar señales de actividad piensa...

Modifica el setup del vb y guarda en algún lugar del registro dónde se instaló la aplicación.

Pon los nombres en un array y añádelos: Dim sFiles() As String sFiles = Split(CommonDialog1.FileName, " ") sFiles(0)=directorio sFiles(1)=1º fichero sFiles(2)=2º fichero Etc. Y con AddItem los añades al listbox.

Utiliza DBEngine. RegisterDatabase: Dim strAttributes as String strAttributes = "Database=pubs" & _ vbCr & "Description=" & strDescription & _ vbCr & "OemToAnsi=No" & _ vbCr & "Server=Server1" DBEngine. RegisterDatabase "Publishers", "SQL Server",...