473,503 Members | 2,166 Online
Bytes | Software Development & Data Engineering Community
+ Post

Home Posts Topics Members FAQ

Cannot use Request.Form

Hi!

I get an error when I run my code
Is there any other way to get te information from my form?

Heres the error I get and the code beneath.
Line 120 is market with ''''''''''''Line 120'''''''''''''''''''''
'''''''''''''''''''''''''''''''''''''''''''''''''' ''''''''''''''''''''''''''
'''''''''''''''''''CODE''''''''''''''''''''''''''' ''''''''''''''''''''''''''
'''''''''''''''''''''''''''''''''''''''''''''''''' '''''''''

Request object error 'ASP 0207 : 80004005'
Cannot use Request.Form

/asp/admin/select_image.asp, line 120

Cannot use Request.Form collection after calling BinaryRead.

'''''''''''''''''''''''''''''''''''''''''''''''''' ''''''''''''''''''''''''''
'''''''''''''''''''CODE''''''''''''''''''''''''''' ''''''''''''''''''''''''''
'''''''''''''''''''''''''''''''''''''''''''''''''' '''''''''

if Request.QueryString("action") = "upload" then
Server.ScriptTimeout = 1200
Response.Expires = 0
Response.Buffer = TRUE
Response.Clear

Dim UploadRequest
Set UploadRequest = CreateObject("Scripting.Dictionary")

ByteCount = Request.TotalBytes

if ByteCount > Application("MaxFileSize2Upload") then
Response.Redirect "./select_image.asp?error=05"
end if
RequestBin = Request.BinaryRead(byteCount)
BuildUploadRequest RequestBin

Dim aux, aux1
Dim ImageCateg, ContentType, FilePathName, FileName, Value

ImageCateg = Unescape(UploadRequest.Item("inpcatid").Item("Valu e")) 'Image
Folder

on error resume next
ContentType = UploadRequest.Item("inpFile").Item("ContentType")
FILEFLAG = err.number
on error goto 0

if FILEFLAG = 0 then
ContentType = UploadRequest.Item("inpFile").Item("ContentType")
FilePathName = UploadRequest.Item("inpFile").Item("FileName")
FileName =
Right(filepathname,Len(filepathname)-InstrRev(filepathname,"\"))
Value = UploadRequest.Item("inpFile").Item("Value")
else
FileName = ""
end if

Dim objFSO2
Dim objFSO3
Dim objUploadFile
Dim objDelFile1
Dim OldPath
'''''''''''''''laster opp bilde'''''''''''''''''''''''''''''
if FileName<>"" then
on error resume next
Set objFSO2 = Server.CreateObject("Scripting.FileSystemObject")
Set objUploadFile = objFSO2.CreateTextFile(ImageCateg&"\"&FileName)
objUploadFile.Write getString(value)
objUploadFile.Close
FILEFLAG = err.number
on error goto 0
'''''''''''''''resizer bilde'''''''''''''''''''''''''''''
' create instance of AspJpeg object
Set jpeg = Server.CreateObject("Persits.Jpeg")

' open uploaded file
Dim ResizeName
Dim Ratio
OldPath = Server.MapPath(Escape(sDir) & Escape(FileName))
jpeg.Open( OldPath )
' resize image accoring to "scale" option.

'''''''''''''''''''''''''''''''''''''''''''''''''' ''''''''''''''''''''''''''
'''''''''Line
120''''''''''''''''''''''''''''''''''''''''''''''' ''''''''''''''''''''''''''
'''''''''''''''''''''''''''''''''
Select Case Request.Form("resize")

'''''''''''''''''''''''''''''''''''''''''''''''''' ''''''''''''''''''''''''''
'''''''''/Line
120/'''''''''''''''''''''''''''''''''''''''''''''''''' ''''''''''''''''''''''
''''''''''''''''''''''''''''''''''
Case "tn"
ResizeName = "_miniatyr"
Ratio = jpeg.OriginalHeight / 100
jpeg.Width = 100
jpeg.Height = jpeg.OriginalHeight / Ratio
Case Else
ResizeName = "_noko_anna"
jpeg.Width = jpeg.OriginalWidth * 50 / 100
jpeg.Height = jpeg.OriginalHeight * 50 / 100
End Select
OldPath = Server.MapPath(Escape(sDir)) & "\" & Escape(FileName)
SavePath = Left(OldPath, InStrRev(OldPath, ".") - 1)
SavePath = SavePath & ResizeName
SavePath = SavePath & ".jpg"
Jpeg.Interpolation = 2
'AspJpeg always generates JPEG thumbnails regardless of original format.
'If the original file was not a JPEG, append .JPG extension.

jpeg.Save SavePath
end if

Set objFSO2 = nothing
Set objUploadFile = nothing
Set UploadRequest = nothing

Jul 19 '05 #1
6 10307
BinaryRead and Request.Form/QueryString are mutually exclusive. Once you
have used one to read the data, the other is inaccessible.

I found an article on the MSDN library about how to recreate a
pseudo-Request.Form collection but its taken from Active Server Developer's
Journal, so I'm not sure if its on the web. I'll see if I can find a web
article on this, otherwise I'll have a read through the article and give you
the basics here.

A Ratcliffe
ar********@archimagic.net

"Christopher Brandsdal" <ch***********@c2i.net> wrote in message
news:OG**************@tk2msftngp13.phx.gbl...
Hi!

I get an error when I run my code
Is there any other way to get te information from my form?

Heres the error I get and the code beneath.
Line 120 is market with ''''''''''''Line 120'''''''''''''''''''''
'''''''''''''''''''''''''''''''''''''''''''''''''' '''''''''''''''''''''''''' '''''''''''''''''''CODE''''''''''''''''''''''''''' '''''''''''''''''''''''''' '''''''''''''''''''''''''''''''''''''''''''''''''' '''''''''

Request object error 'ASP 0207 : 80004005'
Cannot use Request.Form

/asp/admin/select_image.asp, line 120

Cannot use Request.Form collection after calling BinaryRead.

'''''''''''''''''''''''''''''''''''''''''''''''''' '''''''''''''''''''''''''' '''''''''''''''''''CODE''''''''''''''''''''''''''' '''''''''''''''''''''''''' '''''''''''''''''''''''''''''''''''''''''''''''''' '''''''''

if Request.QueryString("action") = "upload" then
Server.ScriptTimeout = 1200
Response.Expires = 0
Response.Buffer = TRUE
Response.Clear

Dim UploadRequest
Set UploadRequest = CreateObject("Scripting.Dictionary")

ByteCount = Request.TotalBytes

if ByteCount > Application("MaxFileSize2Upload") then
Response.Redirect "./select_image.asp?error=05"
end if
RequestBin = Request.BinaryRead(byteCount)
BuildUploadRequest RequestBin

Dim aux, aux1
Dim ImageCateg, ContentType, FilePathName, FileName, Value

ImageCateg = Unescape(UploadRequest.Item("inpcatid").Item("Valu e")) 'Image Folder

on error resume next
ContentType = UploadRequest.Item("inpFile").Item("ContentType")
FILEFLAG = err.number
on error goto 0

if FILEFLAG = 0 then
ContentType = UploadRequest.Item("inpFile").Item("ContentType")
FilePathName = UploadRequest.Item("inpFile").Item("FileName")
FileName =
Right(filepathname,Len(filepathname)-InstrRev(filepathname,"\"))
Value = UploadRequest.Item("inpFile").Item("Value")
else
FileName = ""
end if

Dim objFSO2
Dim objFSO3
Dim objUploadFile
Dim objDelFile1
Dim OldPath
'''''''''''''''laster opp bilde'''''''''''''''''''''''''''''
if FileName<>"" then
on error resume next
Set objFSO2 = Server.CreateObject("Scripting.FileSystemObject")
Set objUploadFile = objFSO2.CreateTextFile(ImageCateg&"\"&FileName)
objUploadFile.Write getString(value)
objUploadFile.Close
FILEFLAG = err.number
on error goto 0
'''''''''''''''resizer bilde'''''''''''''''''''''''''''''
' create instance of AspJpeg object
Set jpeg = Server.CreateObject("Persits.Jpeg")

' open uploaded file
Dim ResizeName
Dim Ratio
OldPath = Server.MapPath(Escape(sDir) & Escape(FileName))
jpeg.Open( OldPath )
' resize image accoring to "scale" option.

'''''''''''''''''''''''''''''''''''''''''''''''''' '''''''''''''''''''''''''' '''''''''Line
120''''''''''''''''''''''''''''''''''''''''''''''' '''''''''''''''''''''''''' '''''''''''''''''''''''''''''''''
Select Case Request.Form("resize")

