Question

把上传成功的图片路径存入ACCESS数据库，我用的是风声ASP无组件文件

index.asp文件代码如下：

<form action="/upload/upload.asp" enctype="multipart/form-data" name="form1" method="post">
<table width="54%" border="0" align="center" cellpadding="2" cellspacing="1">
<tr>
<td colspan="2" align="center"><strong>上传图片</strong>（图片格式：gif/jpg）</td>
</tr>
<tr>
<td width="180" align="right"><strong>图片名称：</strong></td>
<td width="405"><input name="strName" type="text" id="strName" /></td>
</tr>
<tr>
<td width="180" align="right"><strong>上传图片：</strong></td>
<td><input name="strPhoto" type="file" id="strPhoto" /></td>
</tr>
<tr>
<td colspan="2" align="center">
<input type="submit" name="Submit" value="提 交" />
<input type="reset" name="Submit2" value="重 置" /> </td>
</tr>
</table>
</form>

upload.asp代码如下：
<%
dim request2

'建立上传对象
set request2=New UpLoadClass

'设置字符集
request2.Charset="gb2312"

'打开对象
request2.Open()
%>

<form id="form1" name="form1" method="post" action="">
<table width="594" border="0" align="center" cellpadding="7" cellspacing="8">
<tr>
<td width="253" align="right"><strong>图片名称：</strong></td>
<td width="327" align="left">
<%'显示产品名称
Response.Write(request2.Form("strName"))%></td>
</tr>
<tr>
<td align="right"><strong>图片地址：</strong></td>
<td align="left">
<%'显示源文件路径与名称
Response.Write(request2.Form("strPhoto_Path")&request2.Form("strPhoto_Name"))
Response.Write("=>")

'显示目标文件路径与名称
Response.Write(request2.SavePath&request2.Form("strPhoto"))%></td>
</tr>
<tr>
<td colspan="2" align="center"><% Response.Write "<p>[<a href=""javascript:history.back();"">返回</a>]</p>"
%></td>
</tr>
</table>
</form>
<%
set request2=nothing
%>

UpLoadClass.asp是风声ASP无组件上传文件中原来的，没有改变。

有一个access数据库表，要将图片路径及名称写入，既
路径：request2.SavePath&request2.Form("strPhoto")
名称: request2.Form("strName")
写入数据库，如何操作？尽量详细点！

Answer 1

<%
Dim DbPath, Db, Rs
DbPath=Server.MapPath("pict.mdb") '获得数据库路径，加上pictures.mdb为数据库名称
Set Db=Server.CreateObject("ADODB.Connection")
Db.open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source="+DbPath) '建立数据库连接
Db.Execute "INSERT INTO pict VALUES('" & request2.SavePath&request2.Form("strPhoto") & "','" & request2.Form("strName") & "')" '假设保存图片路径的表名为pict，且其中只有两个字段分别保存图片路径和文件名，注意两个字段名都要用单引号括起！
如果还有问题请追问
%>