Question

asp分类问题

0=现金支出 1=现金收入
现在我加了
3=支票支出 2=支票收入

<%
If io=0 Then
Response.Write "现金支出
Else
Response.Write "现金收入"
End if
%>

这段 我想加入2和3的判断 该怎么改
'loop' 语句缺少 'do'

<%
i=i+1
if i >= MaxPerpage then exit do
rs.MoveNext
Loop-------------------这里是102行
End if
Response.Write "</table>"
showpage()
Response.Write "</html>"
If Request.QueryString("action") = "del" Then
Dim dd,delid
delid=Request("id")
Set dd = Conn.Execute("Delete * From [PayType] Where ID ="&delid)
Response.Redirect "Pay_Type.asp"
End if
rs.Close
Conn.Close
Set rs = Nothing
Set Conn = Nothing
%>

Answer 1

<%
If io=0 Then
Response.Write "现金支出
ElseIf io=1 Then
Response.Write "现金收入"
ElseIf io=2 Then
Response.Write "支票收入"
ElseIf io=3 Then
Response.Write "支票支出"
End if
%>