?<% LANGUAGE="VBSCRIPT" %>
<%
'    myid=request.querystring("xyid")
'    response.redirect "/update.asp?xyid=" & xyid & ""
'    response.end
%>
<%
set myc=Createobject("ADODB.Connection")
myc.ConnectionString="DBQ="& server.mappath("/goost/date/hasn")& ";DRIVER={Microsoft Access Driver (*.mdb)};"
myc.open
 sub endConnection()
 myc.close
 set myc=nothing
 end sub
%>