Write file

[semolino]

Ragazzi se eseguo questo codice ho come risultato nel file:
False.

strCode = "<" & "%" &_
	strCode=strCode & "Set Conn=Server.CreateObject(""ADODB.Connection"") " &_
	strCode=strCode & "Conn.Open ""Driver={Microsoft Access Driver (*.mdb)}; DBQ=""&_ 
" &_
	strCode=strCode & "Server.Mappath(""/"&url&"/"&nome&".mdb"")&""; UID="&user&"; PWD="&pass&" " &_
	strCode=strCode & "%" & ">"
	strCode=strCode
		dim fs,fname
		Filename = Server.MapPath("/_admin/include/conn2.asp")
		set fs=Server.CreateObject("Scripting.FileSystemObject")
		set fname=fs.CreateTextFile(Filename,true)
		response.Write(strCode)
		response.End()
		fname.WriteLine(strCode)
		fname.Close
		set fname=nothing
		set fs=nothing

Che cosa sbaglio? :master:

[weppos]

response.End()

che ci fa lì?

[semolino]

Lo uso per vedere a video che cosa mi stampa, e infatti stampa 'False'.
Quando sarà giusto a video provvederò ad eliminare la riga, l'ho fatto solo per avere un controllo a priori

[semolino]

Ho provato a riscrivere il codice in un altro modo, seguendo uno che avevo già fatto per mandare una mail con del testo formattato, ma qui ottengo sempre false!
Ma dov'è l'errore?