%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
dim telid,conn,rs
set rs=server.CreateObject("adodb.recordset")
telid=request.Form("id")
if telid<>"" then
call add_del_update("LinkInfo","update",telid)
conn.close()
set rs=nothing
set conn=nothing
response.write ""
response.end
else
call add_del_update("LinkInfo","insert","")
conn.close()
set rs=nothing
set conn=nothing
response.write ""
response.end
end if
%>