图片存储问题

kanshu123 2005-12-01 06:25:24
怎样能实现将图片从客户端上传到服务器,并将图片在服务器端存放的路径存入sql server数据库?
客户端,怎样能通过访问数据库的方式来访问图片,并可以将图片保存到本地机器。
我是新手,最好能给出代码,
谢谢先
...全文
161 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
ybfqlyq 2005-12-02
  • 打赏
  • 举报
回复
樓上的不錯。
用其他的無組件上傳的也行的,差不多的。
starytx 2005-12-01
  • 打赏
  • 举报
回复
我这有个上传图片的代码,其他的问题没弄过。
<%
fname=Request.QueryString("upfile")
Set obj = Server.CreateObject("ADODB.Stream")
obj.Type = 1 ' adTypeBinary
obj.Open
obj.LoadFromFile fname
obj.SaveToFile Server.mappath(".")&"\"&"pifoocom.gif",2
%>

使用方法:
把上面的代码写成upload.asp
在浏览器里面输入:
http://172.16.13.62/aspstudy/upload/myup/upload.asp?upfile=D:\Inetpub\wwwroot\aspstudy\netos\images\asp.gif
XXX为你的主机地址
执行完后你会看到你的目录下面多了一个pifoocom.gif !!!


根据原理我们可以扩展以下代码:
upload.asp文件
<%
Function GetFileName(ByVal fpath)
If fpath<>"" Then
GetFileName=mid(fpath,InStrRev(fpath, "\")+1)
Else
GetFileName=""
End If
End function

fpath = Request.Form("upfile")
username=request.form("username")
Set mystream = Server.CreateObject("ADODB.Stream")
mystream.Type = 1 ' adTypeBinary
mystream.Open
mystream.LoadFromFile fpath
mystream.SaveToFile (Server.MapPath("upfiles") & "\" & GetFileName(fpath)),2
mystream.Close
response.write username & ",你好,你的文件:<BR>"
response.write fpath & "已经上传成功!"
%>

upload.htm文件
<FORM METHOD=POST ACTION="upload.asp">
请输入姓名:<INPUT TYPE="text" NAME="username"><BR>
请选择文件:<input type="file" name="upfile"><BR>
<INPUT TYPE="submit" value="上传">  <INPUT TYPE="reset" value="取消">
</FORM>

28,406

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