Newsgroup: it.comp.www.asp
Titolo: [help] problema con estrarre dati da foglio excel

Salve ragazzi, è la prima volta che posto su questo NG, anche perché sono
alle primissime armi con questa tecnologia. E si vede.
Avrei bisogno di un'aiutino. Ho trovato sul web uno script di esempio per
poter interrogare un foglio excel, dal quale io vorrei estrarre dei dati per
poi pubblicarli sul web attraverso un asp. Quello che devo fare è solo una
stampa cella x cella. L'esempio che ho trovato usa il comando
Response.Write rs(0)
Response.Write rs(1)
dove il numero tra parentesi indica il numero di colonna.
Sembra tutto semplice, e lo sarebbe. Il problema è che il risultato lascia a
desiderare in questi termini:
non tutte le celle vengono visualizzate correttamente, e non riesco a capire
il perché, non trovo nulla di comune tra le celle visualizzate correttamente
o, viceversa tra quelle che non lo sono. Addirittura a linee alterne qualche
dato numerico viene visualizzato, e qualche no. Stessa cosa per le caselle
contenenti caratteri alfanumerici.
Bho!
Se avete qualche dritta, o se conoscete qualche sito che tratti l'argomento
vi sarei infinitamente grado se me lo segnalaste.
Thanks un tot.
Ciao aspusers.

 contenenti caratteri alfanumerici.
Se puoi postare il codice, sicuramente potremo aiutarti.
Ciao!
--
VBSdb - VBScript for Database
http://www.vbsdb.com
VBSdb is an open source VBScript object for fast ASP development

 Se puoi postare il codice, sicuramente potremo aiutarti.
Lo posto con piacere. Grazie mille intanto.
<%@LANGUAGE="VBSCRIPT"%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<title>titolo</title>
</head>
<body>
<%
Set Conn=Server.CreateObject("ADODB.Connection")
strConn="driver={Microsoft Excel Driver (*.xls)}; "
strConn=strConn & " DBQ=" & Server.MapPath("database.xls")
set rs = Server.CreateObject ("ADODB.Recordset")
conn.Open  (strConn)
rs.Open "SELECT * FROM [DICEMBRE$]", conn,3,3
RS.MoveNext
RS.MoveNext
RS.MoveNext
RS.MoveNext
RS.MoveNext
%>
<table width="100%" border="1">
  <% do while not rs.EOF%>
  <tr>
    <td width="4%"><%
Response.Write rs(0)
%></td>
    <td width="4%"><%
Response.Write rs(1)
%></td>
    <td width="4%"><%
Response.Write rs(2)
%></td>
    <td width="4%"><%
Response.Write rs(3)
%></td>
    <td width="4%"><%
Response.Write rs(4)
%></td>
    <td width="4%"><%
Response.Write rs(5)
%></td>
    <td width="4%"><%
Response.Write rs(6)
%></td>
    <td width="4%"><%
Response.Write rs(7)
%></td>
    <td width="4%"><%
Response.Write rs(8)
%></td>
    <td width="4%"><%
Response.Write rs(9)
%></td>
    <td width="4%"><%
Response.Write rs(10)
%></td>
    <td width="4%"><%
Response.Write rs(11)
%></td>
    <td width="4%"><%
Response.Write rs(12)
%></td>
    <td width="4%"><%
Response.Write rs(13)
%></td>
    <td width="4%"><%
Response.Write rs(14)
%></td>
    <td width="4%"><%
Response.Write rs(15)
%></td>
    <td width="4%"><%
Response.Write rs(16)
%></td>
    <td width="4%"><%
Response.Write rs(17)
%></td>
    <td width="4%"><%
Response.Write rs(18)
%></td>
    <td width="4%"><%
Response.Write rs(19)
%></td>
    <td width="4%"><%
RS.MoveNext
Loop
%>
    </td>
  </tr>
</table>
<%
set rs = Nothing
conn.Close
Set conn = Nothing %>
</body>
</html>

 %>
Io ti suggeririsco di provare questi step:
- definisci un DSN sulla tua macchina e poi apri la connessione utilizzando
il DSN al posto della connession DSN-less che fai ora
- provi il tuo script utilizzando la connessione al DSN che hai creato
- se continui ad avere problemi, prova a collegarti con Access alla
connessione che hai creato, e a creare un collegamento alla tabella
[DICEMBRE$]
- controlla se la tabella collegata in Access e' come te l'aspetti
- esegui la query SELECT * FROM [DICEMBRE$] in Access
Secondo me, eseguendo questi step, dovresti isolare l'errore.
Se non risolvi, prova a riscriverci come si comporta nei diversi step che ti
ho suggerito.


 Ciao!
Ciao, a presto.
O.
