asp-classic - 对asp的帮助不大 - 响应写

Question

我设置了一个变量：

Dim adoRecordset

并将其设置为：

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

adoRecordset.Open mSQL , adoConnection , adOpenForwardOnly

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

例如。1.<td align="left"><%=adoRecordset("loc")%></td>

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

但是这个：2。Response.Write "<td adoRecordset(loc)></td>"

不起作用。

如何使 asp 代码 2. 作为 1. 工作？

Answer 1

我的 asp 经典已生锈，但我认为您正在寻找类似的东西：

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

或者使用本地变量来缓存结果：

<% 
Dim someLoc
Set someLoc = adoRecordset("loc")
If someLoc <> "" Then
   Response.Write("<td>" & someLoc & "</td>")
End If
%>

如果您有大量的条件Html输出，那么您可以再次切换出服务器代码，如下所示：

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

<%=是发出值而<%转义到服务器端代码的简写。

Answer 2

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