Scripting Error?

[John]

Can't get this to work. I'm creating a workaround for the absence of
aspJPEG on my server. I'm using aspUpload but my server only uses aspThumb.
After aspThumb optimizes the original pic the file size changes and I need
to reflect that change. When using aspUpload I can reference it's built in
File object references but they only refer to the "original" file. There's
an easy solution when using aspJPEG but not with aspThumb so I'm trying to
get the "new" picture size using a scripting object with this script but I'm
getting this error.

Microsoft VBScript runtime error '800a01b6'

Object doesn't support this property or method: 'objPictureSize .Size'

/admin/media_upload_pi cture_process.a sp, line 107
Set objPictureSize = Server.CreateOb ject("Scripting .FileSystemObje ct")
picPath = "e:\InetPub\Cli ents\thehalfton horns.com\media \pictures\" &
File.FileName & ""
objPictureSize. GetFile(picPath )
pictureNewSize = objPictureSize. Size (this is line 107)

thanks!!

[Ben Strackany]

The Size property is part of the File object, not FileSystemObjec t.
FileSystemObjec t is more of a utility class -- it doesn't represent
individual directories or files.

Try code like what I pasted below. See how I create a new File object
(objPictureFile ) & access that.

Set objFSO = Server.CreateOb ject("Scripting .FileSystemObje ct")
picPath = "e:\InetPub\Cli ents\thehalfton horns.com\media \pictures\" &
File.FileName & ""
Set objPictureFile = objFSO.GetFile( picPath)
pictureNewSize = objPictureFile. Size

--
Ben Strackany
www.developmentnow.com
"John" <no***@amIgivin gitouthere.com> wrote in message
news:sA******** *********@twist er.nyroc.rr.com ...

Can't get this to work. I'm creating a workaround for the absence of
aspJPEG on my server. I'm using aspUpload but my server only uses aspThumb. After aspThumb optimizes the original pic the file size changes and I need
to reflect that change. When using aspUpload I can reference it's built in File object references but they only refer to the "original" file. There's an easy solution when using aspJPEG but not with aspThumb so I'm trying to
get the "new" picture size using a scripting object with this script but I'm getting this error.

Microsoft VBScript runtime error '800a01b6'

Object doesn't support this property or method: 'objPictureSize .Size'

/admin/media_upload_pi cture_process.a sp, line 107
Set objPictureSize = Server.CreateOb ject("Scripting .FileSystemObje ct")
picPath = "e:\InetPub\Cli ents\thehalfton horns.com\media \pictures\" &
File.FileName & ""
objPictureSize. GetFile(picPath )
pictureNewSize = objPictureSize. Size (this is line 107)

thanks!!

[John]

That did it!! Thanks!
"Ben Strackany" <in********@dev elopmentnow.nos pam.com> wrote in message
news:ul******** ******@tk2msftn gp13.phx.gbl...

The Size property is part of the File object, not FileSystemObjec t.
FileSystemObjec t is more of a utility class -- it doesn't represent
individual directories or files.

Try code like what I pasted below. See how I create a new File object
(objPictureFile ) & access that.

Set objFSO = Server.CreateOb ject("Scripting .FileSystemObje ct")
picPath = "e:\InetPub\Cli ents\thehalfton horns.com\media \pictures\" &
File.FileName & ""
Set objPictureFile = objFSO.GetFile( picPath)
pictureNewSize = objPictureFile. Size

--
Ben Strackany
www.developmentnow.com
"John" <no***@amIgivin gitouthere.com> wrote in message
news:sA******** *********@twist er.nyroc.rr.com ...

Can't get this to work. I'm creating a workaround for the absence of
aspJPEG on my server. I'm using aspUpload but my server only uses

aspThumb.

After aspThumb optimizes the original pic the file size changes and I need to reflect that change. When using aspUpload I can reference it's built

in

File object references but they only refer to the "original" file.

There's

an easy solution when using aspJPEG but not with aspThumb so I'm trying to get the "new" picture size using a scripting object with this script but

I'm

getting this error.

Microsoft VBScript runtime error '800a01b6'

Object doesn't support this property or method: 'objPictureSize .Size'

/admin/media_upload_pi cture_process.a sp, line 107
Set objPictureSize = Server.CreateOb ject("Scripting .FileSystemObje ct")
picPath = "e:\InetPub\Cli ents\thehalfton horns.com\media \pictures\" &
File.FileName & ""
objPictureSize. GetFile(picPath )
pictureNewSize = objPictureSize. Size (this is line 107)

thanks!!