'''''''''''''''''''''''''''''''''''''''''''''''''' '''''''''''''''''''''''''' '''''''''/Line
120/'''''''''''''''''''''''''''''''''''''''''''''''''' '''''''''''''''''''''' ''''''''''''''''''''''''''''''''''
Case "tn"
ResizeName = "_miniatyr"
Ratio = jpeg.OriginalHeight / 100
jpeg.Width = 100
jpeg.Height = jpeg.OriginalHeight / Ratio
Case Else
ResizeName = "_noko_anna"
jpeg.Width = jpeg.OriginalWidth * 50 / 100
jpeg.Height = jpeg.OriginalHeight * 50 / 100
End Select
OldPath = Server.MapPath(Escape(sDir)) & "\" & Escape(FileName)
SavePath = Left(OldPath, InStrRev(OldPath, ".") - 1)
SavePath = SavePath & ResizeName
SavePath = SavePath & ".jpg"
Jpeg.Interpolation = 2
'AspJpeg always generates JPEG thumbnails regardless of original format. 'If the original file was not a JPEG, append .JPG extension.

jpeg.Save SavePath
end if

Set objFSO2 = nothing
Set objUploadFile = nothing
Set UploadRequest = nothing

Jul 19 '05 #2
Thanks for helping me!

I think it's possible because AspUpload can do it.

I have AspJpeg installed on my server but NOT AspUpload.
Here is a short AspJpeg script that use something else than Request.Form:

<HTML>
<HEAD>
<TITLE>AspJpeg 1.2 - Upload.asp</TITLE>
</HEAD>
<BODY>

<!-- this script is invoked by form.asp-->
<%
' Create an instance of AspUpload object
Set Upload = Server.CreateObject("Persits.Upload")

' Capture uploaded file. Save returns the number of files uploaded
Count = Upload.Save(Server.MapPath("/"))

If Count = 0 Then
Response.Write "No images selected. <A HREF=""form.asp"">Try again</A>."
Response.End
Else

' Obtain File object representing uploaded file
Set File = Upload.Files(1)

' Is this a valid image file?
If File.ImageType <> "UNKNOWN" Then

' create instance of AspJpeg object
Set jpeg = Server.CreateObject("Persits.Jpeg")

' open uploaded file
jpeg.Open( File.Path )

' resize image accoring to "scale" option.
' notice that we cannot use Request.Form, so we use Upload.Form instead.
jpeg.Width = jpeg.OriginalWidth * Upload.Form("scale") / 100
jpeg.Height = jpeg.OriginalHeight * Upload.Form("scale") / 100

SavePath = Server.MapPath("/bilde/") & File.ExtractFileName

' AspJpeg always generates JPEG thumbnails regardless of original format.
' If the original file was not a JPEG, append .JPG extension.
If UCase(Right(SavePath, 3)) <> "JPG" Then
SavePath = SavePath & ".jpg"
End If

jpeg.Save SavePath

Response.Write "Success! Both the original file and its thumbnail are
saved in the database.<P>"
Response.Write "Copies can be found at <B>c:\upload\" &
File.ExtractFileName & "</B> and <B>" & SavePath & "</B>"

Else
Response.Write "This is not a valid image. <A HREF=""form.asp"">Try
again</A>."
Response.End
End If
End If
%>
</BODY>
</HTML>

"A Ratcliffe" <ar********@archimagic.net> skrev i melding
news:eJ**************@TK2MSFTNGP09.phx.gbl...
BinaryRead and Request.Form/QueryString are mutually exclusive. Once you
have used one to read the data, the other is inaccessible.

I found an article on the MSDN library about how to recreate a
pseudo-Request.Form collection but its taken from Active Server Developer's Journal, so I'm not sure if its on the web. I'll see if I can find a web
article on this, otherwise I'll have a read through the article and give you the basics here.

A Ratcliffe
ar********@archimagic.net

"Christopher Brandsdal" <ch***********@c2i.net> wrote in message
news:OG**************@tk2msftngp13.phx.gbl...
Hi!

I get an error when I run my code
Is there any other way to get te information from my form?

Heres the error I get and the code beneath.
Line 120 is market with ''''''''''''Line 120'''''''''''''''''''''

'''''''''''''''''''''''''''''''''''''''''''''''''' ''''''''''''''''''''''''''

