Hello GURUS,
 
From http://www.codeproject.com/asp/vbsupload.asp I downloaded the zip
file, unzipped it and copied all the files in the zip folder on the
webserver. I absolutely did not make any change to any of the files.
The reason, I am trying to make this code work is 1- I can't install
any third party components on the web server. 2- ADODB.Stream does not
work on this webserver as ADO version on the webserver is 1.0 and we
cannot upgrade it to 2.5. By the way in my environment IIS is
installed on SUN server
 
Now, using Internet Explorer when I open Process_File.asp I get the
following error:
 
Error Type:
Sun ONE ASP _VBScript compilation (0x800A0422)
'Default' specification can only be used on Property Get
vbsUpload.asp, line 174, column 25

Where Line 174 in is vbsUpload.asp:  Public Default Function Item(Index)
 
I looked this error on msdn and did not find any information on how to
troubleshoot it. MSDN just says "You used the Default reserved word on
a Property Let or Property Set. You can only specify the Default
reserved word for a Property Get."
 
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/script56/html/8499d363-c6e4-4a6d-97b7-52650b7e25d7.asp
 
I have seen posts on this article that this script works great.
However, I got the error at the very first step. I have been trying to
make this script work since yesterday and cannot proceed beyond this
error. Can you please tell me how to make this script work?

NOTE: My ultimate goal is to make this script work where the uploaded
files will be saved in an Oracle DB using BLOBs. So once the script is
working, and I am completey satisfied only then the rating/monetary
transaction will take place/happen.
 
Thanks,

open conn.asp file,Create table; Run the Sql Command at sql server

        Fill in Your Connection Details Here
	Create a table with the following Fields for the files to be uploaded
	 Here is the Query which can help you
	CREATE TABLE [dbo].[doc_warhouse] (
	[doc_id] [int] IDENTITY (1, 1) NOT NULL ,
	[doc_name] [varchar] (50) NOT NULL ,
	[doc_type] [varchar] (50) NOT NULL ,
	[doc_data] [image] NOT NULL 
	) ON [PRIMARY] TEXTIMAGE_ON [PRIMARY]
	GO

		ALTER TABLE [dbo].[doc_warhouse] WITH NOCHECK ADD 
	CONSTRAINT [PK_doc_warhouse] PRIMARY KEY  NONCLUSTERED 
	(
		[doc_id]
	)  ON [PRIMARY] 
	GO

        and update this line 
         "DBConn.Open "Driver={SQL Server};Server=;UID=;PWD=;DataBase=""
        Set Server,Pwd,Database,UID

        and test it
       
        good luck!!!