Hi
I don't konw if anyone can help.
I trying to save a file to a folder during an upload. I check to see if a file with the same details exists (done that bit) and if not I want to save the file.
This is where I'm stuck.
The code i'm using I've posted below.
Any help really appriciated..
<%
FullPath=Request("file1"
SplitPath=Split(FullPath,"\"
FileName=Ubound(SplitPath)
FileName=SplitPath(FileName)
ExtensionSplit=Split(FileName,"."
Extension=Ubound(ExtensionSplit)
Extension=ExtensionSplit(Extension)
Dim FileNamePath
FileNamePath="C:\Inetpub\
Set FileSys = CreateObject("Scripting.FileSystemObject"
If FileSys.FileExists(FileNamePath) then
Response.Write("<script>alert('File Already Exists')
</script>"
else
'Do file save
end if
%>
I don't konw if anyone can help.
I trying to save a file to a folder during an upload. I check to see if a file with the same details exists (done that bit) and if not I want to save the file.
This is where I'm stuck.
The code i'm using I've posted below.
Any help really appriciated..
<%
FullPath=Request("file1"
SplitPath=Split(FullPath,"\"
FileName=Ubound(SplitPath)
FileName=SplitPath(FileName)
ExtensionSplit=Split(FileName,"."
Extension=Ubound(ExtensionSplit)
Extension=ExtensionSplit(Extension)
Dim FileNamePath
FileNamePath="C:\Inetpub\
Set FileSys = CreateObject("Scripting.FileSystemObject"
If FileSys.FileExists(FileNamePath) then
Response.Write("<script>alert('File Already Exists')
</script>"
else
'Do file save
end if
%>