当前位置: 首页 > 图文教程 > 网络编程 > ASP > ASP+上载例子

ASP
超级ASP版DataGrid:SkyGrid本地下载
用QuickWAP组件结合ASP建设Wap站点
ASP中取得图片宽度和高度的类(无组件)
在ASP处理程序时显示进度
结合FSO操作和Aspjpeg组件写的Class
asp实现的7xi音乐网的采集源代码
用asp+xmlhttp编写web采集程序
推荐ASP超速入门视频教程
关于“未指定的错误”的问题 的比较正解的解决方法
用asp脚本实现限制IP访问
aspupload 3.0 下载与使用集锦
[教程+分享]具有良好体验度的Web注册系统
asp 实现视频显示的效果函数
asp实现图片右键滑轮控制大小的函数
彻底掌握ASP分页技术杂谈
aspupload文件重命名及上传进度条的解决方法附代码
ASPJPEG综合操作的CLASS类
asp通用采集函数冗余版可以保存文件到本地
使用ODBC数据库管理Serv-U的FTP用户及相关ASP编程[附源码示例下载]
[asp]阿里西西的alexa采集效果代码

ASP+上载例子


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-03   浏览: 68 ::
收藏到网摘: n/a

       花君
  
  下面是用ASP+来纺写的上载例子!!在ASP中我们就才上载有许多组件:
  
  <html>
  
  <script language="VB" runat=server>
  'VB代码
  Sub UploadBtn_Click(Sender as Object, E as EventArgs)
  '以test.jpg上载为例
  UploadFile.PostedFile.SaveAs(Server.MapPath("test.jpg"))
  
  MyImage.ImageUrl = "test.jpg"
  
  MyImage.Visible = true
  
  End Sub
  
  </script>
  
  <body>
  
  <form enctype="multipart/form-data" runat=server>
  
  <h3>
  
  选择要上载的文件:
  
  <input id="UploadFile" type=file runat=server name="file">
  
  <asp:button text="Upload Me!" onClick="UploadBtn_Click" runat=server/>
  
  <hr>
  
  <asp:image id="MyImage" visible=false runat=server/>
  
  </form>
  
  </body>
  
  </html>
  
  下面是一个更详细的例子,其可以上载文件!还用了 System.Drawing APIs 重新定议了图象, 同时还在图片上加上你的文字,我是用 C#编写的 -- 你也可以用VB、Jscript来写。
  
  <%@ Import Namespace="System.IO" %>
  <%@ Import Namespace="System.Drawing" %>
  <%@ Import Namespace="System.Drawing.Imaging" %>
  
  <html>
  
  <script language="C#" runat=server>
  
  void UploadBtn_Click(Object sender, EventArgs e)
  {
  UploadFile.PostedFile.SaveAs(Server.MapPath("test.jpg"));
  ImageEditor.Visible = true;
  }
  
  void UpdateBtn_Click(Object sender, EventArgs e)
  {
  System.Drawing.Image image = System.Drawing.Image.FromFile(Server.MapPath("test.jpg"));
  System.Drawing.Image newimage = new Bitmap(image.Width, image.Height, PixelFormat.Format32bppRGB);
  Graphics g = Graphics.FromImage(newimage);
  g.DrawImage(image,0,0,image.Width,image.Height);
  Font f = new Font("Lucida Sans Unicode", Int32.Parse(FontSize.SelectedItem.Text));
  Brush b = new SolidBrush(Color.Red);
  g.DrawString(Caption.Text, f, b, 10, 140);
  g.Dispose();
  System.Drawing.Image thumbImage = newimage.GetThumbnailImage(Int32.Parse(Width.Text),Int32.Parse(Height.Text),null,0);
  image.Dispose();
  thumbImage.Save(Server.MapPath("test.jpg"), ImageFormat.JPEG);
  }
  
  </script>
  
  <body>
  
  <form enctype="multipart/form-data" runat=server>
  
  <h3>
  
  选择要上载的文件:
  <input id="UploadFile" type=file runat=server name="file2">
  
  <asp:button text="Upload Me!" onClick="UploadBtn_Click" runat=server/>
  
  <hr>
  <asp:panel id="ImageEditor" visible=false runat=server>
  <img src="/upload/tech/20091103/20091103094848_8c19f571e251e61cb8dd3612f26d5ecf.jpg">
  <h3>
  图象的宽度: <asp:textbox id="Width" runat=server/>
  图象的高度: <asp:textbox id="Height" runat=server/>
  <br>
  文字的内容: <asp:textbox id="Caption" runat=server/>
  文字的大小: <asp:dropdownlist id="FontSize" runat=server>
  <asp:listitem>14</asp:listitem>
  <asp:listitem>18</asp:listitem>