这段asp代码怎样使它在JSP有用
<%
dim   theResponse,theresponseimg
url   =   urls+ "new_hotelname.ASP?card_id= "&card_id& " "
set   xmlhttp   =   server.CreateObject( "MSXML2.serverXMLHTTP.3.0 ")  
        xmlhttp.setOption   SXH_OPTION_URL_CODEPAGE,   936  
        xmlhttp.open   "GET ",   url,   false  
        xmlhttp.setRequestHeader   "Content-Type ",   "application/x-www-form-urlencoded;Charset:GB2312 "
        xmlhttp.send  
        theResponse=   xmlhttp.responseText  
        response.CharSet= "gb2312 "
       
urlm   =   urls+ "new_hotelimg.ASP?card_id= "&card_id& " "
set   xmlhttp   =   server.CreateObject( "MSXML2.serverXMLHTTP.3.0 ")  
        xmlhttp.setOption   SXH_OPTION_URL_CODEPAGE,   936  
        xmlhttp.open   "GET ",   urlm,   false  
        xmlhttp.setRequestHeader   "Content-Type ",   "application/x-www-form-urlencoded;Charset:GB2312 "
        xmlhttp.send  
        theresponseimg=   xmlhttp.responseText  
        response.CharSet= "gb2312 "
       
        function   gethedate(str)
        if   month(str) <10   then
        mstr=0&month(str)
        else
        mstr=month(str)
        end   if
        if   day(str) <10   then
        dstr=0&day(str)
        else
        dstr=day(str)
        end   if
       
        gethedate=year(str)& "- "&mstr& "- "&dstr
        end   function
%>

------解决方案--------------------
asp代码怎么能在jsp中用呢，还是把这段asp代码实现的功能用jsp实现一便吧