Still celebrating National IT Professionals Day with 3 months of free Premium Membership. Use Code ITDAY17

Solved

VBScript&ASP: want to check the existence of a file on the server !

Posted on 1998-09-04

Visual Basic Classic

1 solution

Medium Priority

166 Views

Last Modified: 2010-04-30

Hi.

I have a NT server with IIS4 etc.
I build a web site that use ONLY html, vbscript, asp.
The website is called "Website"
The directory is: "c:\InetPub\wwwroot\Website"

The actual page is "page.asp"

I want to display in the returned file ("page.asp") when the client("slave") asks for "page.asp" to the server ("master") a link only if a specified file is present on the server in "c:\InetPub\wwwroot\Website"
This page is called "present.asp"

If this page exits by a click on this link you'll jump to it
If this page doesn't exist you'll jump to "ouch.asp"

Please ask for more infos if i'm not understandable.

Thanx

A+rno

Comment

Question by:arnaudg

[X]

Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

Help others & share knowledge
Earn cash & points
Learn & ask questions

Join The Community

2 Comments

LVL 1

Accepted Solution

by:soeding

soeding earned 200 total points

ID: 14330521998-09-04

arnaudg,
put this into "page.asp":

<%
On Error Resume Next

' See if present.asp has any content:
Set fs = CreateObject("Scripting.FileSystemObject")
Set ts = fs.OpenTextFile(Server.MapPath("/PathFromTheRoot") + "\present.asp")
txt = ""
txt = ts.ReadLine
ts.Close

' Create Link:
If txt = "" Then
Response.Write "<a href='ouch.asp'>myLink</a>"
Else
Response.Write "<a href='present.asp'>myLink</a>"
End If
%>

Regards

LVL 1

Author Comment

by:arnaudg

ID: 14330531998-09-16

Thanx for your good answer.

Just one question more.
I tried to put your script as a function.
Function testfile()
.
End Function

And put a onclick="testfile()" in a <A></A> tag.
It doesn't work.

Could you tell me why ?

Thanx again.

Featured Post

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Using Enums in VB6 and VBA

Article by: Martin

Enums (shorthand for ‘enumerations’) are not often used by programmers but they can be quite valuable when they are. What are they? An Enum is just a type of variable like a string or an Integer, but in this case one that you create that contains…

MS Access VBA - converting linked tables to local tables

Article by: Don

Background What I'm presenting in this article is the result of 2 conditions in my work area: We have a SQL Server production environment but no development or test environment; andWe have an MS Access front end using tables in SQL Server but we a…

Using Automation to Control Excel from Access

Video by: TechMommy

Get people started with the process of using Access VBA to control Excel using automation, Microsoft Access can control other applications. An example is the ability to programmatically talk to Excel. Using automation, an Access application can laun…

Using a Criteria Form with an Access Report

Video by: TechMommy

Show developers how to use a criteria form to limit the data that appears on an Access report. It is a common requirement that users can specify the criteria for a report at runtime. The easiest way to accomplish this is using a criteria form that a…