教程(视频,书籍)下载:  ASP.NET AutoCAD 数据库 C# ASP java photoshop 网页设计 delphi 3dmax Flash C++ VB 张孝祥 实例   更多请进入BIBIDU搜索

%>
<!-- #include virtual="/inc/adovbs.asp" -->
<!-- #include virtual="/inc/conn.asp" -->
<%
Dim ADOrs, SQL, ImageID
SQL = "images"
Set ADOrs = Server.CreateObject("ADODB.Recordset")
ADOrs.Open SQL, ADOconn, adOpenDynamic, adLockOptimistic, adCmdTable
ADOrs.AddNew
ADOrs("ContentType") = Form("src").ContentType
ADOrs("Length") = Form("src").Length
ADOrs("Date") = Date
ADOrs("Content").AppendChunk(Form("src").Value)
ADOrs.Update
ImageID = CStr(ADOrs("ID"))
ADOrs.Close
Set ADOrs = Nothing
%>
<!-- #include virtual="/inc/unconn.asp" -->
<%
Dim Src, Align, Alt, Border, Hspace, Vspace
Src = "showimage.asp?id=" & ImageID
Align = Form("align").Value
Alt = Form("alt").Value
If Form("border").Value = "" Then
Border = "0"
Else
Border = Form("border").Value
End If
If

Form("hspace").Value = "" Then
Hspace = "0"
Else
Hspace = Form("hspace").Value

来源:upschool.cn
作者:
关键字：
发表日期：2006-10-7

网页显示有限 阅读全文请下载本文完整版WORD文档

上一篇：ASP同一个帐号不能同时登陆的问题（1）   下一篇：新浪博客首页两侧加入浮动挂件效果

1.用纯ASP代码来实现图片上传(1)
2.用纯ASP代码来实现图片上传(2)
3.用纯ASP代码来实现图片上传(3)
4.用纯ASP代码来实现图片上传(4)
5.用纯ASP代码来实现图片上传(5)
6.用纯ASP代码来实现图片上传(6)
7.用纯ASP代码来实现图片上传(7)
8.用纯ASP代码来实现图片上传(8)
9.用纯ASP代码来实现图片上传(9)
10.用纯ASP代码来实现图片上传(10)

共10页 9 7 [1] [2] [3] [4] [5] [6] [7] [8] [9] [10] 8 :>

2009-1-9 2:36:55

本文的相类似文章