vb.net中的垃圾邮件工具

时间:2013-08-11 12:36:42

标签: vb.net vb.net-2010

我是VB.NET的新手,我试图在vb.net中制作垃圾邮件墙(fb),这是我的代码,

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

         Process.Start("https://graph.facebook.com/" & (TextBox2.Text) & "/photos?url=" & (TextBox3.Text) & "&method=POST&message=" & (TextBox4.Text) & "a&access_token=" & (TextBox1.Text))

    End Sub
End Class

之后,我点击按钮1,然后在我的浏览器中看到新的网页。 所以,我想点击按钮1,我的浏览器中没有网页。

1 个答案:

答案 0 :(得分:0)

如果不想打开浏览器,那么就像这样使用webbrowser控件

Private webbrows As New WebBrowser

private sub form_load(snder......

dim _url as string = "your url that mostly wont work"

webbrows.Navigate(_url)

' if you use vb2010 then you have lambada expressions 

 AddHandler webbrows.DocumentCompleted, Sub(sd As Object, e4 As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs)

' a check that the page fully loaded                                                    
 If e4.Url.ToString <> _url Then Exit Sub

 sd.dispose()

  End Sub

end sub