Hey there again, sorry about this. All new to me, still learning. In the DWMX2004 book Chap 9 Page 332 'Using the FileSystemObject'. With this "Try It Out" subject I continue to get the following message when submitting a new login & password.
---------------------------------------------------------------------
Response object error 'ASP 0158 : 80004005'

Missing URL

/html/login.asp, line 49

A URL is required.
---------------------------------------------------------------------

Under the HTML folder I created a Tools folder.
In that folder I created a users.txt file.
Entered a few user names & passwords with a tab in between.
Typed all the code required. Checked it, also copied it from the folder supplied.
Continue to get the following message above.

Anything you can suggest?

Thanks again.

Mal R

Oh, the code in line 49 reads...
-----------------------------------------------------------------
47 If bUserFound = True Then
48 Session("MM_Username") = Request.Form("txtUserName")
49 Response.Redirect(sReferrer)
50 Else
51 sErrorMessage = "<span class=""clsErrorMessage""><br>" & _
52 "Login failed. Please type a valid username and password</span>"

It looks like sReferrer does not have a value.

Modify your code like this: What does it say?

BTW, it's better to post this in the forum targeted at the book, and not in the general Dreamweaver forum. You'll find the book's forum here.

Cheers,

Imar
---------------------------------------
Imar Spaanjaars
Everyone is unique, except for me.

Imar, it comes up with the same message.
Earlier we had the following code which was directing the successfull login to go to the required page,,,

Response.Redirect("Admin/admin.asp")

This has now gone because we created the new script.

If it helps.. http://www.timber.com/html/login.asp & http://www.timber.com/html/search.asp..

I will use the other forum in future. Tnks.

Did you add the Response.End statement and comment out the Redirect line?

If so, then the error is thrown earlier. See if there is another Redirect statement earlier.

The links to the actual pages don't really help; all I get to see is the output of the page, not th actual source of the page.

Can you post the relevant bits of code?

Imar
---------------------------------------
Imar Spaanjaars
Everyone is unique, except for me.

Sorry,.

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<%
Dim sErrorMessage
If Request.Form("txtUserName") <> "" And _
Request.Form("txtPassword") <> "" Then
Const ForReading = 1
Dim oFileSystemObject
Dim oTextStream
Dim sFileLocation
Dim sTempString
Dim arrTemp
Dim bUserFound
If Request.Form("btnLogin") <> "" Then
sFileLocation = Server.MapPath("Tools/users.txt")
' Create an instance of the FileSystemObject
Set oFileSystemObject = Server.CreateObject("Scripting.FileSystemObject")
' Create a reference to our text file so we can read from it
Set oTextStream = oFileSystemObject.OpenTextFile(sFileLocation, ForReading)
' Read in each line until we reach the end of the file
Do While (Not oTextStream.AtEndOfStream = True)
' Read a line
sTempString = oTextStream.ReadLine()
' If the line contains text
If Len(sTempString) > 0 Then
' The line should hold the username and password, separated by a tab
' Split the line based on a tab, so we get the username and password
' in two separate array elements
arrTemp = Split(sTempString, vbTab)
If IsArray(arrTemp) Then
' An UBound of 1 means two elements in the array, the username
' and the password. If we haven't found both, we do not continue
If UBound(arrTemp) = 1 Then
' Compare array elements with username and password
If arrTemp(0) = Request.Form("txtUserName") And _
arrTemp(1) = Request.Form("txtPassword") Then
bUserFound = True
Exit Do
End If
End If
End If
End If
Loop
' Close our textstream and clean up our objects
oTextStream.Close
Set oTextStream = Nothing
Set oFileSystemObject = Nothing
If bUserFound = True Then
Session("MM_Username") = Request.Form("txtUserName")
Response.Redirect(sReferrer)
Response.Write("Referrer is " & sReferrer)
Response.End
Else
sErrorMessage = "<span class=""clsErrorMessage""><br>" & _
 "Login failed. Please type a valid username and password</span>"
End If
End If
End if
%>

You didn't comment out

Response.Redirect(sReferrer)

so you still get the error.

sReferrer is used in the Redirect statement, but you never declared it and never gave it a value. This variable should contain the path to a file you want to redirect to. With an empty value, you'll get the error you posted earlier....

HtH,

Imar


---------------------------------------
Imar Spaanjaars
Everyone is unique, except for me.

Once again,. Thanx

You're welcome.

What did you change to fix the problem?

Imar
---------------------------------------
Imar Spaanjaars
Everyone is unique, except for me.

Imar, yeh WE did. Just edited the line to read 'Response.Redirect("admin.asp") and it worked faster than you can say scrum sha delicious...

Thanks again.

Malcolm R