Register Register Member Login Member Login Member Login Forgot Password ??
PHP , ASP , ASP.NET, VB.NET, C#, Java , jQuery , Android , iOS , Windows Phone
 

Registered : 109,038

HOME > ASP > ASP Forum > เรื่อง Error http 500.100 สอบถามเรื่องโค้ดหน่อยครับ คือเวลาที่เรารันโปรแกรมเดี่ยวๆ มันรันผ่าน



 

เรื่อง Error http 500.100 สอบถามเรื่องโค้ดหน่อยครับ คือเวลาที่เรารันโปรแกรมเดี่ยวๆ มันรันผ่าน

 



Topic : 009897

Guest




สอบถามเรื่องโค้ดหน่อยครับ
คือเวลาที่เรารันโปรแกรมเดี่ยวๆ มันรันผ่าน แต่เวลาที่นำโปรแกรมนั้นไปใช้ร่วมกันโปรแกรมอื่นหรือ Page อื่น มันมักจะฟ้องว่า Error Type:
Microsoft VBScript runtime (0x800A01F4)
Variable is undefined: 'FileObject'
/shop/www/lesson/counter.asp, line 1
เป็นเพราะอะไร คุณ webmaster ข่วยตอบหน่อยครับ เป็นที่ iis หรือเปล่าครับ ต้องไปแก้ตรงไหน ซึ่งฟ้องว่าไม่ทราบตัวแปล fileobject ทั้ง ๆ ที่ตอนรันเดี่ยว ๆ นั้น ก็เป็น โค้คตัวเดิม
โค้ค คือตัวนี้ครับ ..
<%Set FileObject = Server.CreateObject("Scripting.FileSystemObject")
hitsfile = Server.MapPath("../cgi-bin/counter.txt")
Set instream= FileObject.OpenTextFile (hitsfile, 1, False )
' &agrave;&Atilde;&Otilde;&Acirc;&iexcl;&curren;&egrave;&Ograve;&uml;&Oacute;&sup1;&Ccedil;&sup1;&frac14;&Ugrave;&eacute;&agrave;&Acirc;&Otilde;&egrave;&Acirc;&Aacute;&ordf;&Aacute;&uml;&Ograve;&iexcl;&auml;&iquest;&Aring;&igrave; counter.txt
oldhits = instream.ReadLine
' &agrave;&iexcl;&ccedil;&ordm;&curren;&egrave;&Ograve;&agrave;&cent;&eacute;&Ograve;&micro;&Ntilde;&Ccedil;&aacute;&raquo;&Atilde; oldhits
newhits = oldhits + 1
' &ordm;&Ccedil;&iexcl;&curren;&egrave;&Ograve;&acute;&eacute;&Ccedil;&Acirc;&Euml;&sup1;&Ouml;&egrave;&sect;&aacute;&Aring;&eacute;&Ccedil;&agrave;&iexcl;&ccedil;&ordm;&agrave;&cent;&eacute;&Ograve;&micro;&Ntilde;&Ccedil;&aacute;&raquo;&Atilde; newhits
Set outstream= FileObject.CreateTextFile (hitsfile, True)
OutStream.WriteLine(newhits)
' &agrave;&iexcl;&ccedil;&ordm;&curren;&egrave;&Ograve;&uml;&Oacute;&sup1;&Ccedil;&sup1;&frac14;&Ugrave;&eacute;&agrave;&Acirc;&Otilde;&egrave;&Acirc;&Aacute;&ordf;&Aacute;&middot;&Otilde;&egrave;&Iacute;&Acirc;&Ugrave;&egrave;&atilde;&sup1;&micro;&Ntilde;&Ccedil;&aacute;&raquo;&Atilde; newhits &agrave;&cent;&eacute;&Ograve;&auml;&raquo;&atilde;&sup1;&auml;&iquest;&Aring;&igrave; counter.txt
l=Len(newhits)
' &agrave;&iexcl;&ccedil;&ordm;&uml;&Oacute;&sup1;&Ccedil;&sup1;&micro;&Ntilde;&Ccedil;&Iacute;&Ntilde;&iexcl;&Eacute;&Atilde;(&uml;&Oacute;&sup1;&Ccedil;&sup1;&Euml;&Aring;&Ntilde;&iexcl;)&cent;&Iacute;&sect;&micro;&Ntilde;&Ccedil;&aacute;&raquo;&Atilde; newhits &auml;&Ccedil;&eacute;&atilde;&sup1;&micro;&Ntilde;&Ccedil;&aacute;&raquo;&Atilde; l
For i = 1 to l
' &Ccedil;&sup1;&iexcl;&Ograve;&Atilde;&middot;&Oacute;&sect;&Ograve;&sup1;&uml;&Ograve;&iexcl;&Euml;&Aring;&Ntilde;&iexcl;&middot;&Otilde;&egrave; 1 &para;&Ouml;&sect;&Euml;&Aring;&Ntilde;&iexcl;&middot;&Otilde;&egrave; l
num = Mid(newhits,i,1)
' &micro;&Ntilde;&acute;&micro;&Ntilde;&Ccedil;&agrave;&Aring;&cent;&Iacute;&Iacute;&iexcl;&Aacute;&Ograve;&middot;&Otilde;&egrave;&Aring;&ETH;&micro;&Ntilde;&Ccedil;
display = display & "<img src=""" & num & ".gif"">"
' &aacute;&Ecirc;&acute;&sect;&Atilde;&Ugrave;&raquo;&micro;&Ograve;&Aacute;&Euml;&Aacute;&Ograve;&Acirc;&agrave;&Aring;&cent;&aacute;&Aring;&eacute;&Ccedil;&agrave;&iexcl;&ccedil;&ordm;&agrave;&cent;&eacute;&Ograve;&micro;&Ntilde;&Ccedil;&aacute;&raquo;&Atilde; display
Next%>
<title>&micro;&Ntilde;&Ccedil;&sup1;&Ntilde;&ordm;&iexcl;&Ograve;&Atilde;&agrave;&Acirc;&Otilde;&egrave;&Acirc;&Aacute;&cent;&Aacute;&aacute;&ordm;&ordm;&Atilde;&Ugrave;&raquo;&Agrave;&Ograve;&frac34;</title>
<%=display%>


