<% 
If InStr(Request.ServerVariables("HTTP_USER_AGENT"), "googlebot") Then
Response.Write "google bot sitede"
End if 
%>