Praca w domu - Dodatkowa Praca - Zarabianie przez Internet. Dołącz do Największego w Polsce forum o tematyce Zarabiania przez Internet. Praca w domu stała się bardzo popularna.

bios · 07-02-2013 20:56

Nowy i stary blog. Zaindeksowało mi tylko stare tagi i kategorie Xpokerface

darkmatthew · 07-02-2013 20:56

Może ktoś ten kod mi wysłać?
http://tny.cz/cd5567c1
Bo mi strona nie działa ;(

bios · 07-02-2013 20:58

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

surfer0700 · 07-02-2013 20:59

(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

U mnie pierwsze w google też są tylko kategorie i taki, ale przeskoczyłem na ostatnią stronę i widzę że wpisy też są Wink

Redwids · 07-02-2013 20:59

A jednak coś na SB jeszcze dzisiaj wpadło Smile

2013-02-07 Sweden $ 0.36 http://sharebay.net/

bios · 07-02-2013 21:02

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?

darkmatthew · 07-02-2013 21:03

(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

rozekrr · 07-02-2013 21:03

Mi Google ładnie indexuje podstrony z ponad 80 w kilka dni wzrosło do 258 Big Grin

MartinS · 07-02-2013 21:05

bios, wrzuciłeś mapę strony?

surfer0700 · 07-02-2013 21:06

(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

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

Tryb drzewa \| Tryb normalny Ogólna dyskusja o PPA
Autor	Wiadomość