Wrox Programmer Forums
Go Back   Wrox Programmer Forums > Other Programming > VBScript
|
VBScript For questions and discussions related to VBScript.
Welcome to the p2p.wrox.com Forums.

You are currently viewing the VBScript section of the Wrox Programmer to Programmer discussions. This is a community of software programmers and website developers including Wrox book authors and readers. New member registration was closed in 2019. New posts were shut off and the site was archived into this static format as of October 1, 2020. If you require technical support for a Wrox book please contact http://hub.wiley.com
  #1 (permalink)  
Old September 5th, 2012, 09:08 PM
Authorized User
 
Join Date: Mar 2006
Posts: 58
Thanks: 0
Thanked 0 Times in 0 Posts
Default Microsoft VBScript runtime error '800a004c

Hi all,

I am new in VBscript, do need help with these :-


Microsoft VBScript runtime
error '800a004c'
Path not found /script/script.asp, line 113


Script.asp

sub load_sticky(n)
set fso = createobject("scripting.filesystemobject")
folderName = "announcement\sticky.asp"
'filename = "f:\nisweb\nisv2\" & folderName
filename = "f:\nis_dev\" & folderName

set myfile = fso.opentextfile(filename, 1) ' ---------------> line 113
i = 0

do while myfile.atendofstream <> true
textline = myfile.readline

if (i < n) then
if InStr(TextLine,"<h5") <> 0 then
response.write "<a class='sticky' href='/announcement/?announce=sticky#"
spot = InStr(TextLine, "'>") - 28
response.write Mid(TextLine, 28, spot)
response.write "'>"
response.write TextLine
response.write "</a>"
elseif InStr(TextLine,"<h6") <> 0 then
response.write TextLine
i = i + 1
end if
end if
loop
myfile.close
end sub


Thanks...
Reply With Quote





Similar Threads
Thread Thread Starter Forum Replies Last Post
Microsoft VBScript runtime error '800a01b6' m0dest0 Classic ASP Basics 0 August 6th, 2011 01:19 AM
Microsoft VBScript runtime error '800a0005' bsvnhll Classic ASP Basics 5 May 4th, 2009 01:40 PM
Microsoft VBScript runtime error '800a01a8' Abbas Classic ASP Basics 1 July 21st, 2006 11:43 AM
Microsoft VBScript runtime error '800a01a8' Abbas Classic ASP Professional 1 July 21st, 2006 11:42 AM





Powered by vBulletin®
Copyright ©2000 - 2020, Jelsoft Enterprises Ltd.
Copyright (c) 2020 John Wiley & Sons, Inc.