'''''''''''''''''''CODE''''''''''''''''''''''''''' ''''''''''''''''''''''''''
'''''''''''''''''''''''''''''''''''''''''''''''''' '''''''''

Request object error 'ASP 0207 : 80004005'
Cannot use Request.Form

/asp/admin/select_image.asp, line 120

Cannot use Request.Form collection after calling BinaryRead.

'''''''''''''''''''''''''''''''''''''''''''''''''' ''''''''''''''''''''''''''

'''''''''''''''''''CODE''''''''''''''''''''''''''' ''''''''''''''''''''''''''
'''''''''''''''''''''''''''''''''''''''''''''''''' '''''''''

if Request.QueryString("action") = "upload" then
Server.ScriptTimeout = 1200
Response.Expires = 0
Response.Buffer = TRUE
Response.Clear

Dim UploadRequest
Set UploadRequest = CreateObject("Scripting.Dictionary")

ByteCount = Request.TotalBytes

if ByteCount > Application("MaxFileSize2Upload") then
Response.Redirect "./select_image.asp?error=05"
end if
RequestBin = Request.BinaryRead(byteCount)
BuildUploadRequest RequestBin

Dim aux, aux1
Dim ImageCateg, ContentType, FilePathName, FileName, Value

ImageCateg = Unescape(UploadRequest.Item("inpcatid").Item("Valu e"))

'Image
Folder

on error resume next
ContentType = UploadRequest.Item("inpFile").Item("ContentType")
FILEFLAG = err.number
on error goto 0

if FILEFLAG = 0 then
ContentType = UploadRequest.Item("inpFile").Item("ContentType")
FilePathName = UploadRequest.Item("inpFile").Item("FileName")
FileName =
Right(filepathname,Len(filepathname)-InstrRev(filepathname,"\"))
Value = UploadRequest.Item("inpFile").Item("Value")
else
FileName = ""
end if

Dim objFSO2
Dim objFSO3
Dim objUploadFile
Dim objDelFile1
Dim OldPath
'''''''''''''''laster opp bilde'''''''''''''''''''''''''''''
if FileName<>"" then
on error resume next
Set objFSO2 = Server.CreateObject("Scripting.FileSystemObject")
Set objUploadFile = objFSO2.CreateTextFile(ImageCateg&"\"&FileName)
objUploadFile.Write getString(value)
objUploadFile.Close
FILEFLAG = err.number
on error goto 0
'''''''''''''''resizer bilde'''''''''''''''''''''''''''''
' create instance of AspJpeg object
Set jpeg = Server.CreateObject("Persits.Jpeg")

' open uploaded file
Dim ResizeName
Dim Ratio
OldPath = Server.MapPath(Escape(sDir) & Escape(FileName))
jpeg.Open( OldPath )
' resize image accoring to "scale" option.

'''''''''''''''''''''''''''''''''''''''''''''''''' ''''''''''''''''''''''''''
'''''''''Line

120''''''''''''''''''''''''''''''''''''''''''''''' ''''''''''''''''''''''''''
'''''''''''''''''''''''''''''''''
Select Case Request.Form("resize")

'''''''''''''''''''''''''''''''''''''''''''''''''' ''''''''''''''''''''''''''
'''''''''/Line

120/'''''''''''''''''''''''''''''''''''''''''''''''''' ''''''''''''''''''''''
''''''''''''''''''''''''''''''''''
Case "tn"
ResizeName = "_miniatyr"
Ratio = jpeg.OriginalHeight / 100
jpeg.Width = 100
jpeg.Height = jpeg.OriginalHeight / Ratio
Case Else
ResizeName = "_noko_anna"
jpeg.Width = jpeg.OriginalWidth * 50 / 100
jpeg.Height = jpeg.OriginalHeight * 50 / 100
End Select
OldPath = Server.MapPath(Escape(sDir)) & "\" & Escape(FileName)
SavePath = Left(OldPath, InStrRev(OldPath, ".") - 1)
SavePath = SavePath & ResizeName
SavePath = SavePath & ".jpg"
Jpeg.Interpolation = 2
'AspJpeg always generates JPEG thumbnails regardless of original

format.
'If the original file was not a JPEG, append .JPG extension.

jpeg.Save SavePath
end if

Set objFSO2 = nothing
Set objUploadFile = nothing
Set UploadRequest = nothing


Jul 19 '05 #3
It's definitely possible (the article I mentioned shows how to do so, which
is probably how ASPUpload does it).

"Christopher Brandsdal" <ch***********@c2i.net> wrote in message
news:u3*************@TK2MSFTNGP10.phx.gbl...
Thanks for helping me!

I think it's possible because AspUpload can do it.

I have AspJpeg installed on my server but NOT AspUpload.
Here is a short AspJpeg script that use something else than Request.Form:

<HTML>
<HEAD>
<TITLE>AspJpeg 1.2 - Upload.asp</TITLE>
</HEAD>
<BODY>

<!-- this script is invoked by form.asp-->
<%
' Create an instance of AspUpload object
Set Upload = Server.CreateObject("Persits.Upload")

' Capture uploaded file. Save returns the number of files uploaded
Count = Upload.Save(Server.MapPath("/"))

If Count = 0 Then
Response.Write "No images selected. <A HREF=""form.asp"">Try again</A>."
Response.End
Else

' Obtain File object representing uploaded file
Set File = Upload.Files(1)

' Is this a valid image file?
If File.ImageType <> "UNKNOWN" Then

' create instance of AspJpeg object
Set jpeg = Server.CreateObject("Persits.Jpeg")

' open uploaded file
jpeg.Open( File.Path )

' resize image accoring to "scale" option.
' notice that we cannot use Request.Form, so we use Upload.Form instead. jpeg.Width = jpeg.OriginalWidth * Upload.Form("scale") / 100
jpeg.Height = jpeg.OriginalHeight * Upload.Form("scale") / 100

SavePath = Server.MapPath("/bilde/") & File.ExtractFileName

' AspJpeg always generates JPEG thumbnails regardless of original format. ' If the original file was not a JPEG, append .JPG extension.
If UCase(Right(SavePath, 3)) <> "JPG" Then
SavePath = SavePath & ".jpg"
End If

jpeg.Save SavePath

Response.Write "Success! Both the original file and its thumbnail are
saved in the database.<P>"
Response.Write "Copies can be found at <B>c:\upload\" &
File.ExtractFileName & "</B> and <B>" & SavePath & "</B>"

Else
Response.Write "This is not a valid image. <A HREF=""form.asp"">Try
again</A>."
Response.End
End If
End If
%>
</BODY>
</HTML>

"A Ratcliffe" <ar********@archimagic.net> skrev i melding
news:eJ**************@TK2MSFTNGP09.phx.gbl...
BinaryRead and Request.Form/QueryString are mutually exclusive. Once you
have used one to read the data, the other is inaccessible.

I found an article on the MSDN library about how to recreate a
pseudo-Request.Form collection but its taken from Active Server

Developer's
Journal, so I'm not sure if its on the web. I'll see if I can find a web
article on this, otherwise I'll have a read through the article and give

you
the basics here.

A Ratcliffe
ar********@archimagic.net

"Christopher Brandsdal" <ch***********@c2i.net> wrote in message
news:OG**************@tk2msftngp13.phx.gbl...
Hi!

I get an error when I run my code
Is there any other way to get te information from my form?

Heres the error I get and the code beneath.
Line 120 is market with ''''''''''''Line 120'''''''''''''''''''''

