Contenuto file in una variabile

[carlostefano]

Ciao,
come posso fare in modo che il contenuto di un file stia in una sola variabile?

Saluti,
carlostefano

[saltodifondi]

intendi un file di testo? o un file generico?

[carlostefano]

un file generico...
ho risolto utilizzando le seguenti codice:

strPath = Server.MapPath (STR_TEMPLATES_FOLDER & "default/whatever.html")
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
Set objOpenFile = objFSO.OpenTextFile(strPath, 1)
strContent = objopenfile.ReadAll
response.write strContent
Set objFile = Nothing
Set objFSO = Nothing

Adesso però devo individuare all'interno della variabile strContent alcune righe di codice.
Ad esempio...come posso isolare il testo contenuto all'interno dell'elemento title ?

[saltodifondi]

set re=server.CreateObject("VBScript.RegExp")
re.Pattern="<title>([^\v]*?)</title>"
set ris = re.Execute(stringa)
if ris.count>0 then
  titolo = ris(0).SubMatches(0)
  response.write(titolo)
end if

[carlostefano]

Grazie per l'aiuto. Scusa, ma qual'è il contenuto della variabile stringa? e come faccio a rimpiazzare il testo contenuto all'interno del tag di apertura e di chisura con un'altro?

Ciao,
carlostefano

[saltodifondi]

strPath = Server.MapPath (STR_TEMPLATES_FOLDER & "default/whatever.html")
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
Set objOpenFile = objFSO.OpenTextFile(strPath, 1)
trContent = objopenfile.ReadAll

Set objFile = Nothing
Set objFSO = Nothing

set re=server.CreateObject("VBScript.RegExp")
re.Pattern="<title>([^\v]*?)</title>"
set ris = re.Execute(strContent)
if ris.count>0 then
  titolo = ris(0).SubMatches(0)
  response.write(titolo)
end if