62,046
社区成员
发帖
与我相关
我的任务
分享
<OBJECT id="idUploadCtl" CLASSID="CLSID:4F1E5B1A-2A80-42ca-8532-2D05CB959537" width="100%" height="94%" codebase="http://127.0.0.1/msn/MsnPUpld.cab#version=10,0,910,0">
<PARAM name=PostURL value="http://127.0.0.1/msn/test.aspx">
<PARAM NAME="SingleSelect" VALUE="0">
<PARAM NAME="ShowHiResOption" VALUE="0">
<PARAM name="DefaultPhotoSize" value="600">
<PARAM name=CommunityID value="coolfax">
<PARAM NAME="MaxFileSize" VALUE="1048576">
<PARAM name=Resources value="http://127.0.0.1/msn/PURzh-cn.cab">
<PARAM name=TopicID value="cns!1pWTzBpZ9bZ3wfs4j4nyfX1A!108">
<PARAM name=MaxFileSize value="1048576">
<PARAM NAME="JpegQuality" VALUE="40">
<PARAM NAME="CurUsedSpace" VALUE="48978">
<PARAM NAME="MaxAvailableSpace" VALUE="31457280">
<PARAM NAME="SynchronousUpload" VALUE="1">
<PARAM NAME="FeatureMode" VALUE="0">
<PARAM NAME="UploadThumbnail" VALUE="1">
<PARAM NAME="MainBackgroundColor" VALUE="16644599">
<PARAM NAME="PaneBackgroundColor" VALUE="16777215">
<iframe name="PhotoActiveXDL" id="PhotoActiveXDL" src="test.aspx" width="100%" height="100%" scrolling="no" frameborder="0"></iframe>
</OBJECT>
<%@ Page language="c#" Debug="true"%>
<%@ Import namespace="System" %>
<%@ Import namespace="System.Web" %>
<%@ import Namespace="System.IO" %>
<script runat="server">
void Page_Load()
{
HttpFileCollection MyFileCollection;
HttpPostedFile MyFile;
Stream MyStream;
MyFileCollection = Request.Files;
MyFile = MyFileCollection[0];
// Initialize the stream.
MyStream = MyFile.InputStream;
//保存图片
System.Drawing.Image img = System.Drawing.Image.FromStream(MyStream);
//img.Save("C:\\" + MyFile.FileName.Substring(MyFile.FileName.LastIndexOf('\\')));
img.Save("C:\aaa");
img.Dispose();
}
</script>
<html>
<head>
<title></title>
<META NAME="Generator" CONTENT="EditPlus">
</head>
<body background="back.GIF">
<OBJECT id="idUploadCtl" codeBase="http://spaces.msn.com//PhotoUpload/MsnPUpld.cab#version=10,0,910,0" height="94%" width="100%" classid="CLSID:4F1E5B1A-2A80-42ca-8532-2D05CB959537">
<PARAM NAME="_cx" VALUE="26088">
<PARAM NAME="_cy" VALUE="12250">
<PARAM NAME="PostURL" VALUE="http://localhost/Directories.asp">
<PARAM NAME="Resources" VALUE="http://spaces.msn.com/PhotoUpload/Resources/PURzh-cn.cab">
<PARAM NAME="CommunityID" VALUE="goodspeedwang">
<PARAM NAME="TopicID" VALUE="cns!1pYlKYfaPyJYtLJHok682dUA!105">
<PARAM NAME="MaxFileSize" VALUE="1048576">
<PARAM NAME="DefaultPhotoSize" VALUE="600">
<PARAM NAME="SingleSelect" VALUE="0">
<PARAM NAME="JpegQuality" VALUE="40">
<PARAM NAME="ShowHiResOption" VALUE="0">
<PARAM NAME="CurUsedSpace" VALUE="0">
<PARAM NAME="MaxAvailableSpace" VALUE="10485760">
<PARAM NAME="SynchronousUpload" VALUE="1">
<PARAM NAME="FeatureMode" VALUE="0">
<PARAM NAME="UploadThumbnail" VALUE="1">
<PARAM NAME="MainBackgroundColor" VALUE="16644599">
<PARAM NAME="PaneBackgroundColor" VALUE="16777215">
<PARAM NAME="PostData" VALUE="">
<PARAM NAME="ToolVersion" VALUE="10,0,910,0">
<PARAM NAME="DestinationFolder" VALUE="">
<PARAM NAME="HiResJpegQuality" VALUE="10">
<PARAM NAME="ErrTooManyFilesUrl" VALUE="">
<iframe name="PhotoActiveXDL" id="PhotoActiveXDL" src="http://localhost/reply.asp" width="100%" height="100%" scrolling="no" frameborder="0"></iframe>
</OBJECT>
</body>
</html>
<%
'powerd by sc_g_ruan
'2006-3-28
'msn photo upload
dim sFolder
Set Upload = Server.CreateObject("Persits.Upload.1")
Count = Upload.SaveToMemory
For Each File in Upload.Files
FolderName=File.ExtractFolderName
FileName=File.ExtractFileName
LocalDir=server.mappath("upload/")
Upload.CreateDirectory LocalDir, True
File.SaveAs LocalDir & "/" & FileName
Response.Write "Saved as <B>"&LocalDir&FileName&"</B><BR>"
Next
response.redirect "replay.asp"
%>