asp中想实现文字和图片同时存入sql server2005数据库中

[xiaoge1010]

asp中想同时实现文字和图片提交保存到数据库中。
文字，比如一些注册信息，姓名，电话，地址等等，
图片是，选择本地图片提交保存到数据库中。
怎样能同时保存，
例：数据库表的格式
id int 自动编号
name varchar
tel varchar
address varchar
photo image
我只能实现文字和图片的单独提交，怎样在一个页面同时提交啊
希望有完整的源代码，希望大家伙帮帮忙啊！

[xiaoge1010]

不是数据类型的问题，大家说是文字和二进制不能同时传，但有能实现的，不知道怎么实现。
烦啊。

[灬上海爽爷]

photo 的数据类型也改成varchar呢？

[xiaoge1010]

哎呀，都没人知道吗？

[SaminLu]

现在都数据优化了，还存数据库啊?

[xiaoge1010]

为什么没有人呢？

[西安风影]

还是有点难度的，
建议下载个无组件上传类
研究一下，否则你用request无法同时到文本和二进制数据

解决了这个同时问题以后，然后搜索如何存取二进制到数据库里

[xiaoge1010]

单独存文本可以实现，单独存图片也实现了，我想存成一行，但老是不行。只能存成两行。

[xiaoge1010]

搜了半天，说无组件上传，但怎么没找到具体的例子啊。
有没有人知道，我如果想用两个表单，该怎么处理呢，在这论坛上看见过一篇文章介绍相关方法的，但是也没有提交成功，到底该怎么做啊。
神啊，救救我吧！

[xiaoge1010]

哦，谢谢楼上的，终于有人来了。这是无组件上传是吗。
整了N天没弄出来，后来用的方法是先将图存入临时表中，然后再插入到想要的表中，终于是解决了。
但是还是谢谢楼上的。
我现在想要通过查询条件的查询来在一页中显示图片，好像还是不行，还得用两页是吗

[wcwtitxu]

以化境为例 表单 enctype 用 multipart/form-data

<!--#include file="upfile.asp" -->
<%
Dim u, photo, photoName, photoSize

Set u = New upload_5xsoft
Set rs = CreateObject("ADODB.RecordSet")

    rs.Open "SELECT TOP 1 * FROM [myTable] WHERE 1=2", conn, 1, 3
    rs.AddNew

        rs.Fields("name").Value    = u.Form("name")
        rs.Fields("tel").Value     = u.Form("tel")
        rs.Fields("address").Value = u.Form("address")
        
        If photo.FileSize>0 And InStr("|bmp|gif|jpg|png|", "|" & LCase(photo.FileExt) & "|") Then
            Data_5xsoft.Position = photo.FileStart
            rs.Fields("photo").AppendChunk Data_5xsoft.Read(photo.FileSize)
        End If

    rs.Update
    rs.Close

Set rs = Nothing
Set u = Nothing

%>

[wcwtitxu]

Dim u, photo, photoName, photoSize, photoExt

Set u = New upload_5xsoft
Set rs = CreateObject("ADODB.RecordSet")

	rs.Open "SELECT TOP 1 * FROM [myTable] WHERE 1=2", conn, 1, 3
	rs.AddNew
	
		rs.Fields("name").Value    = u.Form("name")
		rs.Fields("tel").Value     = u.Form("tel")
		rs.Fields("address").Value = u.Form("address")
		
		Set photo = u.File("photo")  ' 上面漏了
		photoSize = photo.FileSize
		photoName = photo.FileName
		photoExt  = photo.FileExt
		If photoSize>0 And InStr("|bmp|gif|jpg|png|", "|" & LCase(photoExt) & "|") Then
			Data_5xsoft.Position = photo.FileStart
			rs.Fields("photo").AppendChunk Data_5xsoft.Read(photo.FileSize)
		End If
	
	rs.Update
	rs.Close

Set rs = Nothing
Set u = Nothing