I forum Ricerca FAQ
Fai una domanda
Ultimo messaggio
falstaff
falstaff
il 6 dicembre 2001 alle 17:19
61 messaggi dal 03 agosto 2001
Dim oExcel

' riga incriminata...
Set oExcel = Server.CreateObject("OWC.Spreadsheet")
'alternativa...
'..Set ExcelApp =CreateObject("Excel.Application")
'stesso problema
Fila = 1
Columna = 1

For Fila=1 to 10
For Columna=1 to 10
cont = cont+1
oExcel.Cells(Fila,Columna).Value = cont
Next
Next

For iCol = 1 to Columna
oExcel.Columns(iCol).AutoFitColumns
Next

Cont = 1
Do While Cont < 11
oExcel.Cells(1, Cont).Font.Bold = True
oExcel.Cells(1, Cont).Font.Italic = True
oExcel.Cells(1, Cont).Font.Size = 20
Cont = Cont + 1
Loop

Path=Server.MapPath("Ejercicio3.xls")
oExcel.ActiveSheet.Export Path, 0



gabriele marini
gabriele marini
RispondiQuoting
falstaff
falstaff
il 6 dicembre 2001 alle 17:24
61 messaggi dal 03 agosto 2001
Dimenticavo di dire che di questo codice ho capito ben poco...
l' ho trovato su questo forum e spero sia utile a risolvere il mio problema:
devo dare all ' utente un foglio excel già compilato con dei dati del database farlo elaborare da lui e riprendermi i dati da inserire nel db...un giochino che mi sta facendo impazzire!!

gabriele marini
gabriele marini
RispondiQuoting
Andrea Palmatè
Andrea Palmatè
il 6 dicembre 2001 alle 18:26
1.983 messaggi dal 28 febbraio 2001
Contributi
www.amigasoft.net
Quell'oggetto è un componente aggiuntivo di Office. Se non hai installato Office 2000 (o XP) non riuscirai mai a creare quell'oggetto (a meno di non recuperarlo da qualche altra parte e registrarlo).

Ciao

<b> Andrea Palmatè</b>
<i><b>ASPITALIA.com</b></i>
--
Andrea Palmatè
RispondiQuoting

Torna al forum | Feed RSS

ASPItalia.com non è responsabile per il contenuto dei messaggi presenti su questo servizio, non avendo nessun controllo sui messaggi postati nei propri forum, che rappresentano l'espressione del pensiero degli autori.