
21/06/2005, 15:06
|
| | Fecha de Ingreso: mayo-2004
Mensajes: 183
Antigüedad: 20 años, 11 meses Puntos: 0 | |
Hola.
Cuando creo un archivo en excel utilizo el driver de odbc. El cual te permite crear tablas(hojas de calculo), te pongo un ejemplo, espero que te sirva.
dim PathDest
PathDest="c:\ejemplo.xls"
strConn="Driver={MICROSOFT EXCEL DRIVER (*.xls)};DSN='';FIRSTROWHASNAMES=1;" &_
"READONLY=FALSE;CREATE_DB=" & PathDest & ";DBQ=" & PathDest
conn.open strConn
sqlcmd="create table list (Numero TEXT,Nombre_Completo TEXT, Grupo TEXT)"
conn.Execute(sqlcmd)
sqlcmd="insert into list(Numero,Nombre_Completo,Grupo)"
sqlcmd=sqlcmd & " values('1','Juan','Grupo')"
conn.Execute(sqlcmd)
'Si necesito crear otra hoja
sqlcmd="create table list1 (Numero TEXT,Nombre_Completo TEXT, Grupo TEXT)"
conn.Execute(sqlcmd)
sqlcmd="insert into list1(Numero,Nombre_Completo,Grupo)"
sqlcmd=sqlcmd & " values('1','Juan','Grupo')"
conn.Execute(sqlcmd)
Lo malo de todo esto es que no tendrá un formato :( |