´ç½Å¿¡°Ô·Î ¶°³ª´Â ²Þ¼Ó¿©Çà - ²Þ¼Ó³ª¶ó(http://www.inyourdream.net)
ID¿Í Password¸¦ ÀÔ·ÂÇϼ¼¿ä.
ÀÔ±¹Çϱâ
|
¿µÁÖ±Ç ½Åû
¸öºÎ¸² °ñ¶ó°ñ¶ó
¼Ò±Ù¼Ò±Ù
µµ¶õµµ¶õ
³«¼¸¶´ç
Âø°¢ÇѾÆÀÌ
¼ýÀÚ¸ÂÃß±â
¼Ò¿øºô±â
ÈçÀû³²±â±â
²Þ¼Ó¿©Çà
Ä£±¸Áý ³î·¯°¡±â
¸ðµÎµå¸²´ÔÀÇ È¨
î¤éÞ´ÔÀÇ È¨
Çö¿ì´ÔÀÇ È¨
º°¾ÆÇØ´ÔÀÇ È¨
ÇÞ»ì´ÔÀÇ È¨
À̳ª´Ï´ÔÀÇ È¨
À¯¸®¾Ë´ÔÀÇ È¨
³È³ÈÀÌ´ÔÀÇ È¨
²ÀÁö´ÔÀÇ È¨
´ë¼º´ÔÀÇ È¨
¼öÁ¤ÇϽǶ§´Â ÇʼöÇ׸ñÀ» ¸ðµÎ ÀÔ·ÂÇÏ¼Å¾ß ÇÕ´Ï´Ù.
À̸§
*
°øÁö»çÇ×
ºñ°ø°³
HTML »ç¿ë
Á¦¸ñ
*
¼±ÅÃ
ÀÚÀÛ
»ç¶û
À¯¸Ó
ÀÚÀ¯
̵̧
¾Ë¸²
Áú¹®
±âŸ
³»¿ë
*
DExtUploadÄÄÆ÷³ÍÆ®ÀÇ ¼öÁ¤½Ã ¿¡·¯ÀÔ´Ï´Ù. µî·ÏÇϱ⿡¼´Â ¾Æ¹«¹®Á¦ ¾øÀÌ µî·ÏÀÌ µÇ´Âµ¥ À¯µ¶ °Ô½Ã±ÛÀ» ºÒ·¯¿Í ¼öÁ¤À» ÇϸéÀº ¾Æ·¡¿Í °°Àº ¿¡·¯¸Þ½ÃÁö°¡ ³ªÅ¸´ä´Ï´Ù. ----------------------------------------- ¿¡·¯¿ø¹® ----------------------------------------- DEXTUpload (0x800A0034) ÆÄÀÏ À̸§ ¶Ç´Â ¹øÈ£°¡ À߸øµÇ¾ú½À´Ï´Ù. /admin/commodity_modify_end.asp, line 11 ----------------------------------------- ¼öÁ¤ÆäÀÌÁö ¼Ò½º¿ø¹® ----------------------------------------- <%@ LANGUAGE="VBSCRIPT"%> <% '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 %> ------------------------------------------------ ¼Ò½º¿ø¹®ÀÔ´Ï´Ù. Á¶±Ý ¹«½ÄÇÑ ¹æ¹ýÀ» ÅÃÇßÁö¸¸ È®½ÇÇÏ°Ô ÇÒ·Á°í À§¿Í °°ÀÌ ÄÚµùÇß±¸¿ä ÆÄÀÏÀÌ ÀÖÀ¸¸é À̹ÌÁöÀÇ °¡·Î ¹× ¼¼·ÎÅ©±â ±¸ÇÏÁö ¾Ê°í ¾÷·Îµåµµ ¾ÈÇÏ´Â ¹ä¹ýÀÔ´Ï´Ù.
Ãß°¡ÇÒ À̹ÌÁö¸¦ ÀÔ·ÂÇϼ¼¿ä.
À̹ÌÁö 1
À̹ÌÁö¼³¸í 1
Ãß°¡ÇÒ ÀڷḦ ÀÔ·ÂÇϼ¼¿ä.
ÀÚ·á 1
ÀÚ·á¼³¸í 1
Ãß°¡ÇÒ ½ÎÀÌÆ®¸¦ ÀÔ·ÂÇϼ¼¿ä.
°ü·Ã½ÎÀÌÆ® 1
½ÎÀÌÆ®¼³¸í 1
Password
*