How do we connect to a mapped drive using ASP? Below
is the code that I made and it doesn't seem to work.
Help please. Thank you...
<%Option Explicit%>
<%
Server.ScriptTimeOut = 51888 'more than 14 hours
On Error Resume Next
%>
<%
Dim oNet
Set oNet = WScript.CreateObject("WScript.Network")
oNet.MapNetworkDrive "R:",
"\\nttx6533\LOPSDevelopment", false,
"ds/erwin.rommel.y.felix", "lexdios125"
Dim strRootFolder
strRootFolder = "R:\mainfolder\"
Response.Write (strRootFolder) & " Root Folder<br>"
Dim oFolder
Dim oFso
Set oFso = CreateObject("Scripting.FileSystemObject")
Set oFolder = oFso.GetFolder(strRootFolder)
Dim foldername
foldername = oFolder.name
Response.Write (foldername) & " folder name <br>"
For Each sf In oFolder.SubFolders
Dim showlastdatemodified
lastdatemodified = sf.DateLastModified
Response.Write (lastdatemodified) & " " & sf.Name & "
date modified <br>"
Next
%>
=====
Erwin Rommel Y. Felix
Tel. 8410111 loc. 11430
Mobile 09185980706
"Never outshine the Master Chicker"
__________________________________
Do you Yahoo!?
Yahoo! Mail - Helps protect you from nasty viruses.
http://promotions.yahoo.com/new_mail
------------------------ Yahoo! Groups Sponsor --------------------~-->
Make a clean sweep of pop-up ads. Yahoo! Companion Toolbar.
Now with Pop-Up Blocker. Get it for free!
http://us.click.yahoo.com/L5YrjA/eSIIAA/yQLSAA/saFolB/TM
--------------------------------------------------------------------~->
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/AspClassicAnyQuestionIsOk/
<*> To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
