Hack Forums
[.NET] VB.Net Teaching Service [Free] [Limited] - Printable Version

+- Hack Forums (https://hackforums.net)
+-- Forum: Tech (https://hackforums.net/forumdisplay.php?fid=444)
+--- Forum: Coding (https://hackforums.net/forumdisplay.php?fid=151)
+---- Forum: Software Development (https://hackforums.net/forumdisplay.php?fid=118)
+---- Thread: [.NET] VB.Net Teaching Service [Free] [Limited] (/showthread.php?tid=1778913)

Pages: Pages 1 2 3 4

VB.Net Teaching Service [Free] [Limited] - ΔDemon - Oct 1, 2011

I will be teaching/helping/answering questions over MSN. This service IS exclusive and I have the right to terminate it at any time.

Quick list of people I won't help:
  • Ungrateful People

  • People who do nothing for themselves.

  • Ignorant people.

  • People who ask about EVERYTHING.

  • Someone who refuses to use Google.

  • Wastes My Time



The list may be further updated, that being read, feel free to apply and depending on the people I'll take a certain amount.

DO NOT PM ME TILL I HAVE SAID YES.

Apply on thread, no specific format, but if you type it like a dumbass your chances decrease. =P

* - Redeemz - Oct 1, 2011

Hehe I know a lot about coding in vb.net and have read two books but i'm interested in your classes to further my knowledge on sed topic.

* - Penthos - Oct 1, 2011

Just wanted to say, that's a nice service to extend to HF, Good luck with the Teaching :P

Kind regards,

Trinity

* - Dr. A. NonyMouse - Oct 1, 2011

I have recently become interested in coding so i would love it if you would teach me.
Thank you for considering my application.

* - Zethit - Oct 1, 2011

Hi, i need a teacher to learn vb.net, im a fast learner and i really want to learn this. Im 18 years old so im not a kids without any kindness.

* - ΔDemon - Oct 2, 2011

Alright, you guys can PM me (Trinity already did.) You're all accepted. ^.^ You're not all in the same class though, one conversation per person. Individual needs, right? =P

* - Dєαtђ - Oct 2, 2011

Can i have a teach to use proxy with post method ?

i mean i want to use proxy in my youtube bot .
use proxy with httpwebrequest not webbrowsers

* - ΔDemon - Oct 2, 2011

Google teaches questions better then I do.

http://prntscr.com/3aljz which will lead you to http://msdn.microsoft.com/en-us/library/system.net.httpwebrequest.proxy.aspx which will give you the full source of:

Code
' Create a new request to the mentioned URL.                
    Dim myWebRequest As HttpWebRequest = CType(WebRequest.Create("http://www.microsoft.com"), HttpWebRequest)

              ' Obtain the 'Proxy' of the  Default browser.  
              Dim proxy as IWebProxy = CType(myWebRequest.Proxy, IWebProxy)
              ' Print the Proxy Url to the console.
    If Not proxy Is Nothing Then
    Console.WriteLine("Proxy: {0}", proxy.GetProxy(myWebRequest.RequestUri))
    Else
    Console.WriteLine("Proxy is null; no proxy will be used")
    End If

    Dim myProxy As New WebProxy()

    Console.WriteLine(ControlChars.Cr + "Please enter the new Proxy Address that is to be set ")
    Console.WriteLine("(Example:http://myproxy.example.com:port)")
    Dim proxyAddress As String
    Try
    proxyAddress = Console.ReadLine()
    If proxyAddress.Length = 0 Then
    myWebRequest.Proxy = myProxy
    Else
    Console.WriteLine(ControlChars.Cr + "Please enter the Credentials (may not be needed)")
    Console.WriteLine("Username:")
    Dim username As String
    username = Console.ReadLine()
    Console.WriteLine(ControlChars.Cr + "Password:")
    Dim password As String
    password = Console.ReadLine()
    ' Create a new Uri object.
    Dim newUri As New Uri(proxyAddress)
    ' Associate the newUri object to 'myProxy' object so that new myProxy settings can be set.
    myProxy.Address = newUri
    ' Create a NetworkCredential object and associate it with the Proxy property of request object.
    myProxy.Credentials = New NetworkCredential(username, password)
    myWebRequest.Proxy = myProxy
    End If
    Console.WriteLine(ControlChars.Cr + "The Address of the  new Proxy settings are {0}", myProxy.Address)
    Dim myWebResponse As HttpWebResponse = CType(myWebRequest.GetResponse(), HttpWebResponse)

I suggest you read the page. ^.^

* - Dєαtђ - Oct 2, 2011

i had seen it yet mate . But it will lock here
proxy.GetProxy(myWebRequest.RequestUri))
I mean show error

* - ΔDemon - Oct 2, 2011

What error does it show? It could just be the proxy's fault. Have you tested the proxy?

* - Support. - Oct 2, 2011

Hey, I've been learning VB for about 2 weeks now and seriously want to improve. I'm not here to "code a RAT/Crypter." I want to learn so when my baby girl is old enough for school I can get qualified quickly and get a carear. I've NEVER C+P, I retype everything and try and understand everyline. Thanks for your time.

* - Dєαtђ - Oct 2, 2011

(Oct 2, 2011 01:18 AM)ΔDemon Wrote:  What error does it show? It could just be the proxy's fault. Have you tested the proxy?

Look the project then you will understand
http://up.ht/q2IJxw
If you can fix it .fix it in the project and give here 🙂

* - ΔDemon - Oct 2, 2011

I already did it without an error.

Code
Imports System.Net

Module Module1

    Sub Main()

  ' Create a new request to the mentioned URL.                
  Dim myWebRequest As HttpWebRequest = CType(WebRequest.Create("http://www.microsoft.com"), HttpWebRequest)

  ' Obtain the 'Proxy' of the  Default browser.  
  Dim proxy As IWebProxy = CType(myWebRequest.Proxy, IWebProxy)
  ' Print the Proxy Url to the console.
  If Not proxy Is Nothing Then
    Console.WriteLine("Proxy: {0}", proxy.GetProxy(myWebRequest.RequestUri))
  Else
    Console.WriteLine("Proxy is null; no proxy will be used")
  End If

  Dim myProxy As New WebProxy()

  Console.WriteLine(ControlChars.Cr + "Please enter the new Proxy Address that is to be set ")
  Console.WriteLine("(Example:http://myproxy.example.com:port)")
  Dim proxyAddress As String
  Try
    proxyAddress = Console.ReadLine()
    If proxyAddress.Length = 0 Then
    myWebRequest.Proxy = myProxy
    ' Create a new Uri object.
    Dim newUri As New Uri(proxyAddress)
    ' Associate the newUri object to 'myProxy' object so that new myProxy settings can be set.
    myProxy.Address = newUri
    ' Create a NetworkCredential object and associate it with the Proxy property of request object.
    myWebRequest.Proxy = myProxy
    End If

    Dim myWebResponse As HttpWebResponse = CType(myWebRequest.GetResponse(), HttpWebResponse)

    Console.ReadLine()

  Catch Ex As Exception

    MsgBox(Ex.ToString)

  End Try

    End Sub

End Module

I edited the code a bit, but it could just be your proxy or the way you put it in. http://hidemyass.com/proxy-list/ There's a list.

And Kommon, I'd be happy to help, you can PM me for my private MSN.

* - Dєαtђ - Oct 2, 2011

what error did you fixed ? I am not talking about that - error had in source .
I am saying when i hit "use proxy button" at that time it will lock there /
show me this msg
Code
MsgBox(Ex.ToString)

You have teamviewer ?

Code
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
  ' Create a new request to the mentioned URL.    
  Dim myWebRequest As HttpWebRequest = CType(WebRequest.Create("http://www.microsoft.com"), HttpWebRequest)

  ' Obtain the 'Proxy' of the  Default browser.  
  Dim proxy As IWebProxy = CType(myWebRequest.Proxy, IWebProxy)
  ' Print the Proxy Url to the console.
  If Not proxy Is Nothing Then
    Console.WriteLine("Proxy: {0}", proxy.GetProxy(myWebRequest.RequestUri))
  Else
    Console.WriteLine("Proxy is null; no proxy will be used")
  End If

  Dim myProxy As New WebProxy()

  Console.WriteLine(ControlChars.Cr + "Please enter the new Proxy Address that is to be set ")
  Console.WriteLine("218.190.251.177:8909")
  Dim proxyAddress As String
  Try
    proxyAddress = Console.ReadLine()
    If proxyAddress.Length = 0 Then
    myWebRequest.Proxy = myProxy
    ' Create a new Uri object.
    Dim newUri As New Uri(proxyAddress)
    ' Associate the newUri object to 'myProxy' object so that new myProxy settings can be set.
    myProxy.Address = newUri
    ' Create a NetworkCredential object and associate it with the Proxy property of request object.
    myWebRequest.Proxy = myProxy
    End If

    Dim myWebResponse As HttpWebResponse = CType(myWebRequest.GetResponse(), HttpWebResponse)

    Console.ReadLine()

  Catch Ex As Exception

    MsgBox(Ex.ToString)

  End Try

    End Sub


* - ΔDemon - Oct 2, 2011

I do, but I hate Team Viewer. xD What I'm saying is the code I gave you works without an error, so just adapt it to what you need.