'''''''''''''''''''''''''''''''''''''''''''''''''' ''''''''''''''''''''''''''

'''''''''''''''''''CODE''''''''''''''''''''''''''' ''''''''''''''''''''''''''
'''''''''''''''''''''''''''''''''''''''''''''''''' '''''''''

Request object error 'ASP 0207 : 80004005'
Cannot use Request.Form

/asp/admin/select_image.asp, line 120

Cannot use Request.Form collection after calling BinaryRead.

'''''''''''''''''''''''''''''''''''''''''''''''''' ''''''''''''''''''''''''''

'''''''''''''''''''CODE''''''''''''''''''''''''''' ''''''''''''''''''''''''''
'''''''''''''''''''''''''''''''''''''''''''''''''' '''''''''

if Request.QueryString("action") = "upload" then
Server.ScriptTimeout = 1200
Response.Expires = 0
Response.Buffer = TRUE
Response.Clear

Dim UploadRequest
Set UploadRequest = CreateObject("Scripting.Dictionary")

ByteCount = Request.TotalBytes

if ByteCount > Application("MaxFileSize2Upload") then
Response.Redirect "./select_image.asp?error=05"
end if
RequestBin = Request.BinaryRead(byteCount)
BuildUploadRequest RequestBin

Dim aux, aux1
Dim ImageCateg, ContentType, FilePathName, FileName, Value

ImageCateg = Unescape(UploadRequest.Item("inpcatid").Item("Valu e"))

'Image
Folder

on error resume next
ContentType = UploadRequest.Item("inpFile").Item("ContentType")
FILEFLAG = err.number
on error goto 0

if FILEFLAG = 0 then
ContentType = UploadRequest.Item("inpFile").Item("ContentType")
FilePathName = UploadRequest.Item("inpFile").Item("FileName")
FileName =
Right(filepathname,Len(filepathname)-InstrRev(filepathname,"\"))
Value = UploadRequest.Item("inpFile").Item("Value")
else
FileName = ""
end if

Dim objFSO2
Dim objFSO3
Dim objUploadFile
Dim objDelFile1
Dim OldPath
'''''''''''''''laster opp bilde'''''''''''''''''''''''''''''
if FileName<>"" then
on error resume next
Set objFSO2 = Server.CreateObject("Scripting.FileSystemObject")
Set objUploadFile = objFSO2.CreateTextFile(ImageCateg&"\"&FileName) objUploadFile.Write getString(value)
objUploadFile.Close
FILEFLAG = err.number
on error goto 0
'''''''''''''''resizer bilde'''''''''''''''''''''''''''''
' create instance of AspJpeg object
Set jpeg = Server.CreateObject("Persits.Jpeg")

' open uploaded file
Dim ResizeName
Dim Ratio
OldPath = Server.MapPath(Escape(sDir) & Escape(FileName))
jpeg.Open( OldPath )
' resize image accoring to "scale" option.

'''''''''''''''''''''''''''''''''''''''''''''''''' ''''''''''''''''''''''''''
'''''''''Line

120''''''''''''''''''''''''''''''''''''''''''''''' ''''''''''''''''''''''''''
'''''''''''''''''''''''''''''''''
Select Case Request.Form("resize")

'''''''''''''''''''''''''''''''''''''''''''''''''' ''''''''''''''''''''''''''
'''''''''/Line

120/'''''''''''''''''''''''''''''''''''''''''''''''''' ''''''''''''''''''''''
''''''''''''''''''''''''''''''''''
Case "tn"
ResizeName = "_miniatyr"
Ratio = jpeg.OriginalHeight / 100
jpeg.Width = 100
jpeg.Height = jpeg.OriginalHeight / Ratio
Case Else
ResizeName = "_noko_anna"
jpeg.Width = jpeg.OriginalWidth * 50 / 100
jpeg.Height = jpeg.OriginalHeight * 50 / 100
End Select
OldPath = Server.MapPath(Escape(sDir)) & "\" & Escape(FileName)
SavePath = Left(OldPath, InStrRev(OldPath, ".") - 1)
SavePath = SavePath & ResizeName
SavePath = SavePath & ".jpg"
Jpeg.Interpolation = 2
'AspJpeg always generates JPEG thumbnails regardless of original

format.
'If the original file was not a JPEG, append .JPG extension.

jpeg.Save SavePath
end if

Set objFSO2 = nothing
Set objUploadFile = nothing
Set UploadRequest = nothing



Jul 19 '05 #4
A quick glance at the web via serach engine found me this article. Its not
perfect in its explanations, but it does cover parsing your own Request.Form
data after a BinaryRead.

http://www.juicystudio.com/tutorial/asp/upload.html

HTH,

A Ratcliffe
ar********@archimagic.net

"A Ratcliffe" <ar********@archimagic.net> wrote in message
news:uw**************@TK2MSFTNGP09.phx.gbl...
It's definitely possible (the article I mentioned shows how to do so, which is probably how ASPUpload does it).

"Christopher Brandsdal" <ch***********@c2i.net> wrote in message
news:u3*************@TK2MSFTNGP10.phx.gbl...
Thanks for helping me!

I think it's possible because AspUpload can do it.

I have AspJpeg installed on my server but NOT AspUpload.
Here is a short AspJpeg script that use something else than Request.Form:

<HTML>
<HEAD>
<TITLE>AspJpeg 1.2 - Upload.asp</TITLE>
</HEAD>
<BODY>

<!-- this script is invoked by form.asp-->
<%
' Create an instance of AspUpload object
Set Upload = Server.CreateObject("Persits.Upload")

' Capture uploaded file. Save returns the number of files uploaded
Count = Upload.Save(Server.MapPath("/"))

If Count = 0 Then
Response.Write "No images selected. <A HREF=""form.asp"">Try again</A>." Response.End
Else

' Obtain File object representing uploaded file
Set File = Upload.Files(1)

' Is this a valid image file?
If File.ImageType <> "UNKNOWN" Then

' create instance of AspJpeg object
Set jpeg = Server.CreateObject("Persits.Jpeg")

' open uploaded file
jpeg.Open( File.Path )

' resize image accoring to "scale" option.
' notice that we cannot use Request.Form, so we use Upload.Form

instead.
jpeg.Width = jpeg.OriginalWidth * Upload.Form("scale") / 100
jpeg.Height = jpeg.OriginalHeight * Upload.Form("scale") / 100

SavePath = Server.MapPath("/bilde/") & File.ExtractFileName

' AspJpeg always generates JPEG thumbnails regardless of original

format.
' If the original file was not a JPEG, append .JPG extension.
If UCase(Right(SavePath, 3)) <> "JPG" Then
SavePath = SavePath & ".jpg"
End If

jpeg.Save SavePath

Response.Write "Success! Both the original file and its thumbnail are
saved in the database.<P>"
Response.Write "Copies can be found at <B>c:\upload\" &
File.ExtractFileName & "</B> and <B>" & SavePath & "</B>"

Else
Response.Write "This is not a valid image. <A HREF=""form.asp"">Try
again</A>."
Response.End
End If
End If
%>
</BODY>
</HTML>

"A Ratcliffe" <ar********@archimagic.net> skrev i melding
news:eJ**************@TK2MSFTNGP09.phx.gbl...
BinaryRead and Request.Form/QueryString are mutually exclusive. Once you have used one to read the data, the other is inaccessible.

I found an article on the MSDN library about how to recreate a
pseudo-Request.Form collection but its taken from Active Server

Developer's
Journal, so I'm not sure if its on the web. I'll see if I can find a web article on this, otherwise I'll have a read through the article and give
you
the basics here.

A Ratcliffe
ar********@archimagic.net

"Christopher Brandsdal" <ch***********@c2i.net> wrote in message
news:OG**************@tk2msftngp13.phx.gbl...
> Hi!
>
> I get an error when I run my code
> Is there any other way to get te information from my form?
>
> Heres the error I get and the code beneath.
> Line 120 is market with ''''''''''''Line 120'''''''''''''''''''''
>
>
>

