Re: Error trying to draw on form - Visual Basic Discussion Boards

Re: Using SMTP, the email is sent only when the Form is closed

paulogomes26-Mar-09 9:14

26-Mar-09 9:14

Hi Luc,
Yes, you are right. But the point is not the command console.readline() but the fact that if I remove it the email is not sent.

In MSDN I found that if you use the synchronous Send method your code does not goes until the request is completed. This is why I'm using SendAsync that is asynchronous and it should not wait and send the email, not matter what the code does after.

I put the console.readline() only to be able to see the messages, I never tought that if I remove it the email is never sent.

Must be a reason for that...

Thanks for you reply. I'm still trying to find a way to send SMTP emails without having to finish the thread.

Thanks,

Paulo

Re: Using SMTP, the email is sent only when the Form is closed

Henry Minute26-Mar-09 9:12

Henry Minute

26-Mar-09 9:12

See what happens if you follow Lucs' suggestion.
I'll watch the thread, in case you come back.

Henry Minute

Do not read medical books! You could die of a misprint. - Mark Twain
Girl: (staring) "Why do you need an icy cucumber?"
“I want to report a fraud. The government is lying to us all.”

Re: Using SMTP, the email is sent only when the Form is closed

Luc Pattyn26-Mar-09 9:50

Luc Pattyn

26-Mar-09 9:50

Hi Paulo,

I have a C# program that, amongst a lot of other stuff, contains mail code, basically identical to yours (the synchronous version, that is):

MailMessage msg=new MailMessage();
... // set msg.properties
SmtpClient client = new SmtpClient(server);
client.Send(msg);

The only difference is my client is constructed with the server's name as a parameter.
My program successfully sends three mails without exiting at all.
My best guess is your observation somehow is wrong.

Smile | :)

Luc Pattyn [Forum Guidelines] [My Articles]

- before you ask a question here, search CodeProject, then Google
- the quality and detail of your question reflects on the effectiveness of the help you are likely to get
- use the code block button (PRE tags) to preserve formatting when showing multi-line code snippets

modified on Thursday, March 26, 2009 4:23 PM

Re: Using SMTP, the email is sent only when the Form is closed

paulogomes26-Mar-09 10:49

paulogomes

26-Mar-09 10:49

Hi Luc/Henry,
I tried to build the SMTP client as Luc suggested but did not work either.

However, I found what the problem was: follow me.

when I started this project I did not know if I'll be using MAPI or SMTP, so I wrote 2 methods. Testing the MAPI time ago (with MAPI we use here Exchange Server), when the email is sent ExchangeServer pops a dialog box telling me that a program (my application) "is trying to send an email on your behalf" and give me an OK and CANCEL buttons. Once I hit OK, the email is sent.

That is the key: I'm testing the code using my own equipment, sending emails to me to see if it works or not. Did you see what happened?

SMTP does not have all Exchange Server features and does not issue a dialog asking for authorization, but it keeps waiting because I'm sending emails from my equipment to myself, but the user is not me, is my application, using my credencials!

As a proof of concept for this theory, I installed the application in another computer in the network and it worked fine, no more need to close the sending thread!

Nothing is wrong with those VB and C# codes, just the way I'm testing.

So, Luc/Henry, I really appreciate your effords and time spent to help me and it was a good felling having someone in the other side to discuss with my tech problems.

Thank you!

Paulo

Re: Using SMTP, the email is sent only when the Form is closed

Luc Pattyn26-Mar-09 10:59

Luc Pattyn

26-Mar-09 10:59

Hi Paulo,

glad you got it working.

However I'm not familiar with Exchange Server, and I do not quite follow your reasoning.

Are you saying:
1. Exchange Server does not want to accept your app sending something until the app exits?
2. Exchange Server does not deliver the newly received message as long as the app is running, because the app is impersonating you and "you" (the app) are not asking for incoming mail until the app exits and your regular mail client becomes active again?

Furthermore: would your app succeed in sending without exiting, if you did close your mail client beforehand?

Smile | :)

Luc Pattyn [Forum Guidelines] [My Articles]

Re: Using SMTP, the email is sent only when the Form is closed

paulogomes26-Mar-09 11:38

paulogomes

26-Mar-09 11:38

Hi Luc,

About exchange server, it asks for authorization because the app (that is not me) is using my credencials to send email. This also happens when you get a virus kind Trojan and it tries to send emails from your equipment (it did happened before with me). The antivirus also catch this kind too.

I noticed that because the confirmation dialog box exchange server issued. But now I'm not using exchange server and MAPI, I'm using our SMTP server and it does not issue a dialog. If I issue 3 or 4 emails all go to the SMTP queue and all are sent only when the task is closed.

But if I use other equipment than mine, it works fine.

I tried to close the mail session bforehand, but it did not work either.

Anyways, it is something to keep in mind for our future development needs.

Thanks Luc.

Anytime.

Paulo

Error trying to draw on form

o m n i25-Mar-09 16:11

o m n i

25-Mar-09 16:11

Ok I'm trying to make a simple inkball type game.
But, I'm getting some wierd errors. Here is my code.

