<%
'sobar.soso.com 要转化的
a=Request("a")
w=Trim(Request("w"))
Select Case a
	Case "sobar.soso.com"
		Response.write "<script>window.location='http://sobar.soso.com/"&w&"?="&w&"'</script>"
	Case "wenwen.soso.com"
		Response.write "<script>window.location='http://wenwen.soso.com/z/Search.e?sp=S'+encodeURIComponent('"&w&"')</script>"
	Case "music.google.cn"
		Response.write "<script>window.location='http://www.google.cn/music/search?q='+encodeURIComponent('"&w&"')</script>"
	Case "soku.com"
		Response.write "<script>window.location='http://www.soku.com/search_video/q_'+encodeURIComponent('"&w&"')</script>"	
	Case "so.tudou.com"
		Response.write "<script>window.location='http://so.tudou.com/isearch/'+encodeURIComponent('"&w&"')+'/'</script>"
	Case "so.hudong.com"
		Response.write "<script>window.location='http://so.hudong.com/s/doc/'+encodeURIComponent('"&w&"')</script>"	
	Case "www.dangdang.com"
		if len(w)<2 Then
			Response.Write "搜索词太短"
			Response.End()
		End IF
		Response.write "<script>window.location='http://union.dangdang.com/transfer.php?from="&Request("from")&"&ad_type=10&sys_id=1&backurl=http://search.dangdang.com/search.php?key="&w&"'</script>"						
End Select
%>