'''''''''''''''''''''''''''''''''''''''''''''''''' '''''''''''''''''''''''''' >

'''''''''''''''''''CODE''''''''''''''''''''''''''' ''''''''''''''''''''''''''
> '''''''''''''''''''''''''''''''''''''''''''''''''' '''''''''
>
> Request object error 'ASP 0207 : 80004005'
> Cannot use Request.Form
>
> /asp/admin/select_image.asp, line 120
>
> Cannot use Request.Form collection after calling BinaryRead.
>
>

'''''''''''''''''''''''''''''''''''''''''''''''''' ''''''''''''''''''''''''''
>

'''''''''''''''''''CODE''''''''''''''''''''''''''' ''''''''''''''''''''''''''
> '''''''''''''''''''''''''''''''''''''''''''''''''' '''''''''
>
> if Request.QueryString("action") = "upload" then
> Server.ScriptTimeout = 1200
> Response.Expires = 0
> Response.Buffer = TRUE
> Response.Clear
>
> Dim UploadRequest
> Set UploadRequest = CreateObject("Scripting.Dictionary")
>
> ByteCount = Request.TotalBytes
>
> if ByteCount > Application("MaxFileSize2Upload") then
> Response.Redirect "./select_image.asp?error=05"
> end if
>
>
> RequestBin = Request.BinaryRead(byteCount)
> BuildUploadRequest RequestBin
>
> Dim aux, aux1
> Dim ImageCateg, ContentType, FilePathName, FileName, Value
>
> ImageCateg = Unescape(UploadRequest.Item("inpcatid").Item("Valu e")) 'Image
> Folder
>
> on error resume next
> ContentType = UploadRequest.Item("inpFile").Item("ContentType")
> FILEFLAG = err.number
> on error goto 0
>
> if FILEFLAG = 0 then
> ContentType = UploadRequest.Item("inpFile").Item("ContentType")
> FilePathName = UploadRequest.Item("inpFile").Item("FileName")
> FileName =
> Right(filepathname,Len(filepathname)-InstrRev(filepathname,"\"))
> Value = UploadRequest.Item("inpFile").Item("Value")
> else
> FileName = ""
> end if
>
> Dim objFSO2
> Dim objFSO3
> Dim objUploadFile
> Dim objDelFile1
> Dim OldPath
> '''''''''''''''laster opp bilde'''''''''''''''''''''''''''''
> if FileName<>"" then
> on error resume next
> Set objFSO2 = Server.CreateObject("Scripting.FileSystemObject")
> Set objUploadFile = objFSO2.CreateTextFile(ImageCateg&"\"&FileName) > objUploadFile.Write getString(value)
> objUploadFile.Close
> FILEFLAG = err.number
> on error goto 0
> '''''''''''''''resizer bilde'''''''''''''''''''''''''''''
> ' create instance of AspJpeg object
> Set jpeg = Server.CreateObject("Persits.Jpeg")
>
> ' open uploaded file
> Dim ResizeName
> Dim Ratio
> OldPath = Server.MapPath(Escape(sDir) & Escape(FileName))
> jpeg.Open( OldPath )
> ' resize image accoring to "scale" option.
>
>

'''''''''''''''''''''''''''''''''''''''''''''''''' ''''''''''''''''''''''''''
> '''''''''Line
>

120''''''''''''''''''''''''''''''''''''''''''''''' ''''''''''''''''''''''''''
> '''''''''''''''''''''''''''''''''
> Select Case Request.Form("resize")
>
>

