¿Cómo utilizar vc6.0 para exportar datos en access2003 para generar Excel? Para los principiantes, es mejor tener pasos más detallados.
Primero, VC se conecta a access2003
1 Para crear el proyecto, agregue las dos líneas siguientes al archivo stdafx.h:
# import " C. :\ Archivos de programa \ Archivos comunes \ system \ ado \ msadox . dll "
# import " C:\ Archivos de programa \ archivos comunes \ system \ ado \ msado 15 dll " no _ namespace rename(" EOF "," adoEOF ")
2. Agregar:
//Inicializar OLE
if (!AfxOleInit())
{
AfxMessageBox("¡Error al inicializar OLE!");
Devuelve FALSE
}
3. variables e inicializarlas.
_ ConnectionPtr _ pConnection//Puntero de conexión ADO
_ RecordsetPtr _ pRecordset//Puntero de conjunto de registros ADO
//Crear instancia de ADO
_p conexión. crear instancia(_ _ uuidof(Conexión));
_pRecordset. crear instancia(_ _ uuidof(Recordset));
4. Conectar el archivo de base de datos access2003
//Conectar el archivo de base de datos
CString strSQL
strSQL. Format("Provider=Microsoft. Jet . OLEDB.4.0 fuente de datos = % s; Jet OLEDB: contraseña de la base de datos = lzq ", " acceso 1 . MDB "); // Contraseña = lzq es la contraseña de usuario para este archivo de base de datos; allí No hay contraseña. Se puede dejar en blanco.
Pruebe
{
_pConnect->Open(strSQL.AllocSysString(),"","",admode desconocido);
p>
}
catch (_com_error e)
{
CString strError
Strero. Format("Advertencia: ¡No se puede conectar a la base de datos ADO! Mensaje de error: %s ", e. mensaje de error());
AfxMessageBox(strError);
Devolver FALSO p >
}
5. Abra el conjunto de registros del archivo de base de datos y léalo.
strSQL. format("select * from vib data where id = % s", "2002001"); //Esto significa que todos los registros con id=2002001 se filtrarán de la tabla VIBDATA del archivo de base de datos.
Pruebe
{
_ pRecordset-> Open(strSQL.AllocSysString(), _pConnection.GetInterfacePtr(), adOpenDynamic, adLockOptimistic, ADC mdtext);
}
catch (_com_error e)
{
CString strError
strero. Format("Advertencia: ¡Ocurrió una excepción al abrir la tabla de datos ADO! Mensaje de error: %s ", e. mensaje de error()
AfxMessageBox(strError
} p>
_ variante _ t varTime[10000];
while(_ pRecordset-& gt; AdoEOF == VARIANT_FALSE)//Leer los datos de la columna de tiempo del registro seleccionado.
{
varTime[I]= _ pRecordset-& gt; obtener recoger(" tiempo "); ;
}
//Procesar los datos leídos
....
...
//Después de procesar los datos, cierre el conjunto de registros y la conexión.
_ pRecordset->close();
_ pConnection->close();
En segundo lugar, VC creó excel2003
El proceso es similar. Se recomienda buscar "Programación mixta VC++ y Excel2003" en línea.