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

ASP
TSYS 新闻列表JS调用下载
使用asp代码突破图片的防盗连
一种理论上最快的Web数据库分页方法
asp:debug类调试程序
如何增加Referer功能--反向链接插件
pjblog中清空引用的小程序
光碟工具 Alcohol 120% v1.9.6.4719 下载(附序列号注册码)
ASP实现头像图像随机变换
UTF-8 Unicode Ansi 汉字GB2321几种编码转换程序
[转]XMLHTTPRequest的属性和方法简介
ASP常用函数:getpy()
我用ASP写的m行n列的函数,动态输出创建TABLE行列
ASP常用函数:Delay()
ASP常用函数:Trace()
[转]ASP实现关键词获取(各搜索引擎,GB2312及UTF-8)
对象标记具有无效的 ''MSWC.MyInfo'' ProgID
ServerVariables集合检索预定的环境变量
HTTP_HOST 和 SERVER_NAME 的区别详解
[转]ASP常用函数:TimeZone
Eval 函数 | Execute 语句 | ExecuteGlobal 语句

ASP+上载例子


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-03   浏览: 165 ::
收藏到网摘: 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>