<%
function Output(id,Rid)
Set Srs=Server.CreateObject("ADODB.Recordset")
Sql = "select * from TB_class where C_ID="&id&" order by pid desc,id"
Srs.open Sql,conn,1,1
j=Srs.recordcount
i=1
do while not Srs.eof
id=Srs("ID")
If Cint(Rid)=Cint(id) then
msg="selected"
else
msg=""
end if
if Srs("C_ID")=0 then
Response.Write("")
output id,Rid
i=i+1
Srs.movenext
loop
Set Srs=nothing
end function
%>
印度尼西亚旅游签证 
老挝旅游签证
斯里兰卡旅游签证
奥地利旅游签证 
瑞士控亲签证 
德国旅游签证 
法国旅游签证 
英国旅游签证 
荷兰商务旅游
美国旅游签证 
加拿大旅游签证 
阿根迁商务签证 
墨西哥旅游签证 
秘鲁商务签证 
乌拉圭商务签证
古巴旅游签证
肯尼亚商务签证 
埃及旅游签证 
南非商务签证 
马达加斯加旅游签证 
突尼斯商务签证 
加纳商务签证