Tag : - - - -






Move To Hilight (Stock) 
Send To Friend.Bookmark.
Date : 7 ก.ย. 2549 07:49:19 By : man View : 1890 Reply : 0
 

   

ค้นหาข้อมูล
   
 

แสดงความคิดเห็น
Re : เรื่อง Error http 500.100 สอบถามเรื่องโค้ดหน่อยครับ คือเวลาที่เรารันโปรแกรมเดี่ยวๆ มันรันผ่าน
 
 
รายละเอียด
 
ตัวหนา ตัวเอียง ตัวขีดเส้นใต้ ตัวมีขีดกลาง| ตัวเรืองแสง ตัวมีเงา ตัวอักษรวิ่ง| จัดย่อหน้าอิสระ จัดย่อหน้าชิดซ้าย จัดย่อหน้ากึ่งกลาง จัดย่อหน้าชิดขวา| เส้นขวาง| ขนาดตัวอักษร แบบตัวอักษร
ใส่แฟลช ใส่รูป ใส่ไฮเปอร์ลิ้งค์ ใส่อีเมล์ ใส่ลิ้งค์ FTP| ใส่แถวของตาราง ใส่คอลัมน์ตาราง| ตัวยก ตัวห้อย ตัวพิมพ์ดีด| ใส่โค้ด ใส่การอ้างถึงคำพูด| ใส่ลีสต์
smiley for :lol: smiley for :ken: smiley for :D smiley for :) smiley for ;) smiley for :eek: smiley for :geek: smiley for :roll: smiley for :erm: smiley for :cool: smiley for :blank: smiley for :idea: smiley for :ehh: smiley for :aargh: smiley for :evil:
Insert PHP Code
Insert ASP Code
 Insert VB.NET Code Insert C#.NET Code Insert JavaScript Code Insert C#.NET Code
Insert Java Code
Insert Android Code
Insert Objective-C Code
Insert XML Code
Insert SQL Code
Insert Code
เพื่อความเรียบร้อยของข้อความ ควรจัดรูปแบบให้พอดีกับขนาดของหน้าจอ เพื่อง่ายต่อการอ่านและสบายตา และตรวจสอบภาษาไทยให้ถูกต้อง

อัพโหลดแทรกรูปภาพ

Notice

เพื่อความปลอดภัยของเว็บบอร์ด ไม่อนุญาติให้แทรก แท็ก [img]....[/img] โดยการอัพโหลดไฟล์รูปจากที่อื่น เช่นเว็บไซต์ ฟรีอัพโหลดต่าง ๆ
อัพโหลดแทรกรูปภาพ ให้ใช้บริการอัพโหลดไฟล์ของไทยครีเอท และตัดรูปภาพให้พอดีกับสกรีน เพื่อความโหลดเร็วและไฟล์ไม่ถูกลบทิ้ง

   
  เพื่อความปลอดภัยและการตรวจสอบ กระทู้ที่แทรกไฟล์อัพโหลดไฟล์จากที่อื่น อาจจะถูกลบทิ้ง
 
โดย
อีเมล์
บวกค่าให้ถูก
<= ตัวเลขฮินดูอารบิก เช่น 123 (หรือล็อกอินเข้าระบบสมาชิกเพื่อไม่ต้องกรอก)







Exchange: นำเข้าสินค้าจากจีน, Taobao, เฟอร์นิเจอร์, ของพรีเมี่ยม, ร่ม, ปากกา, power bank, แฟลชไดร์ฟ, กระบอกน้ำ

Load balance : Server 04
ThaiCreate.Com Logo
© www.ThaiCreate.Com. 2003-2025 All Rights Reserved.
ไทยครีเอทบริการ จัดทำดูแลแก้ไข Web Application ทุกรูปแบบ (PHP, .Net Application, VB.Net, C#)
[Conditions Privacy Statement] ติดต่อโฆษณา 081-987-6107 อัตราราคา คลิกที่นี่