Asp classic 关于asp-response写入的帮助很少

我设置了一个变量：

Dim adoRecordset

并将其设置为：

Set adoRecordSet = Server.CreateObject("ADODB.RecordSet")

adoRecordset.Open mSQL , adoConnection , adOpenForwardOnly

我用它来显示数据库中的数据

例1<代码>

我想添加一个asp代码“if”和“else”

但这个:2<代码>响应。写入“”

不起作用

---

如何使asp代码为2。以1的身份工作

我的asp经典版已经过时了，但我认为您正在寻找类似以下内容的内容：

<% 
If adoRecordset("loc") <> "" Then
   Response.Write(adoRecordset("loc"))
End If
%>

Dim adoRecordset
Set adoRecordSet=Server.CreateObject（“ADODB.RecordSet”）
adoRecordset。打开mSQL、adoConnection、adOpenForwardOnly
如果不是adoRecordset.EOF，则
不支持时请不要访问cordset.EOF
如果adoRecordset（“columnName”）=“测试值1”，则
write（“&adoRecordset（“columnName”）&”）
其他的
回答。写下（“我想在这里做点别的事情”）
如果结束
adoRecordset.movenext
环
如果结束
adoRecordset.close
set adoRecordset=无
看起来好像有用！但是我如何才能将输入到resposne write中呢？您可以在
响应中的输出字符串周围连接
td
s。write
，或者切换回Html输出。Stuart我可以问一下如何将：更改为asp吗？似乎唯一可能的变量是默认值。所以在Html块中：
myVBVariableHere
也可以是记录集字段，例如，
adoRecordset（“loc”）
等。它是引号。要么将它们加倍，即
“
”，要么使用单引号
“
<% 
Dim someLoc
Set someLoc = adoRecordset("loc")
If someLoc <> "" Then
   Response.Write("<td>" & someLoc & "</td>")
End If
%>

<% If something or other Then %>
  Some Conditional Html Here
<% Else %>
  Else Html here
<% End If %>

Dim adoRecordset
Set adoRecordSet = Server.CreateObject("ADODB.RecordSet")

adoRecordset.Open mSQL , adoConnection , adOpenForwardOnly

if not adoRecordset.EOF then

    do while not adoRecordSet.EOF
        if adoRecordset("columnName") = "test value 1" then
            response.write("<td>" & adoRecordset("columnName") & "</td>")
        else
            response.write("<td>I want to do something else here</td>")
        end if

        adoRecordset.movenext
    loop
end if

adoRecordset.close
set adoRecordset = nothing