ครับคือผมที่ตามตัวอย่างในบทเรียนของ ASP ครับ ตามนี้ครับ
<%
bytecount=Request.TotalBytes
If bytecount < 80000 Then ' กำหนดขนาดไฟล์ไม่เกิน 80 K
%>
<!--#Include File="uploads.asp"-->
<%
filename=uploaddata.Item("file").Item("filename")
pos_filebegin=InStrRev(filename,"\")
pos_fileend=Len(filename)
filename_new=Mid(filename,pos_filebegin+1,pos_fileend-pos_filebegin)
' กำหนด ประเภทของไฟล์ที่จะ สามารถ uploads ได้
If Instr(filename_new,".jpg") <> 0 Or Instr(filename_new,".gif") <> 0 Or Instr(filename_new,".jpeg") <> 0 Then
Set fs=Server.CreateObject("Scripting.FileSystemObject")
Set uploadfile=fs.CreateTextFile(Server.Mappath("Pic"&"/"&filename_new)) uploadfile.Write uploaddata.Item("file").Item("value")
%>
พอรันแล้วมันฟ้องว่า
Error Type:
Microsoft VBScript runtime (0x800A0005)
Invalid procedure call or argument
/Webcom/UTraning/Usave.asp, line 27
ซึ่งก็คือบรรทัดตัวหนาหล่ะครับ
จะแก้ไขยังไงคับ