'''''''''''''''''''''''''''''''''''''''''''''''''' ''''''''''''''''''''''''''
> '''''''''/Line
>

120/'''''''''''''''''''''''''''''''''''''''''''''''''' ''''''''''''''''''''''
> ''''''''''''''''''''''''''''''''''
> Case "tn"
> ResizeName = "_miniatyr"
> Ratio = jpeg.OriginalHeight / 100
> jpeg.Width = 100
> jpeg.Height = jpeg.OriginalHeight / Ratio
> Case Else
> ResizeName = "_noko_anna"
> jpeg.Width = jpeg.OriginalWidth * 50 / 100
> jpeg.Height = jpeg.OriginalHeight * 50 / 100
> End Select
> OldPath = Server.MapPath(Escape(sDir)) & "\" & Escape(FileName)
> SavePath = Left(OldPath, InStrRev(OldPath, ".") - 1)
> SavePath = SavePath & ResizeName
> SavePath = SavePath & ".jpg"
> Jpeg.Interpolation = 2
> 'AspJpeg always generates JPEG thumbnails regardless of original
format.
> 'If the original file was not a JPEG, append .JPG extension.
>
> jpeg.Save SavePath
> end if
>
> Set objFSO2 = nothing
> Set objUploadFile = nothing
> Set UploadRequest = nothing
>
>
>



Jul 19 '05 #5
Have you considered a free solution?
It doesn't mention accessing the form variables on the page, but in the
readme.txt file it does.
http://www.asp101.com/articles/jacob/scriptupload.asp
"Christopher Brandsdal" <ch***********@c2i.net> wrote in message
news:u3*************@TK2MSFTNGP10.phx.gbl...
Thanks for helping me!

I think it's possible because AspUpload can do it.

I have AspJpeg installed on my server but NOT AspUpload.
Here is a short AspJpeg script that use something else than Request.Form:

<HTML>
<HEAD>
<TITLE>AspJpeg 1.2 - Upload.asp</TITLE>
</HEAD>
<BODY>

<!-- this script is invoked by form.asp-->
<%
' Create an instance of AspUpload object
Set Upload = Server.CreateObject("Persits.Upload")

' Capture uploaded file. Save returns the number of files uploaded
Count = Upload.Save(Server.MapPath("/"))

If Count = 0 Then
Response.Write "No images selected. <A HREF=""form.asp"">Try again</A>."
Response.End
Else

' Obtain File object representing uploaded file
Set File = Upload.Files(1)

' Is this a valid image file?
If File.ImageType <> "UNKNOWN" Then

' create instance of AspJpeg object
Set jpeg = Server.CreateObject("Persits.Jpeg")

' open uploaded file
jpeg.Open( File.Path )

' resize image accoring to "scale" option.
' notice that we cannot use Request.Form, so we use Upload.Form instead. jpeg.Width = jpeg.OriginalWidth * Upload.Form("scale") / 100
jpeg.Height = jpeg.OriginalHeight * Upload.Form("scale") / 100

SavePath = Server.MapPath("/bilde/") & File.ExtractFileName

' AspJpeg always generates JPEG thumbnails regardless of original format. ' If the original file was not a JPEG, append .JPG extension.
If UCase(Right(SavePath, 3)) <> "JPG" Then
SavePath = SavePath & ".jpg"
End If

jpeg.Save SavePath

Response.Write "Success! Both the original file and its thumbnail are
saved in the database.<P>"
Response.Write "Copies can be found at <B>c:\upload\" &
File.ExtractFileName & "</B> and <B>" & SavePath & "</B>"

Else
Response.Write "This is not a valid image. <A HREF=""form.asp"">Try
again</A>."
Response.End
End If
End If
%>
</BODY>
</HTML>

"A Ratcliffe" <ar********@archimagic.net> skrev i melding
news:eJ**************@TK2MSFTNGP09.phx.gbl...
BinaryRead and Request.Form/QueryString are mutually exclusive. Once you
have used one to read the data, the other is inaccessible.

I found an article on the MSDN library about how to recreate a
pseudo-Request.Form collection but its taken from Active Server

Developer's
Journal, so I'm not sure if its on the web. I'll see if I can find a web
article on this, otherwise I'll have a read through the article and give

you
the basics here.

A Ratcliffe
ar********@archimagic.net

"Christopher Brandsdal" <ch***********@c2i.net> wrote in message
news:OG**************@tk2msftngp13.phx.gbl...
Hi!

I get an error when I run my code
Is there any other way to get te information from my form?

Heres the error I get and the code beneath.
Line 120 is market with ''''''''''''Line 120'''''''''''''''''''''

'''''''''''''''''''''''''''''''''''''''''''''''''' ''''''''''''''''''''''''''

'''''''''''''''''''CODE''''''''''''''''''''''''''' ''''''''''''''''''''''''''
'''''''''''''''''''''''''''''''''''''''''''''''''' '''''''''

Request object error 'ASP 0207 : 80004005'
Cannot use Request.Form

/asp/admin/select_image.asp, line 120

Cannot use Request.Form collection after calling BinaryRead.

'''''''''''''''''''''''''''''''''''''''''''''''''' ''''''''''''''''''''''''''

'''''''''''''''''''CODE''''''''''''''''''''''''''' ''''''''''''''''''''''''''
'''''''''''''''''''''''''''''''''''''''''''''''''' '''''''''

if Request.QueryString("action") = "upload" then
Server.ScriptTimeout = 1200
Response.Expires = 0
Response.Buffer = TRUE
Response.Clear

Dim UploadRequest
Set UploadRequest = CreateObject("Scripting.Dictionary")

ByteCount = Request.TotalBytes

if ByteCount > Application("MaxFileSize2Upload") then
Response.Redirect "./select_image.asp?error=05"
end if
RequestBin = Request.BinaryRead(byteCount)
BuildUploadRequest RequestBin

Dim aux, aux1
Dim ImageCateg, ContentType, FilePathName, FileName, Value

ImageCateg = Unescape(UploadRequest.Item("inpcatid").Item("Valu e"))

'Image
Folder

on error resume next
ContentType = UploadRequest.Item("inpFile").Item("ContentType")
FILEFLAG = err.number
on error goto 0

if FILEFLAG = 0 then
ContentType = UploadRequest.Item("inpFile").Item("ContentType")
FilePathName = UploadRequest.Item("inpFile").Item("FileName")
FileName =
Right(filepathname,Len(filepathname)-InstrRev(filepathname,"\"))
Value = UploadRequest.Item("inpFile").Item("Value")
else
FileName = ""
end if

Dim objFSO2
Dim objFSO3
Dim objUploadFile
Dim objDelFile1
Dim OldPath
'''''''''''''''laster opp bilde'''''''''''''''''''''''''''''
if FileName<>"" then
on error resume next
Set objFSO2 = Server.CreateObject("Scripting.FileSystemObject")
Set objUploadFile = objFSO2.CreateTextFile(ImageCateg&"\"&FileName) objUploadFile.Write getString(value)
objUploadFile.Close
FILEFLAG = err.number
on error goto 0
'''''''''''''''resizer bilde'''''''''''''''''''''''''''''
' create instance of AspJpeg object
Set jpeg = Server.CreateObject("Persits.Jpeg")

' open uploaded file
Dim ResizeName
Dim Ratio
OldPath = Server.MapPath(Escape(sDir) & Escape(FileName))
jpeg.Open( OldPath )
' resize image accoring to "scale" option.

'''''''''''''''''''''''''''''''''''''''''''''''''' ''''''''''''''''''''''''''
'''''''''Line

120''''''''''''''''''''''''''''''''''''''''''''''' ''''''''''''''''''''''''''
'''''''''''''''''''''''''''''''''
Select Case Request.Form("resize")

