trasformare codice da php a asp

[torn24]

Ho provato a tradurlo MA NON SO SE FUNZIONA

Salva il nome immagine come file di testo ,quindi non fa proprio la stessa cosa.

dim immagine 
immagine=request.form("img_val")
response.write " <img src= " & chr(34) & immagine & chr(34) & " />"immagine
dim filteredData
filteredData=mid(immagine,instr(immagine,",")) 'prende la stringa a partire dalla prima virgola 
filePath = Server.Mappath("img.png")
Set objFileSystem = Server.CreateObject("Scripting.FileSystemObject")
if not objFileSystem.FileExists(filePath) then
    'se non esiste lo creo
    objFileSystem.CreateTextFile(filePath)
end if
Set objFile = objFileSystem.OpenTextFile(filePath, 8)
objFile.WriteLine(filteredData) 
objFile.Close
Set objFile=Nothing
Set objFileSystem=Nothing