$("#ray_7085").html("\n
1<\/a>
2<\/a>
3<\/a>
4<\/a>
5<\/a>
6<\/a>
7<\/a>
8<\/a>
9<\/a>
10<\/a><\/strong>
11<\/a>
12<\/a>
13<\/a>
14<\/a>
15<\/a>
16<\/a>
17<\/a>
18<\/a><\/pre><\/td>\n  
        <\/span>Function<\/span> <\/span>redirectcheck<\/span>(<\/span>xurl<\/span>,<\/span> <\/span>ourl<\/span>)<\/span>
<\/span>          <\/span>\'<\/span>check the xurl end if exists, response.redirect with 301<\/span><\/span>
<\/span>          <\/span>set<\/span> <\/span>Geturl<\/span> <\/span>=<\/span> <\/span>Server<\/span>.<\/span>CreateObject<\/span>(<\/span>"<\/span>ADODB.Recordset<\/span>"<\/span><\/span>)<\/span>
<\/span>          <\/span>Geturl<\/span>.<\/span>ActiveConnection<\/span> <\/span>=<\/span> <\/span>MM_connection_STRING<\/span>
<\/span>          <\/span>query<\/span> <\/span>=<\/span> <\/span>"<\/span>SELECT ID_UrlLookup, strExternalUrl, strInternalUrl FROM tblUrlLookup WHERE strExternalUrl = \'<\/span>"<\/span><\/span>&<\/span>xurl<\/span>&<\/span>"<\/span>\' OR strExternalUrl = \'<\/span>"<\/span><\/span>&<\/span>ourl<\/span>&<\/span>"<\/span>\'<\/span>"<\/span><\/span>
<\/span>          <\/span>Geturl<\/span>.<\/span>Source<\/span> <\/span>=<\/span> <\/span>query<\/span>
<\/span>          <\/span>Geturl<\/span>.<\/span>open<\/span>(<\/span>)<\/span>
<\/span>          <\/span>
<\/span>            <\/span>if<\/span> <\/span>Geturl<\/span>.<\/span>EOF<\/span> <\/span>then<\/span>
<\/span>            <\/span>\'<\/span>do nothing<\/span><\/span>
<\/span>            <\/span>else<\/span>
<\/span>            <\/span>\'<\/span> response.redirect<\/span><\/span>
<\/span>            <\/span>Response<\/span>.<\/span>Status<\/span>=<\/span>"<\/span>301 Moved Permanently<\/span>"<\/span><\/span> <\/span>
<\/span>            <\/span>Response<\/span>.<\/span>AddHeader<\/span> <\/span>"<\/span>Location<\/span>"<\/span><\/span>,<\/span> <\/span>lcase<\/span>(<\/span>Geturl<\/span>(<\/span>"<\/span>strInternalUrl<\/span>"<\/span><\/span>)<\/span>)<\/span>
<\/span>            <\/span>\'<\/span>done? <\/span><\/span>
<\/span>            <\/span>end<\/span> <\/span>if<\/span>
<\/span>          <\/span>
<\/span>        <\/span>End<\/span> <\/span>Function<\/span><\/pre><\/td>\n<\/tr><\/table>\n\n");