%
dim ID,Linkman,FixTel,Fax,MobTel,Address,Remarks
ID=GetNumericParam("id")
set rs=conn.execute("SELECT * FROM LinkInfo WHERE [id]="&ID)
if not rs.eof then
AreaName=rs("AreaName")
InCludeArea=rs("InCludeArea")
Linkman=rs("Linkman")
FixTel=rs("FixTel")
Fax=rs("Fax")
MobTel=rs("MobTel")
Address=rs("Address")
Remarks=rs("Remarks")
else
response.Write "尚未设置服务电话,请与管理员联系!"
response.End()
end if
%>