'''''''''''''''''''''''''''''''''''''''''''''''''' ''''''''''''''''''''''''''
'''''''''/Line

120/'''''''''''''''''''''''''''''''''''''''''''''''''' ''''''''''''''''''''''
''''''''''''''''''''''''''''''''''
Case "tn"
ResizeName = "_miniatyr"
Ratio = jpeg.OriginalHeight / 100
jpeg.Width = 100
jpeg.Height = jpeg.OriginalHeight / Ratio
Case Else
ResizeName = "_noko_anna"
jpeg.Width = jpeg.OriginalWidth * 50 / 100
jpeg.Height = jpeg.OriginalHeight * 50 / 100
End Select
OldPath = Server.MapPath(Escape(sDir)) & "\" & Escape(FileName)
SavePath = Left(OldPath, InStrRev(OldPath, ".") - 1)
SavePath = SavePath & ResizeName
SavePath = SavePath & ".jpg"
Jpeg.Interpolation = 2
'AspJpeg always generates JPEG thumbnails regardless of original

format.
'If the original file was not a JPEG, append .JPG extension.

jpeg.Save SavePath
end if

Set objFSO2 = nothing
Set objUploadFile = nothing
Set UploadRequest = nothing



Jul 19 '05 #6
Thank you :)
When I read the article I thought.... AHA!
hehe
The problem is solved, and I am happy as a butterfly ;)

"A Ratcliffe" <ar********@archimagic.net> skrev i melding
news:ev**************@TK2MSFTNGP10.phx.gbl...
A quick glance at the web via serach engine found me this article. Its not
perfect in its explanations, but it does cover parsing your own Request.Form data after a BinaryRead.

http://www.juicystudio.com/tutorial/asp/upload.html

HTH,

A Ratcliffe
ar********@archimagic.net

"A Ratcliffe" <ar********@archimagic.net> wrote in message
news:uw**************@TK2MSFTNGP09.phx.gbl...
It's definitely possible (the article I mentioned shows how to do so,

which
is probably how ASPUpload does it).

"Christopher Brandsdal" <ch***********@c2i.net> wrote in message
news:u3*************@TK2MSFTNGP10.phx.gbl...
Thanks for helping me!

I think it's possible because AspUpload can do it.

I have AspJpeg installed on my server but NOT AspUpload.
Here is a short AspJpeg script that use something else than Request.Form:
<HTML>
<HEAD>
<TITLE>AspJpeg 1.2 - Upload.asp</TITLE>
</HEAD>
<BODY>

<!-- this script is invoked by form.asp-->
<%
' Create an instance of AspUpload object
Set Upload = Server.CreateObject("Persits.Upload")

' Capture uploaded file. Save returns the number of files uploaded
Count = Upload.Save(Server.MapPath("/"))

If Count = 0 Then
Response.Write "No images selected. <A HREF=""form.asp"">Try again</A>." Response.End
Else

' Obtain File object representing uploaded file
Set File = Upload.Files(1)

' Is this a valid image file?
If File.ImageType <> "UNKNOWN" Then

' create instance of AspJpeg object
Set jpeg = Server.CreateObject("Persits.Jpeg")

' open uploaded file
jpeg.Open( File.Path )

' resize image accoring to "scale" option.
' notice that we cannot use Request.Form, so we use Upload.Form

instead.
jpeg.Width = jpeg.OriginalWidth * Upload.Form("scale") / 100
jpeg.Height = jpeg.OriginalHeight * Upload.Form("scale") / 100

SavePath = Server.MapPath("/bilde/") & File.ExtractFileName

' AspJpeg always generates JPEG thumbnails regardless of original

format.
' If the original file was not a JPEG, append .JPG extension.
If UCase(Right(SavePath, 3)) <> "JPG" Then
SavePath = SavePath & ".jpg"
End If

jpeg.Save SavePath

Response.Write "Success! Both the original file and its thumbnail are saved in the database.<P>"
Response.Write "Copies can be found at <B>c:\upload\" &
File.ExtractFileName & "</B> and <B>" & SavePath & "</B>"

Else
Response.Write "This is not a valid image. <A HREF=""form.asp"">Try
again</A>."
Response.End
End If
End If
%>
</BODY>
</HTML>

"A Ratcliffe" <ar********@archimagic.net> skrev i melding
news:eJ**************@TK2MSFTNGP09.phx.gbl...
> BinaryRead and Request.Form/QueryString are mutually exclusive. Once you > have used one to read the data, the other is inaccessible.
>
> I found an article on the MSDN library about how to recreate a
> pseudo-Request.Form collection but its taken from Active Server
Developer's
> Journal, so I'm not sure if its on the web. I'll see if I can find a web > article on this, otherwise I'll have a read through the article and give you
> the basics here.
>
> A Ratcliffe
> ar********@archimagic.net
>
> "Christopher Brandsdal" <ch***********@c2i.net> wrote in message
> news:OG**************@tk2msftngp13.phx.gbl...
> > Hi!
> >
> > I get an error when I run my code
> > Is there any other way to get te information from my form?
> >
> > Heres the error I get and the code beneath.
> > Line 120 is market with ''''''''''''Line 120'''''''''''''''''''''
> >
> >
> >
>

'''''''''''''''''''''''''''''''''''''''''''''''''' ''''''''''''''''''''''''''
> >
>

'''''''''''''''''''CODE''''''''''''''''''''''''''' ''''''''''''''''''''''''''
> > '''''''''''''''''''''''''''''''''''''''''''''''''' '''''''''
> >
> > Request object error 'ASP 0207 : 80004005'
> > Cannot use Request.Form
> >
> > /asp/admin/select_image.asp, line 120
> >
> > Cannot use Request.Form collection after calling BinaryRead.
> >
> >
>

'''''''''''''''''''''''''''''''''''''''''''''''''' ''''''''''''''''''''''''''
> >
>

'''''''''''''''''''CODE''''''''''''''''''''''''''' ''''''''''''''''''''''''''
> > '''''''''''''''''''''''''''''''''''''''''''''''''' '''''''''
> >
> > if Request.QueryString("action") = "upload" then
> > Server.ScriptTimeout = 1200
> > Response.Expires = 0
> > Response.Buffer = TRUE
> > Response.Clear
> >
> > Dim UploadRequest
> > Set UploadRequest = CreateObject("Scripting.Dictionary")
> >
> > ByteCount = Request.TotalBytes
> >
> > if ByteCount > Application("MaxFileSize2Upload") then
> > Response.Redirect "./select_image.asp?error=05"
> > end if
> >
> >
> > RequestBin = Request.BinaryRead(byteCount)
> > BuildUploadRequest RequestBin
> >
> > Dim aux, aux1
> > Dim ImageCateg, ContentType, FilePathName, FileName, Value
> >
> > ImageCateg = Unescape(UploadRequest.Item("inpcatid").Item("Valu e")) > 'Image
> > Folder
> >
> > on error resume next
> > ContentType = UploadRequest.Item("inpFile").Item("ContentType")
> > FILEFLAG = err.number
> > on error goto 0
> >
> > if FILEFLAG = 0 then
> > ContentType = UploadRequest.Item("inpFile").Item("ContentType") > > FilePathName = UploadRequest.Item("inpFile").Item("FileName")
> > FileName =
> > Right(filepathname,Len(filepathname)-InstrRev(filepathname,"\"))
> > Value = UploadRequest.Item("inpFile").Item("Value")
> > else
> > FileName = ""
> > end if
> >
> > Dim objFSO2
> > Dim objFSO3
> > Dim objUploadFile
> > Dim objDelFile1
> > Dim OldPath
> > '''''''''''''''laster opp bilde'''''''''''''''''''''''''''''
> > if FileName<>"" then
> > on error resume next
> > Set objFSO2 = Server.CreateObject("Scripting.FileSystemObject") > > Set objUploadFile =

objFSO2.CreateTextFile(ImageCateg&"\"&FileName)
> > objUploadFile.Write getString(value)
> > objUploadFile.Close
> > FILEFLAG = err.number
> > on error goto 0
> > '''''''''''''''resizer bilde'''''''''''''''''''''''''''''
> > ' create instance of AspJpeg object
> > Set jpeg = Server.CreateObject("Persits.Jpeg")
> >
> > ' open uploaded file
> > Dim ResizeName
> > Dim Ratio
> > OldPath = Server.MapPath(Escape(sDir) & Escape(FileName))
> > jpeg.Open( OldPath )
> > ' resize image accoring to "scale" option.
> >
> >
>

'''''''''''''''''''''''''''''''''''''''''''''''''' ''''''''''''''''''''''''''
> > '''''''''Line
> >
>

