當試圖添加圖像時，Microsoft VBScript運行時錯誤「800a0034」

我不是一個編碼器，並且正在一箇舊的asp網站上工作，並且有一個頁面可以將圖像上傳到給定頁面（從下拉列表中），但是當我嘗試將圖像添加到相應的頁面，我收到了這個錯誤，我想從一開始就一直存在。當試圖添加圖像時，Microsoft VBScript運行時錯誤「800a0034」

Microsoft VBScript運行時錯誤 '800a0034' 錯誤的文件名稱或編號 /path-to-file/foto.asp，線105

相關的代碼這

'Create and Write to a File 
Randomize() 
strChiave = Cstr(Right(DatePart("yyyy", Date()),2)) 
strChiave = strChiave + Cstr(DatePart("y", Date())) 
strChiave = strChiave + Replace(Time(),".","") 
strChiave = strChiave + Right(Session.SessionID,4) 
strChiave = strChiave + CSTR(INT(RND()*1000)) 
strImmagine = strChiave + Right(filename,4) 
Set MyFile = ScriptObject.CreateTextFile(Application("path_public") & "/" & strImmagine) 

For i = 1 to LenB(value) 
MyFile.Write chr(AscB(MidB(value,i,1))) 
Next 
MyFile.Close

105線是這

Set MyFile = ScriptObject.CreateTextFile(Application("path_public") & "/" & strImmagine)

謝謝

來源

2016-02-27 keneso

把一個'的Response.Write（path_public）'你的代碼，行105和之前看到的結果。這可以幫助您確定圖像的路徑是否正確。 – statosdotcom

檢查'strImmagine'的值。 –

謝謝你們兩位。把response.write（path_public）改變行號（現在是106）。就像我說的我不是一個編碼器，無論如何，我只能看到strImmagine的三個實例，兩個在OP中剪切，另一個在幾行下面，並且是這樣的：strSQL = strSQL + strImmagine +「'，'」 – keneso

Time()方法返回時間結構如下：HH:mm其中「HH」是小時，「mm」是分鐘。正如你所看到的，它包含一個冒號字符，而不是一個點，冒號在文件路徑中是無效的。

更改這一行代碼：

strChiave = strChiave + Replace(Time(),".","")

爲了這個：

strChiave = strChiave + Replace(Time(),":","")

來源

2016-02-28 12:23:35

謝謝。現在的錯誤是：Microsoft VBScript運行時錯誤'800a0046' 權限被拒絕。同樣的道理，我做了快速搜索，但似乎有不同的解決方案，不知道哪一個是我的情況;我正在本地測試它（win8.1 IIS）。 – keneso

@keneso在以'Set MyFile = ScriptObject.CreateTextFile'開始的行之前添加以下行：'Response.Write（「

path: " & Application("path_public") & "/" & strImmagine & "

」）'讓我知道您在運行代碼時看到的內容 –

謝謝。這是報道的內容，加上之前評論中發佈的錯誤。路徑：C：\ Users \ Mypc \ sites \ A-ASP_sites \ fioriera \ public/1659163834380859.png – keneso

當試圖添加圖像時，Microsoft VBScript運行時錯誤「800a0034」

回答

相關問題