|
|
 |
|
Leader / 2002-02-09 / 오후 1:26:05 / 211.189.136.10
조회수 : 202
|
| [질문] 리더님 질문(다른분들도 아시면 답변부탁합니다.) |
> DExtUpload컴포넌트의 수정시 에러입니다.
> 등록하기에서는 아무문제 없이 등록이 되는데
> 유독 게시글을 불러와 수정을 하면은 아래와 같은 에러메시지가 나타답니다.
>
> -----------------------------------------
> 에러원문
> -----------------------------------------
> DEXTUpload (0x800A0034)
> 파일 이름 또는 번호가 잘못되었습니다.
> /admin/commodity_modify_end.asp, line 11
>
>
> -----------------------------------------
> 수정페이지 소스원문
> -----------------------------------------
> <%@ LANGUAGE="VBSCRIPT"%>
> <!-- #include file="include/dsn.asp" -->
> <%
> 'Program by Sung-an, Park
> 'ch2u@ch2u.net
> 'Jan.2002
> 'Database : MS-SQL70~MS-SQL2000
> 'DextUpload Component
>
> Set uploadform = Server.CreateObject("DEXT.FileUpload")
>
> idx = uploadform("idx")
> photo_check = uploadform("photo")
>
> if photo_check = "" then
>
> cardno = uploadform("cardno")
> cardno = replace(cardno,"'","''")
>
> commodity = uploadform("commodity")
> commodity = replace(commodity,"'","''")
>
> styleno = uploadform("styleno")
> styleno = replace(styleno,"'","''")
>
> size = uploadform("size")
> size = replace(size,"'","''")
>
> material = uploadform("material")
> material = replace(material,"'","''")
>
> content = uploadform("content")
> content = replace(content,"'","''")
>
> season = uploadform("season")
>
>
> SQL = "Update csc Set "
> SQL = SQL & "cardno='" & cardno & "'"
> SQL = SQL & ",commodity='" & commodity & "'"
> SQL = SQL & ",styleno='" & styleno & "'"
> SQL = SQL & ",size='" & size & "'"
> SQL = SQL & ",material='" & material & "'"
> SQL = SQL & ",content='" & content & "'"
> SQL = SQL & ",season='" & season & "' where idx=" & idx
>
> db.Execute SQL
>
> db.Close
> set db = Nothing
> else
> uploadform.DefaultPath = filepath '제품사진이 저장될 절대 디렉토리
> filepath = uploadform.DefaultPath
> image_file = uploadform("photo").FileName
>
> imgtype = uploadform("photo").ImageFormat
>
> imgwidth = uploadform("photo").ImageWidth
> imgheight = uploadform("photo").ImageHeight
>
> 'Set fso = Server.CreateObject("Scripting.FileSystemObject")
>
> filespec = filepath & "\" & uploadform("deletephoto") '---수정시 기존파일삭제 시작 ---
>
> If uploadform.FileExists(filespec) Then
> uploadform.DeleteFile filespec
> end if '---수정시 기존파일삭제 끝 ---
>
> upfilepath = filepath & "\" & image_file
> uploadedfile = uploadform.SaveAs(upfilepath, False)
> image_up_file = mid(uploadedfile, instrrev(uploadedfile,"\")+1) '파일네임구하기
> '-----------------------------------------------------------------------------------
>
> cardno = uploadform("cardno")
> cardno = replace(cardno,"'","''")
>
> commodity = uploadform("commodity")
> commodity = replace(commodity,"'","''")
>
> styleno = uploadform("styleno")
> styleno = replace(styleno,"'","''")
>
> size = uploadform("size")
> size = replace(size,"'","''")
>
> material = uploadform("material")
> material = replace(material,"'","''")
>
> content = uploadform("content")
> content = replace(content,"'","''")
>
> season = uploadform("season")
>
> img_width = imgwidth
> img_height = imgheight
>
> if img_width > img_height and img_width > 120 then
> result_width = 120
> result_height = Cint(img_height * (120/img_width))
> elseif img_height > width and img_height > 120 then
> result_width = Cint(img_width * (120/img_height))
> result_height = 120
> else
> result_width = img_width
> result_height = img_height
> end if
>
>
> SQL = "Update csc Set "
> SQL = SQL & "cardno='" & cardno & "'"
> SQL = SQL & ",commodity='" & commodity & "'"
> SQL = SQL & ",styleno='" & styleno & "'"
> SQL = SQL & ",size='" & size & "'"
> SQL = SQL & ",material='" & material & "'"
> SQL = SQL & ",photo='" & image_up_file & "'"
> SQL = SQL & ",photowidth=" & img_width
> SQL = SQL & ",photoheight=" & img_height
> SQL = SQL & ",imgwidth=" & result_width
> SQL = SQL & ",imgheight=" & result_height
> SQL = SQL & ",content='" & content & "'"
> SQL = SQL & ",season='" & season & "' where idx=" & idx
>
> db.Execute SQL
>
> db.Close
> set db = Nothing
>
> end if
>
> Set uploadform = Nothing
> Response.Redirect "modify_end_massage.asp?idx=" & idx
> %>
> ------------------------------------------------
> 소스원문입니다. 조금 무식한 방법을 택했지만
> 확실하게 할려고 위와 같이 코딩했구요
>
> 파일이 있으면 이미지의 가로 및 세로크기
> 구하지 않고 업로드도 안하는 밥법입니다.
>
>
-----------------------------------------------------------
11번째 줄이 머죠??
앞쪽에 include 가 있을 경우에는 갸를 포함하기때매
ㅡㅡㅋ 틀려지는데...
소스도 별 이상이 없고... 이상하넴... ㅡㅡㅋ
|
|
|
|