Html 如何从数据库中读取数据

我正在尝试从数据库读取电子邮件地址，但它给我的错误消息响应对象错误“ASP 0185:8002000e”缺少默认属性。是不是因为Response.Write不允许？是否有其他方法可以从数据库获取数据并存储到变量中？另外，如何在CDO.MESSAGE HTMLBODY上插入图像我使用了标记，但不起作用。谢谢你的帮助

Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open "Provider=MSDASQL.

DIM objConn、bs、ossql
设置objConn=Server.CreateObject（“ADODB.Connection”）
objConn.Open“Provider=MSDASQL.1；密码=**；持久化安全信息=True；用户ID=**；数据源=**”
ossql=“选择来自medacist用户的电子邮件地址，其中用户名=”&strUsername&“、健康系统代码=”&strHealth&“、设施代码=”&strFacility&“”
设置bs=objConn.Execute（ossql）
Dim Store电子邮件
回复。写bs（“电子邮件地址”）

bs被视为一个记录集。您可以构建一个HTML字符串或JSON字符串来传递回浏览器

Set bs = objConn.Execute(ossql)
Dim html = ""
Do While Not bs.EOF
   html = html & bs.Fields(0).Value
Loop
bs.Close

Response.write(html)

---

我照你说的做了，它给了我一条错误消息Microsoft OLE DB Provider for ODBC Drivers error“80040e0c”命令文本没有为命令对象行40设置，命令对象行设置为bs=objConn.Execute（strQuery），但是如果我改为bs=objConn.Excute（ossql），它给我的错误消息对象是必需的：“[字符串：”“]'第41行设置为html=”“对不起，我的ASP非常生锈。我做了编辑。您将需要拿出一些HTML发送回浏览器，除非您只是发送回数据，在这种情况下，您应该*发送回JSON对象谢谢您的快速回复。我和你一样编辑代码。现在，当我再次运行代码时。它给了我另一条错误消息@@Microsoft VBScript编译错误“800a0401”预期语句结束/login/reset_form.asp，第42行Dim html=“”我想在html=“”中放入任何内容吗？我能够从数据库中读取电子邮件，但是如何将电子邮件数据存储到asp或html？Response.write将把变量html流回到浏览器。我想我很难理解你想要实现什么。你能详细说明一下吗？