|
Report Search Engine Spam
Report Spam - User’s give their utmost
belief on search Engines. But unfortunately not all search
engines have user’s best interests at heart. The spam results
being displayed by most of the search engines are a burning example
of this. Search engine spam is a crime and to fight against it and
to bring back search engines on the right track we need your support.
As a webmaster or a general user if you feel that you have been
a victim of search engine spam, please let us know by using this
form. We will thoroughly investigate your report and take appropriate
action to uncover such deceptive practices.
Don't Know What is Spam? Click
Here »
<%
if request.QueryString("action")="posted" Then
%>
Your Comment has been posted
<%end if%>
View Spam Reports by others:
| Posted on |
Posted by |
Keyword |
Search Engine |
Total Views |
<%
Dim pp,ii
pp=8
if Trim(Request.QueryString("pp"))<>"" Then
pp=Request.QueryString("pp")
End if
Dim intPageSize
Dim intCurrentPage
Dim intTotalPages,intI
intPageSize=pp
%>
<%
if Request.ServerVariables("CONTENT_LENGTH") = 0 Then
intCurrentPage=1
Else
intCurrentPage=(Request.Form("CurrentPage"))
Select Case Request.form("submit")
Case "« Previous"
intCurrentPage = intCurrentPage - 1
Case "Next »"
intCurrentPage = intCurrentPage + 1
End Select
End if
Set objRS=Server.CreateObject("ADODB.Recordset")
objRS.CursorLocation=adUseClient
objRS.CursorType=adOpenStatic
objRS.CacheSize=intPageSize
strQ="select * from report_spam order by id_num desc"
objRS.Open strQ,objConn,,,adCmdText
objRS.PageSize=intPageSize
If Not(objRS.EOF)Then objRS.AbsolutePage=intCurrentPage
intTotalPages=objRS.PageCount
%>
<%
For intI = 1 To objRS.PageSize
%>
| <%=objRS("sdate")%> |
<%=objRS("pname")%> |
"><%=objRS("keyword")%> |
<%=objRS("se")%> |
<%=objRS("total_view")%> |
<% objRS.MoveNext()
if objRS.EOF Then Exit For
Next
objRS.Close :
Set objRS=Nothing :
%>
|