120''''''''''''''''''''''''''''''''''''''''''''''' ''''''''''''''''''''''''''
> > '''''''''''''''''''''''''''''''''
> > Select Case Request.Form("resize")
> >
> >
>

'''''''''''''''''''''''''''''''''''''''''''''''''' ''''''''''''''''''''''''''
> > '''''''''/Line
> >
>

120/'''''''''''''''''''''''''''''''''''''''''''''''''' ''''''''''''''''''''''
> > ''''''''''''''''''''''''''''''''''
> > Case "tn"
> > ResizeName = "_miniatyr"
> > Ratio = jpeg.OriginalHeight / 100
> > jpeg.Width = 100
> > jpeg.Height = jpeg.OriginalHeight / Ratio
> > Case Else
> > ResizeName = "_noko_anna"
> > jpeg.Width = jpeg.OriginalWidth * 50 / 100
> > jpeg.Height = jpeg.OriginalHeight * 50 / 100
> > End Select
> > OldPath = Server.MapPath(Escape(sDir)) & "\" & Escape(FileName)
> > SavePath = Left(OldPath, InStrRev(OldPath, ".") - 1)
> > SavePath = SavePath & ResizeName
> > SavePath = SavePath & ".jpg"
> > Jpeg.Interpolation = 2
> > 'AspJpeg always generates JPEG thumbnails regardless of original > format.
> > 'If the original file was not a JPEG, append .JPG extension.
> >
> > jpeg.Save SavePath
> > end if
> >
> > Set objFSO2 = nothing
> > Set objUploadFile = nothing
> > Set UploadRequest = nothing
> >
> >
> >
>
>



Jul 19 '05 #7

This thread has been closed and replies have been disabled. Please start a new discussion.

Similar topics

4
10280
by: nc | last post by:
My iterator can find my collection when my Action class calls my jsp directly, however when my Action class calls an html file that is set up with IFrames (one of which is loading that same jsp), I...
5
4907
by: rathnesh | last post by:
when using a web application which includes taking an asp page then going to another asp page and coming back to first page ...some times connection to iis gets terminated and page canot be...
5
1623
by: M P | last post by:
Hi Team! Hope that you could help me! Its been days since I made this script but I cannot fix the problem! IE is prompting me that there is a Syntax Error but it seems that the syntax is OK! Can...
2
22782
by: CJM | last post by:
I'm running a stored procedure that inserts a record into a table then returns the Identity field value. I've done this kind of thing plenty of times in the past, but I'm obviously doing something...
2
1494
by: Jack | last post by:
Hi, I got a simple form where one needs to input data. The data is being processed in an asp page. However, I cannot figure out why couple of values I am typing in the form is not being retrived...
4
5892
by: Zibi | last post by:
I try to use script from www.freeaspupload.net for upload file. I need to store in session object the names of uploaded files but I get an error - Cannot use Request.Form collection after...
8
5451
by: baustin75 | last post by:
Posted: Mon Oct 03, 2005 1:41 pm Post subject: cannot mail() in ie only when debugging in php designer 2005 -------------------------------------------------------------------------------- ...
2
8938
by: Griff | last post by:
Bizarre problem here.... I have a classic ASP web page that exists in one project. I have copied this code file into another web project and it errors! The code has not been altered in any...
1
2447
by: teenagelcruise | last post by:
hi, i have a problem with my code which is i cannot update and addnew data into the database but i can delete the data.plz give me an idea.this is my code that i wrote. <html> <head> <meta...
0
7205
marktang
by: marktang | last post by:
ONU (Optical Network Unit) is one of the key components for providing high-speed Internet services. Its primary function is to act as an endpoint device located at the user's premises. However,...
0
7093
by: Hystou | last post by:
Most computers default to English, but sometimes we require a different language, especially when relocating. Forgot to request a specific language before your computer shipped? No problem! You can...
1
7008
by: Hystou | last post by:
Overview: Windows 11 and 10 have less user interface control over operating system update behaviour than previous versions of Windows. In Windows 11 and 10, there is no way to turn off the Windows...
0
7467
tracyyun
by: tracyyun | last post by:
Dear forum friends, With the development of smart home technology, a variety of wireless communication protocols have appeared on the market, such as Zigbee, Z-Wave, Wi-Fi, Bluetooth, etc. Each...
1
5022
isladogs
by: isladogs | last post by:
The next Access Europe User Group meeting will be on Wednesday 1 May 2024 starting at 18:00 UK time (6PM UTC+1) and finishing by 19:30 (7.30PM). In this session, we are pleased to welcome a new...
0
4688
by: conductexam | last post by:
I have .net C# application in which I am extracting data from word file and save it in database particularly. To store word all data as it is I am converting the whole word file firstly in HTML and...
0
3177
by: TSSRALBI | last post by:
Hello I'm a network technician in training and I need your help. I am currently learning how to create and manage the different types of VPNs and I have a question about LAN-to-LAN VPNs. The...
0
1521
by: 6302768590 | last post by:
Hai team i want code for transfer the data from one system to another through IP address by using C# our system has to for every 5mins then we have to update the data what the data is updated ...
1
746
muto222
by: muto222 | last post by:
How can i add a mobile payment intergratation into php mysql website.

By using Bytes.com and it's services, you agree to our Privacy Policy and Terms of Use.

To disable or enable advertisements and analytics tracking please visit the manage ads & tracking page.