Public Class Form1
    Public ink() As Point
    Public g As Graphics = Me.CreateGraphics

    Private Sub Panel1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Panel1.MouseDown
        If e.Button = Windows.Forms.MouseButtons.Left Then
            Dim p = ink.Length
            ink(p).X = e.X
            ink(p).Y = e.Y
        End If
    End Sub

    Private Sub Panel1_Paint(ByVal sender As System.Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles Panel1.Paint
        For Each p As Point In ink
            g.DrawRectangle(Pens.Black, New Rectangle(p.X, p.Y, 1, 1))
        Next
    End Sub
End Class

I've tried changing g to be Panel1.creategraphics, since the panel is what it would be drawing on but that causes even more problems. The errors I am getting are all 'Object Reference Not set to an instance of an object."

Have you tried the Krypton Toolkit? http://www.componentfactory.com/free-windows-forms-controls.php

Re: Error trying to draw on form

Bharat Jain25-Mar-09 19:07

Bharat Jain

25-Mar-09 19:07

I really don't understand what you are trying to do , but the error you are getting is because you have not initialized the array ink() , it is still Nothing and hence are getting the error , was not able to understand the logic you are trying to apply , looking at the code it don't think it is going draw anything Frown | :(

. The only thing i can suggest is initialized the array before using it.

-Regards
Bharat Jain
bharat.jain.nagpur@gmail.com

Re: Error trying to draw on form

Dave Kreskowiak26-Mar-09 4:31

Dave Kreskowiak

26-Mar-09 4:31

The graphics object you created is one for the form, not the panel. You get the graphics object for the panel from the Panel1 Paint event, like this:

Private Sub Panel1_Paint(ByVal sender as System.Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles Panel1.Paint
    Dim g As Graphics = e.Graphics
 
    For Each p As Point In Ink
        g.Draw....
    Next
End Sub

But, of course, you'll have to modify the paint code to check to see if there are any points at all in the Ink array.

A guide to posting questions on CodeProject[^]

Dave Kreskowiak
Microsoft MVP
Visual Developer - Visual Basic
2006, 2007, 2008

save array [modified]

moonshaddow25-Mar-09 15:44

moonshaddow

25-Mar-09 15:44

i am just wondering if anyone know(or have links) of a way to save a array inside the application code?

If at first you don't succeed
redefine success

J.Hardy

modified on Wednesday, March 25, 2009 9:52 PM

Re: save array

o m n i25-Mar-09 16:19

o m n i

25-Mar-09 16:19

Dim p(3) As Point 'create an array of 4 points (1-3 and 0)
        p(0) = New Point(640, 480) 'assign values to the points
        p(1) = New Point(800, 600)
        p(2) = New Point(1280, 748)
        p(3) = New Point(769, 999)
        Dim r As New String("") 'create a blank string
        For Each ipoint As Point In p 'loop through the points
            r &= "Point is located at: " & ipoint.ToString & vbNewLine 'write a string about the point
        Next
        MessageBox.Show(r) 'display the string with the info

Hope it helps! Smile | :)

Have you tried the Krypton Toolkit? http://www.componentfactory.com/free-windows-forms-controls.php

Re: save array

moonshaddow25-Mar-09 16:40

moonshaddow

25-Mar-09 16:40

sorry allow me to explain better, when i publish my application to a exe i need to store a array inside the exe(this will make the application grow in size), so next time when i open it the contents of the array will be there

If at first you don't succeed
Redefine success

J.Hardy

Re: save array

Ashfield25-Mar-09 22:47

Ashfield

25-Mar-09 22:47

You don't save data in your exe, you save it in an external file (for example app.config or as user settings) and load it in - unless you are talking about an hardcoded set of values, in which case the code to populate the array will be in the exe anyway.

Bob
Ashfield Consultants Ltd
Proud to be a 2009 Code Project MVP

Re: save array

moonshaddow26-Mar-09 12:48

moonshaddow

26-Mar-09 12:48

dam, oh well, thanks anyway

If at first you don't succeed
Redefine success

J.Hardy

I have a final working project in Visual basic 2008.

katie2325-Mar-09 12:34

katie23

25-Mar-09 12:34

How can i make the file executable by someone else with out the need of downloading a visual basic program onto their computer?

Re: I have a final working project in Visual basic 2008.

Henry Minute25-Mar-09 13:13

Henry Minute

25-Mar-09 13:13

Search for click-once deployment.

Re: I have a final working project in Visual basic 2008.

tech60325-Mar-09 20:00

tech603

25-Mar-09 20:00

This link will show you how to switch to a from debug to release in Visual Studio, once you build the project you will notice that in the project folder there is a bin folder that should contain a debug folder and release folder. Inside these folders are the executable you need for distributing. You can zip up your files or use on click installers to package your project.

This link is for vs 2005:

http://msdn.microsoft.com/en-us/library/wx0123s5(VS.80).aspx[^]

if the above doesn't help try this link:

http://social.msdn.microsoft.com/Forums/en-US/winforms/thread/865ea184-70a5-4905-8dd7-089fd9714209/[^]

hope this helps

Matthew Vass
QA Analyst
mvass@hostmysite.com
HostMySite.com

Re: I have a final working project in Visual basic 2008.

katie2325-Mar-09 21:33

katie23

25-Mar-09 21:33

thanks for your help.

Easy Q:How to find the longest name(user input) in an array?

Haroon Ghazni25-Mar-09 11:31

Haroon Ghazni

25-Mar-09 11:31

Hey got a question about visual basic. Got a project for college to write a small code for a button to search an array called 'Members(0)'. The programme basically gets the user to input data via a input box (name, age only) and this button needs to find the LONGEST name in the array. And display it in the text box called 'txtResult.text'

Here's the code I have so far;

Private Sub btnLongName_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnLongName.Click
Dim LongName As String
Dim LengthOfLongestName As Integer
LongName = Members(0).Name
LengthOfLongestName = Len(Members(0).Name)
End Sub
End Class

Re: Easy Q:How to find the longest name(user input) in an array?

Henry Minute25-Mar-09 11:55

Henry Minute

25-Mar-09 11:55

There are two things I would like to point out:

The first, is that nowhere in your code, do you examine all of the elements of Members(0). You only examine one element.
In order to resolve this problem you need to learn how to iterate through the elements of the array. To find out how to do that, why not search MSDN or google for the words in bold.

The second thing is fairly small:
Your code:

LongName = Members(0).Name
LengthOfLongestName = Len(Members(0).Name)

The first line gets the name from the array element. Accessing stuff in arrays is reasonably costly in terms of the processing required. So, in the second line, don't get the length by diving into the array again, use the name you have already fetched.

Modified code:

LongName = Members(0).Name
LengthOfLongestName = Len(LongName)

Good luck!

Re: Easy Q:How to find the longest name(user input) in an array? [modified]

Haroon Ghazni25-Mar-09 12:32

Haroon Ghazni

25-Mar-09 12:32

Thanks for the info but the meat of the matter is on actually how to search for the longest name in that array which i'm struggling with big time >< Sorry to be so general, I'm fairly new to VB Frown | :(

I've edited it a bit more;

    Private Sub btnLongName_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnLongName.Click
        Dim LongName As String
        Dim LengthOfLongestName As Integer
        LongName = Members(0).Name
        LengthOfLongestName = Len(LongName)
        If LongName Then
        End If
        txtResult.Text = "The longest name is " & LongName & " ."
    End Sub
End Class

modified on Wednesday, March 25, 2009 6:43 PM

Re: Easy Q:How to find the longest name(user input) in an array?

Henry Minute25-Mar-09 13:11

Henry Minute

25-Mar-09 13:11

OK.
Some more clues.

Since you are interested in the longest name, look at the first element (your code already does that) and set the LengthOfLongestName variable to its length (your code already does that), and set the LongName variable to the name of the first element (your code already does that). So you've made a good start.

Then look at the length of the next element and if, but only if it is greater than LengthOfLongestName, set LengthOfLongestName to this length and set LongName to the Name of this element.
Then do the same for the next element, and so on, until you have examined all of the elements.
When you have done this, LengthOfLongestName will hold the length of the longest name and LongName will hold the longest name itself.

That's it.
Iterating over an array is such a basic operation that there are thousands and thousands of examples in MSDN and elsewhere.
I'm not going to write it for you. Do some research find an example and try to code it yourself. To start with it doesn't have to do the longest name thing. Try just getting it to list the elements, then when you are sure you understand what's happening, do the longest name bit.

Once you have done some coding and got at least part of it working, come back if you get stuck.

Re: Easy Q:How to find the longest name(user input) in an array?

Luc Pattyn25-Mar-09 14:03

Luc Pattyn

25-Mar-09 14:03

Henry Minute wrote:
Once you ... got at least part of it working, come back if you get stuck.

This begs for an article entitled "How to get unstuck at the very start?" Big Grin | :-D

Luc Pattyn [Forum Guidelines] [My Articles]

Re: Easy Q:How to find the longest name(user input) in an array?

Henry Minute25-Mar-09 14:14

Henry Minute

25-Mar-09 14:14

Picky, picky, picky. Laugh | :laugh:

Re: Easy Q:How to find the longest name(user input) in an array?

JernejR26-Mar-09 1:43

JernejR

26-Mar-09 1:43

Private Sub subLongest()
      Dim arr(100) As String

      arr(0) = "aa"
      arr(1) = "bbb"
      arr(2) = "cc"
      arr(3) = "ddddd"
      arr(4) = "aa"
      arr(5) = "bbb"
      arr(6) = "cc"


      Dim maxLenIndex As Int16 = 0
      Dim maxLen As Int16 = arr(0).Length
      For ii As Int16 = 1 To 100
          If arr(ii) IsNot Nothing Then
              If arr(ii).Length > maxLen Then
                  maxLen = arr(ii).Length
                  maxLenIndex = ii
              End If
          End If
      Next
      MsgBox("Longest element is " & arr(maxLenIndex))
  End Sub

Use Ctrl+Left/Right to switch messages, Ctrl+Up/Down to switch threads, Ctrl+Shift+Left/Right to switch pages.