Texto

[carcellan]

El siguiente código te deja todo el contenido de un fichero de texto en un array en el que los elementos se separan por ;. Para probarlo, acuérdate de sustituir el prueba.txt por uno que tengas

<pre>
&lt;%
Dim valores
set FSO = createObject(&quot;scripting.filesystemobject&quot ;)
set fich = fso.OpenTextFile(request.serverVariables(&quot;APP L_PHYSICAL_PATH&quot;)&amp;&quot;prueba.txt&quot;)
texto=fich.readall
valores=split(texto,&quot;;&quot;)
%&gt; </pre>