
Results 1 to 9 of 9
Thread: Visual Basic 2008 Codes
Threaded View
-
24-08-08, 10:29 AM #1
- Rep Power
- 17
- Reputation
- 20
Visual Basic 2008 Codes
Hello. At here i will learn you some Visual Basic / post some codes
What this could be used for : You can use it for ex. making a program for sending from GMail isted of opening your browser.
Note: Edit every thing in RED
Use this imports :
Code:Imports System.Web Imports System.IO Imports System.Net.Mail
Code:Dim mail As New MailMessage() Dim SmtpServer As New SmtpClient SmtpServer.Credentials = New Net.NetworkCredential("username", "password") SmtpServer.Port = 587 SmtpServer.Host = "smtp.gmail.com" SmtpServer.EnableSsl = True mail.To.Add("[email protected]") mail.From = New MailAddress("username@gmail.com") mail.Subject = "My E-Mail from my Visual Basic Program" mail.Body = " Hello. Do you think this is nice? and btw. EmiloZ helped me to make it :D" SmtpServer.Send(mail)
What this could be used for : You can use it for chaning your realmlist by just pressing on a button.
Note: Edit every thing in RED
Code :
Code:Dim FileName As String FileName = "C:\Program Files\World of Warcraft\realmlist.wtf" Dim sw As IO.TextWriter sw = IO.File.CreateText("C:\Program Files\World of Warcraft\realmlist.wtf") sw.WriteLine("set realmlist logon.mmoprowow.net") sw.WriteLine("set patchlist logon.mmoprowow.net") sw.Flush() sw.Close()
Code:Dim FileName As String FileName = "C:\Program Files\World of Warcraft\realmlist.wtf" Dim sw As IO.TextWriter sw = IO.File.CreateText("C:\Program Files\World of Warcraft\realmlist.wtf") sw.WriteLine("set realmlist us.logon.worldofwarcraft.com") sw.WriteLine("set patchlist us.version.worldofwarcraft.com") sw.Flush() sw.Close()
Code:Dim FileName As String FileName = "C:\Program Files\World of Warcraft\realmlist.wtf" Dim sw As IO.TextWriter sw = IO.File.CreateText("C:\Program Files\World of Warcraft\realmlist.wtf") sw.WriteLine("set realmlist eu.logon.worldofwarcraft.com") sw.WriteLine("set patchlist eu.version.worldofwarcraft.com") sw.Flush() sw.Close()
Edit everything in RED
Code:System.Diagnostics.Process.Start("filepath")
More to come
- EmiloZ