Salve a tutti!!
Ho un file di testo così strutturato, una sola riga e 4 colonne, ad esempio:
abcd 1245 12d1d 1d2d4
Nella mia pagina vorrei poter leggere e gestire ogni singolo valore (colonna) come voglio.
anche se è banale, mi potreste dare un aiuto?????????
Grazie Roberto
usa SPLIT usando lo spazio come separatore
arrvalori = SPLIT(stringa, " ")
col1 = arrvalori(0)
col2 = arrvalori(1)
col3 = arrvalori(2)
col4 = arrvalori(3)
Tutti vogliono parlare, nessuno sa ascoltare.
Grazie per la dritta!!!
Ho impostato questo codice, gruardando di qua e di la, ma mi da sempre errore
<%Option Explicit
Dim dati
Dim riga
dim a,b,c,d,e
Dim FileObject, ValoriArray
Set FileObject = Server.CreateObject("Scripting.FileSystemObject")
Server.MapPath("/FuelCells")
Set dati = FileObject.OpenTextFile(Server.MapPath("prova.txt" ))
%>
<html>
<head>
<title>Documento senza titolo</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<body>
<%
riga=dati.readline
ValoriArray = Split (riga," ")
a = ValoriArray(0)
b = ValoriArray(1)
c = ValoriArray(1)
d = ValoriArray(1)
e = ValoriArray(1)
Response.Write a &" - " & b &" - " & c &" - " & d &" - " & e &"
"
dati.Close
Set dati=Nothing
Set FileObject = Nothing
%>
<table width="600" border="1" align="center" bgcolor="#7999ba">
<td align="center" colspan="7">Lettura File TXT
</td>
<tr>
<td colspan="7" align="left" bgcolor="#FFFFFF"> <font color="#7999ba"> Prova</font></td>
<tr>
<td width="50">[*]<%=a%></td>
</table>
</body>
</html>
-------------------------------------
L'errore è:
Microsoft VBScript runtime error '800a0009'
Subscript out of range: '[number: 1]'
/FuelCells/Prova.asp, line 24
-------------------------------------
considera che il file di testo contiene sempre una sola riga
Mi sai aiutare????
Grazie mille
Roberto
Grazie tutto risolto.
Accetto comunque consigli visto che sono un novellino!!!!!
Ciao
Permessi di invio
Rispondi quotando