Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Replace

16 views
Skip to first unread message

Napolitano Francesca

unread,
May 13, 2008, 9:08:48 AM5/13/08
to
Salve a tutto il NG, ho un problema che non riewsco a risolvere.

Ho una cartella abcdef\ e un file listafile.asp all'interno di essa, il
qualeha una riga contenete il nominativo utente.

Siccome ogni volta che devo abilitare un utente devo copiare la cartella
master ed il file listafile.asp ed rinominare il nome dell'utente. Per la
copia della cartella e del file listafile.asp non ci sono problemi, in rete
ho trovato molti scipt ma per la sostituzione del nominativo dell'utente non
riesco proprio a trovare niente.

Mi hanno parlato della funzione "Replace" ed ho trovato moltissimi esempi ma
nessuno che possa sodifare le mie esigenze.

Se gentilemente qualcuno mi potrebbe esssere di aiuto lo ringrazio
anticipatamente.

Saluti

Francesca Napolitano.

--------------------------------
Inviato via http://arianna.libero.it/usenet/

Cristiano Larghi

unread,
May 13, 2008, 10:01:03 AM5/13/08
to
Il Tue, 13 May 2008 13:08:48 GMT, Napolitano Francesca ha scritto:

> Ho una cartella abcdef\ e un file listafile.asp all'interno di essa, il
> qualeha una riga contenete il nominativo utente.

> Siccome ogni volta che devo abilitare un utente devo copiare la cartella
> master ed il file listafile.asp ed rinominare il nome dell'utente. Per la
> copia della cartella e del file listafile.asp non ci sono problemi, in rete
> ho trovato molti scipt ma per la sostituzione del nominativo dell'utente non
> riesco proprio a trovare niente.

immagino (non conoscendo il contesto posso solo immaginare) che non hai a
disposizione un database (altrimenti la domanda sarebbe: perché mai scrivi
questo nome direttamente nel file)?

> Mi hanno parlato della funzione "Replace" ed ho trovato moltissimi esempi ma
> nessuno che possa sodifare le mie esigenze.

Non stai neanche specificando il linguaggio usato ...
se vbscript:
http://msdn.microsoft.com/en-us/library/k9z80300(VS.85).aspx
se jscript:
http://developer.mozilla.org/en/docs/Core_JavaScript_1.5_Reference:Global_Objects:String:replace

questa è la documentazione, cosa non ti è chiaro?
Posta ciò che hai provato e non ti funziona...

--
"E' l' ignoranza che crea l'intolleranza
di gente cieca e senza coscienza"
S.S.S.

napolitanfra

unread,
May 13, 2008, 11:50:16 AM5/13/08
to
<%
Set FSO = CreateObject("Scripting.FileSystemObject")
set Instream = Fso.OpenTextFile(Server.MapPath("Master/default.asp"))
LF = Instream.ReadAll
LF = Replace(LF, "###Utente###", "Pippo")
LF = Replace(LF, "###cartella###", "ZCR8MBL")


******* qui non riesco a trovare il codice per salvare il file con le
sostituzioni*******


Instream.Close
set instream = nothing
set FSO = nothing
%>

Saluti

Francesca Napolitano

Cristiano Larghi

unread,
May 13, 2008, 12:36:40 PM5/13/08
to
Il Tue, 13 May 2008 15:50:16 GMT, napolitanfra ha scritto:

> <%
> Set FSO = CreateObject("Scripting.FileSystemObject")
> set Instream = Fso.OpenTextFile(Server.MapPath("Master/default.asp"))
> LF = Instream.ReadAll
> LF = Replace(LF, "###Utente###", "Pippo")
> LF = Replace(LF, "###cartella###", "ZCR8MBL")
> ******* qui non riesco a trovare il codice per salvare il file con le
> sostituzioni*******

qua esempi su come gestire i files:
http://www.vbscriptonline.com/FileSystemObjects/Working-with-Files.asp
Nel tuo caso stai usando ReadAll che legge tutto il file e lo scrive in una
stringa:
http://www.devguru.com/technologies/vbscript/quickref/textstream_readall.html

quindi (immagino, ho poca dimestichezza con vbscript) dovrai semplicemente
chiudere il file e sovrascriverlo con, come contenuto, la stringa LF
(usando createTextFile)

--
"Ti sei salvato
o sei entrato in banca pure tu?"
A.V.

napolitanfra

unread,
May 13, 2008, 1:04:37 PM5/13/08
to
Ho fatto cosě

<%
Set FSO=CreateObject("Scripting.FileSystemObject")


set Instream = Fso.OpenTextFile(Server.MapPath("Master/default.asp"))
LF = Instream.ReadAll

LF = Replace(LF, "###Utente###", "Francy")
LF = Replace(LF, "###cartella###", "Pippo")
Instream.Close
FSO.CreateTextFile(LF, True)
set Instream = nothing


set FSO = nothing
%>

Ma mi esce quest'errore

Errore di compilazione di Microsoft VBScript (0x800A0414)
Impossibile utilizzare parentesi per la chiamata di routine Sub
/public/replace.asp, line 8, column 28
FSO.CreateTextFile(LF, True)
---------------------------^

Grazie per l'aiuto che mi stai dando.

Saluti Francesca

Cristiano Larghi

unread,
May 14, 2008, 3:09:56 AM5/14/08
to
Il Tue, 13 May 2008 17:04:37 GMT, napolitanfra ha scritto:

> Ho fatto cosě

[CUT]

> Set FSO=CreateObject("Scripting.FileSystemObject")

> FSO.CreateTextFile(LF, True)

? devi specificare il nome del file da creare e poi scriverci, quanto sopra
non vuol dir nulla...
Qua le specifiche con anche un esempio:
http://msdn.microsoft.com/en-us/library/5t9b5c0c(VS.85).aspx

--
"e mai che mi sia venuto in mente
di essere piů ubriaco di voi
di essere molto piů ubriaco di voi"
F.D.A.

0 new messages