Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- supreme quick purchase tool v1.0.0
- Public Class Form1
- Private Sub WebBrowser1_DocumentCompleted(sender As Object, e As WebBrowserDocumentCompletedEventArgs)
- End Sub
- Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
- WebBrowser1.Document.GetElementById("order_billing_name").SetAttribute("value", "Jacob Beacom")
- WebBrowser1.Document.GetElementById("order_email").SetAttribute("value", "jdbeacom@gmail.com")
- WebBrowser1.Document.GetElementById("bo").SetAttribute("value", "4856 Louisiana Ave N")
- WebBrowser1.Document.GetElementById("order_billing_zip").SetAttribute("value", "55428")
- WebBrowser1.Document.GetElementById("order_billing_city").SetAttribute("value", "Crystal")
- WebBrowser1.Document.GetElementById("order_tel").SetAttribute("value", "612-868-0374")
- WebBrowser1.Document.GetElementById("onb").SetAttribute("value", "34920492049234")
- WebBrowser1.Document.GetElementById("number_v").SetAttribute("value", "587")
- WebBrowser1.Document.GetElementById("commit").InvokeMember("Click")
- WebBrowser1.Document.GetElementById("order_billing_state").SetAttribute("value", "MN")
- WebBrowser1.Document.GetElementById("credit_card_month").SetAttribute("value", "08")
- WebBrowser1.Document.GetElementById("credit_card_year").SetAttribute("value", "2015")
- End Sub
- Private Sub Label1_Click(sender As Object, e As EventArgs) Handles Label1.Click
- End Sub
- End Class
- n das it
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement