<% dim oicq
oicq=rs.Fields.Item("oicq").value
if oicq <> "" then
Response.Write ("
")
end if %>
这只是一个范例
dim oicq
oicq=rs.Fields.Item("oicq").value 设纪录rs.Fields.Item("oicq").value为变量OICQ。
if oicq <> "" then
Response.Write ("
")
end if 如果变量OICQ值不为空则执行img src='img/oicq.gif'
