Buonasera a tutti
spero che qualcuno di voi sappia aiutarmi nel seguente problema. Una pagina asp deve creare dei files .csv, e questo su iis. Avete presente quando uno sta facendo un lavoro, ha finito tutto, tutto funziona e rimane giusto un piccolo ma semplice dettaglio, e poi quel dettaglio ti fa perdere un sacco di tempo? Ecco.
Ho fatto varie prove ma l'errore è sempre il solito:
Server objecterror 'ASP 0177 : 800401f3'Server.CreateObject Failed
/public/csv.asp, line 14
800401f3
In questo momento la pagina mi restituisce errore anche se si trova nella cartella public di aruba, che dovrebbe avere i permessi già nel modo giusto. Il codice del file è il seguente:
<%
set csv = Server.CreateObject("Chilkat_9_5_0.Csv")
csv.HasColumnNames = 1
success = csv.SetColumnName(0,"year")
success = csv.SetColumnName(1,"color")
success = csv.SetColumnName(2,"country")
success = csv.SetColumnName(3,"food")
success = csv.SetCell(0,0,"2001")
success = csv.SetCell(0,1,"red")
success = csv.SetCell(0,2,"France")
success = csv.SetCell(0,3,"cheese")
success = csv.SetCell(1,0,"2005")
success = csv.SetCell(1,1,"blue")
success = csv.SetCell(1,2,"United States")
success = csv.SetCell(1,3,"hamburger")
' Write the CSV to a string and display:
csvDoc = csv.SaveToString()
Response.Write "<pre>" & Server.HTMLEncode( csvDoc) & "</pre>"
' Save the CSV to a file:
success = csv.SaveFile("out.csv")
If (success <> 1) Then
Response.Write "<pre>" & Server.HTMLEncode( csv.LastErrorText) & "</pre>"
End If
%>
Oppure in un altro file (sempre con lo stesso scopo) l'errore è:
Microsoft VBScript runtime error '800a0046'
Permission denied
/public/testcsv.asp, line 5
Questo è il codice del file che mi restituisce questo errore
set fso = Server.CreateObject ( "Scripting.FileSystemObject")
set filename = fso.CreateTextFile ( "CSV.txt", true)
filename.WriteLine ( "valore1, valore2, value3")
filename.Close
set filename= nothing
set fso = nothing
Spero che qualcuno sappia aiutarmi, a chi vince offro una birra da ritirare a Roma.