Witaj gościu! Zaloguj się lub Zarejestruj aby móc korzystać ze wszystkich funkcjonalności jakie oferuje to forum! Rozpocznij zarabianie przez internet, poznaj korzysci pracy w domu! Rejestracja i korzystanie z forum jest całkowicie darmowe!
Polska społeczność o zarabianiu przez internet, pracy w domu i dodatkowej pracy online Zobacz dzisiejsze dyskusje →
Odpowiedz 
Ogólna dyskusja o PPA

Autor Wiadomość
Post: #361
RE: Ogólna dyskusja o PPA
Sprawdź:
Nowy i stary blog. Zaindeksowało mi tylko stare tagi i kategorie Xpokerface
Post: #362
RE: Ogólna dyskusja o PPA
Może ktoś ten kod mi wysłać?
http://tny.cz/cd5567c1
Bo mi strona nie działa ;(
Post: #363
RE: Ogólna dyskusja o PPA
Kod:
Public Class Form1

        Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick

            ProgressBar1.Increment(1)

            If ProgressBar1.Value = ProgressBar1.Maximum Then

                Timer1.Stop()

                Dim key As Integer

                key = (Rnd() * 9)

                Select Case key

                    Case 1

                        TextBox1.Text = "HK2H-KIW4-FL5L-SDJJ-LK6D"

                    Case 2

                        TextBox1.Text = "KD4G-FK35-DDSG-45Y5-GJ6D"

                    Case 3

                        TextBox1.Text = "ER78-4GFH-45H7-34Y7-3GG6"

                    Case 4

                        TextBox1.Text = "GFDG-5JJ9-YFH6-3SFU-45U7"

                    Case 5

                        TextBox1.Text = "ASFG-38F8-FGYU-DFY6-435Y"

                    Case 6

                        TextBox1.Text = "GYR6-SD46-FSJ4-HF6R-FH45"

                    Case 7

                        TextBox1.Text = "JFLS-S38F-FJDT-EKRI-DJ49"

                    Case 8

                        TextBox1.Text = "JK47-RJDU-FF6H-KDFU-FGKD"

                    Case 9

                        TextBox1.Text = "FJDK-57GJ-DKYU-DLGF-DKEU"

                End Select

                MsgBox("Done")

            End If

        End Sub

        Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

            Timer1.Start()

            ProgressBar1.Value = ProgressBar1.Minimum


        End Sub

    End Class
Post: #364
RE: Ogólna dyskusja o PPA
(07-02-2013 20:56)darkmatthew napisał(a):  Może ktoś ten kod mi wysłać?
http://tny.cz/cd5567c1
Bo mi strona nie działa ;(

Żeby odblokować stronę trzeba wykonać ofertę Tongue


(07-02-2013 20:56)bios napisał(a):  Nowy i stary blog. Zaindeksowało mi tylko stare tagi i kategorie Xpokerface

U mnie pierwsze w google też są tylko kategorie i taki, ale przeskoczyłem na ostatnią stronę i widzę że wpisy też są Wink
Post: #365
RE: Ogólna dyskusja o PPA
A jednak coś na SB jeszcze dzisiaj wpadło Smile
2013-02-07 Sweden $ 0.36 http://sharebay.net/
Post: #366
RE: Ogólna dyskusja o PPA
Może u Ciebie tak, u mnie nie ma.

Po wejściu w Narzędzia dla webmasterów coś takiego dostałem:

W ciągu ostatnich 24 godzin Googlebot napotkał błędy (2) podczas próby uzyskania dostępu do pliku robots.txt. Aby uniknąć zaindeksowania stron wymienionych w tym pliku, odłożyliśmy indeksowanie. Ogólny wskaźnik błędów pliku robots.txt w Twojej witrynie to 66.7%.

Gdzie w wp są ustawienia indeksowania?
Post: #367
RE: Ogólna dyskusja o PPA
(07-02-2013 20:58)bios napisał(a):  
Kod:
Public Class Form1

        Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick

            ProgressBar1.Increment(1)

            If ProgressBar1.Value = ProgressBar1.Maximum Then

                Timer1.Stop()

                Dim key As Integer

                key = (Rnd() * 9)

                Select Case key

                    Case 1

                        TextBox1.Text = "HK2H-KIW4-FL5L-SDJJ-LK6D"

                    Case 2

                        TextBox1.Text = "KD4G-FK35-DDSG-45Y5-GJ6D"

                    Case 3

                        TextBox1.Text = "ER78-4GFH-45H7-34Y7-3GG6"

                    Case 4

                        TextBox1.Text = "GFDG-5JJ9-YFH6-3SFU-45U7"

                    Case 5

                        TextBox1.Text = "ASFG-38F8-FGYU-DFY6-435Y"

                    Case 6

                        TextBox1.Text = "GYR6-SD46-FSJ4-HF6R-FH45"

                    Case 7

                        TextBox1.Text = "JFLS-S38F-FJDT-EKRI-DJ49"

                    Case 8

                        TextBox1.Text = "JK47-RJDU-FF6H-KDFU-FGKD"

                    Case 9

                        TextBox1.Text = "FJDK-57GJ-DKYU-DLGF-DKEU"

                End Select

                MsgBox("Done")

            End If

        End Sub

        Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

            Timer1.Start()

            ProgressBar1.Value = ProgressBar1.Minimum


        End Sub

    End Class

Dzięki <3
Post: #368
RE: Ogólna dyskusja o PPA
Mi Google ładnie indexuje podstrony z ponad 80 w kilka dni wzrosło do 258 Big Grin
Post: #369
RE: Ogólna dyskusja o PPA
bios, wrzuciłeś mapę strony?
Post: #370
RE: Ogólna dyskusja o PPA
(07-02-2013 21:02)bios napisał(a):  Może u Ciebie tak, u mnie nie ma.

Hacknąłeś to nie ma Tongue

(07-02-2013 21:02)bios napisał(a):  Po wejściu w Narzędzia dla webmasterów coś takiego dostałem:

W ciągu ostatnich 24 godzin Googlebot napotkał błędy (2) podczas próby uzyskania dostępu do pliku robots.txt. Aby uniknąć zaindeksowania stron wymienionych w tym pliku, odłożyliśmy indeksowanie. Ogólny wskaźnik błędów pliku robots.txt w Twojej witrynie to 66.7%.

Gdzie w wp są ustawienia indeksowania?

Spróbuj wejść na serwer i zmienić CHMOD'y pliku robots.txt
Odpowiedz 


Podobne wątki
Wątek: Autor Odpowiedzi: Wyświetleń: Ostatni post
  Drastyczny spadek odwiedzin, dyskusja Vister81 54 16,240 03-07-2013 13:22
Ostatni post: Vister81

Skocz do:


Użytkownicy przeglądający ten wątek: