<%@ LANGUAGE = "JavaScript" EnableSessionState=True %> <% Response.Expires = 1; Response.CacheControl="no-cache"; var geabios = Request.Cookies()( "GEABIOS" ); Response.Buffer = false; //Server.ScriptTimeOut=500; Response.Expires = -1; Response.ContentType="text/html"; var htmlHead = '' + 'World\'s Latest News - Science / Technology' + '' + '

World\'s Latest News - Science and Technology Powered by Google

'; var htmlTail = ''; if( geabios == "" ) { Response.Write( htmlHead ); Response.Write( htmlTail ); Response.End(); } Response.Write( htmlHead ); /* var okRead = true; var xmlhttp = new ActiveXObject ("Microsoft.XMLHTTP"); var url = "http://news.google.com/nwshp?gl=&ned=us&topic=t&q=&ie=UTF-8&filter=0"; xmlhttp.open("GET", url, false); xmlhttp.setRequestHeader("Content-Type", "text/xml; charset=UTF-8"); xmlhttp.send(); if (xmlhttp.status != 200) { okRead = false; errorString = "The requested URL ("+ url +") was not found." } if (okRead == true) { var retval = xmlhttp.responseText; var ind1 = retval.search( /
/gi ); var retval1 = retval.substr(ind1, 1000000); var ind2 = retval1.search( /<\/div>/gi ); var htmlText = retval1.substr( 5, ind2 - 5 ); Response.Write( htmlText.replace(/width=75%/gi,"width=100%") ); Response.Write( htmlTail ); } */ try { var myexec = Server.CreateObject("ASPExec.Execute"); myexec.Application = 'w:\\geabios\\bin\\fetch_http.exe'; myexec.Parameters = '"http://news.google.com/nwshp?gl=&ned=us&topic=t&q=&ie=UTF-8&filter=0"'; myexec.ShowWindow = false; var retval = myexec.ExecuteDosApp(); var ind1 = retval.search( /
/gi ); var retval1 = retval.substr(ind1, 1000000); var ind2 = retval1.search( /<\/div>/gi ); var htmlText = retval1.substr( 20, ind2 - 20 ); Response.Write( htmlText.replace(/width=75%/gi,"width=100%") ); Response.Write( htmlTail ); } catch( e ) { Response.Write( "Server can\'t create pipeline object" ); Response.Write( htmlTail ); } Response.End(); %>