คื่อมันเกิด Error
Microsoft VBScript runtime (0x800A01A8)
Object required
/Aspmanger/ShowProcess.asp, line 9
อยากเกิจากอะไรครับ
<meta http-equiv="refresh" content="1">
<%
dim XP,obj,x,messge
set obj=server.CreateObject("Scripting.filesystemobject")
Set X=obj.OpenTextFile(Server.MapPath("SaveCompi.txt"))
if x.AtEndOfStream=true then
Set X=Nothing
end if
XP=X.ReadLine-----------------------------------line(9) Error ตงนี้ครับ
if X.AtEndOfLine=true then
Stop
end if
%>
ใครรู้ช่วยผมด้วยนะครับ
Tag : - - - -
Date :
17 พ.ค. 2548 12:12:49
By :
nugul
View :
2668
Reply :
1
No. 1
Guest
สวัสดีครับ
จาก error เกิดขึ้นเนื่องจาก ตัวแปร XP ของคุณไม่สามารถรับค่า X object ได้นะครับ
สาเหตุ
1. ตัวแปร X ไม่ได้รับการ สืบทอด มาทำให้ error เพราะไปเข้า if ก่อนหน้าแล้ว คุณทำลายมันไปซะแล้ว
2. ตัวแปร X ไม่สามารถเปิดไฟล์ นั้น หรือไฟล์นั้นไม่มีนะครับ ก็เลย Readline ไม่ได้