Visual Basic Discussion Boards

JohnPayton22-Apr-12 19:21

22-Apr-12 19:21

Do you wish to create a menu on your form?

In the toolbox, in the menus & Toolbars section, drag and drop a MenuStrip onto your form then start filling in your various menu options.

Double clicking the finished menu will create a a Private Sub menu item click event where you place the code to call the various menu item request calls.

Hope this helps

dictionary as string

haneeno22-Apr-12 14:13

haneeno

22-Apr-12 14:13

hlep me

-how can write (dictionary as string code)in information retrieval code via vb.net?

and

-how can write (fixed width code) in information retrieval via vb.net?

and

-how can write (blocking code) in information retrieval via vb.net?

and
so much thank you

Re: dictionary as string

Eddy Vluggen23-Apr-12 0:12

Eddy Vluggen

23-Apr-12 0:12

haneeno wrote:
how can write (dictionary as string code)in information retrieval code via
vb.net?

Depends on the way that the dictionary is written to file/the structure of that file. Without any additional info, I'd say "deserialize".

haneeno wrote:
how can write (fixed width code) in information retrieval via vb.net?

By reading the file as text, and copying the content of that subpart of the string. See the System.IO namespace and the examples on MSDN.

haneeno wrote:
how can write (blocking code) in information retrieval via vb.net?

All code is blocking, if you want async code you'll need to define a thread.

Bastard Programmer from Hell Suspicious | :suss:

Start up Fade

kirubelye22-Apr-12 6:31

kirubelye

22-Apr-12 6:31

Can sombody help me make a startup window that fades in and out?

Re: Start up Fade

JohnPayton22-Apr-12 15:50

JohnPayton

22-Apr-12 15:50

I suppose there may be another way to achieve this, but ....

If the information to be displayed on the Startup Form is to remain static (ie not changing) may I suggest using an image transition effect to achieve your "Start Up Fade".

First create a graphic of your "startup page information" which will be displayed in a picturebox control.

Then I would add a new winform or splash to your project, set FormBorderStyle to None, add a PictureBox the size of the form that will load the page graphic (Startup Image) you created, then when the new form loads on application start, call the image transition effect, cycle through the fade in, small delay then fade out then close the window.

I believe the CodeProject has a project that demonstrates how to implement a simple trasition on images in vb.net which could be used to create the fade in fade out process.

http://www.codeproject.com/Articles/43605/Image-Transition-in-VB-NET-Windows-Forms

Hope this helps

Re: Start up Fade

Bernhard Hiller22-Apr-12 21:50

Bernhard Hiller

22-Apr-12 21:50

Look for "splash screen".
By the way, you should check whether your application is running in some kind of remote session (RDP, Citrix): in such a case, do not use fade-in fade-out effects as that will cause large network traffic.

Re: Start up Fade

Dave Kreskowiak23-Apr-12 6:50

Dave Kreskowiak

23-Apr-12 6:50

There's a reason why you don't see apps do this any more. Does it add value to your app??

Every time I see one of these gimicks I think, "Couldn't they have spent the time to make this on making their app work better??"

A guide to posting questions on CodeProject[^]

Dave Kreskowiak

how to display image from gridview on picturebox

romo2221-Apr-12 3:49

romo22

21-Apr-12 3:49

Hi guys

I'm not able to display image from tablegridview to picturebox visual basic 2010 studio.

I know how to reference text value from a cell on tablegridview to textbox I had been created .

this the Code how to do this :

TextBox2.Text = Table1DataGridView.Rows(0).Cells(3).Value.ToString

my question is how to do it with image if you have this image on Table1DataGridView

I tried this code for image but it doesn't work I got error

PictureBox1.image=Table1DataGridView.Rows(0).Cells(2).Value.Toimage

PictureBox1.image=Table1DataGridView.Rows(0).Cells(2).Value

both of these cod not work and I get error

please Help

I hope that some one can solve this complex problem and i will be great full for you .

mju10ht@gmail.com

Re: how to display image from gridview on picturebox

Eddy Vluggen21-Apr-12 4:16

Eddy Vluggen

21-Apr-12 4:16

Try something like this;

PictureBox1.image = CType(Table1DataGridView.Rows(0).Cells(2).Value, Bitmap)

Bastard Programmer from Hell Suspicious | :suss:

Re: how to display image from gridview on picturebox

romo2221-Apr-12 6:12

romo22

21-Apr-12 6:12

thank you for help, but I still get error

show me this :

Unable to cast object of type 'System.Byte[]' to type 'System.Drawing.Bitmap'.

I wonder if that code work to you, so that means the code will be correct and I did something wrong Confused | :confused:

please I need help

Re: how to display image from gridview on picturebox

Eddy Vluggen21-Apr-12 6:39

Eddy Vluggen

21-Apr-12 6:39

Dim bytes as Byte() = ' Your value from the grid goes here
Using ms as new MemoryStream(bytes)
  Dim img As Bitmap = CType(Image.FromStream(ms), Bitmap)
  PictureBox1.Image = img
End Using

Bastard Programmer from Hell Suspicious | :suss:

Re: how to display image from gridview on picturebox

romo2221-Apr-12 6:57

romo22

21-Apr-12 6:57

I don't why he put blue line under MemoryStream(bytes)

Dim bytes As Byte() = Table5DataGridView.Rows(0).Cells(3).Value
       Using ms As New MemoryStream(bytes)
           Dim img As Bitmap = CType(Image.FromStream(ms), Bitmap)
           PictureBox1.Image = img
       End Using

on error list show me MemoryStream(bytes)is not
defined

Frown | :(

Re: how to display image from gridview on picturebox

Eddy Vluggen21-Apr-12 7:03

Eddy Vluggen

21-Apr-12 7:03

Prefix it with the correct namespace, like this;

Using ms As New System.IO.MemoryStream(bytes)

..or Import the namespace Smile | :)

Bastard Programmer from Hell Suspicious | :suss:

Re: how to display image from gridview on picturebox

romo2221-Apr-12 7:11

romo22

21-Apr-12 7:11

finally yes it's work how can I say thank you for your help .. but you know what you are my super hero who save my time after two days of stupid attempts went fail. oh my God why I didn't ask you from the first day i got this problem, I have a project and this project depends on this code otherwise I will stop work on this project after I faced this problem but now I'm very excited to back work on my project Rose | [Rose]

Re: how to display image from gridview on picturebox

Eddy Vluggen21-Apr-12 7:21

Eddy Vluggen

21-Apr-12 7:21

You're welcome Smile | :)

Re: how to display image from gridview on picturebox

Wes Aday21-Apr-12 8:40

Wes Aday

21-Apr-12 8:40

Nicely done

Why is common sense not common?
Never argue with an idiot. They will drag you down to their level where they are an expert.
Sometimes it takes a lot of work to be lazy
Please stand in front of my pistol, smile and wait for the flash - JSOP 2012

Soap Envelope Response and Download Docs

VBseasons20-Apr-12 20:53

VBseasons

20-Apr-12 20:53

My Windows forms application sends and receives SOAP messages from/to an https server. Messages with simple and complex results work fine. Still one request that I issue and I don't know how to handle its response.

The response that I don't know to to use - in order to download a document - is as follows:
//*

XML

<?xml version="1.0" encoding="UTF-8"?>
<SOAP-ENV:Envelope xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" 
SOAP-ENV:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/" 
xmlns:SOAP-ENV="http://schemas.xmlsoap.org/soap/envelope/" 
xmlns:xsd="http://www.w3.org/2001/XMLSchema">
  <SOAP-ENV:Body>
    <ns1:DownloadResponse xmlns:ns1="urn:URNNAME">
      <return href="cid:325410.3217896541231.east-soap.sectown.madrid.co" />
    </ns1:DownloadResponse>
  </SOAP-ENV:Body>
</SOAP-ENV:Envelope>

*//
Its clear that the document to download is referred to as

HTML

<return href="cid:325410.3217896541231.east-soap.sectown.madrid.co" />

But I don't know how should I handle that CID: (Content-id)

Below is the code that sends the request and receives the response:

Private Function SendRequest(ByVal EnvelopContents As String, ByVal ServiceName As String, ByVal FullPathURL As String) As Boolean
        Dim myWebRequest As HttpWebRequest = HttpWebRequest.Create(FullPathURL)
        'Set Envelop Parameters
        Dim encoding As New ASCIIEncoding()
        Dim byte1 As Byte() = encoding.GetBytes(EnvelopContents)        
        With myWebRequest            
            .Method = "POST"
            ' Set the 'ContentType' property of the WebRequest.            
            .ContentType = "text/xml"
            ' Set the 'ContentLength' property of the WebRequest.
            .ContentLength = EnvelopContents.Length
            .Headers.Add("Accept-Encoding", "gzip,deflate")
            'authentication section
            Dim Certificato As X509Certificate = SelCert()
            .PreAuthenticate = True
            ....
            ....
            ....
        End With
        Try
            Dim newStream As Stream = myWebRequest.GetRequestStream()
            newStream.Write(byte1, 0, byte1.Length)
            ' Close the Stream object.
            newStream.Close()
            ' Assign the response object of 'WebRequest' to a 'WebResponse' variable.
            Using myWebResponse As WebResponse = myWebRequest.GetResponse()
                '' success in here
                Dim dataStream As Stream = myWebResponse.GetResponseStream()

                ' Open the stream using a StreamReader for easy access.
                Dim reader As New StreamReader(dataStream)

                ' Read the content.
                Dim responseFromServer As String = reader.ReadToEnd()
                '' deal with response
                Return True
            End Using
        Catch ex As WebException
				'deal with exception				
        End Try
    End Function

Re: Soap Envelope Response and Download Docs

Eddy Vluggen20-Apr-12 23:54

Eddy Vluggen

20-Apr-12 23:54

http://325410.3217896541231.east-soap.sectown.madrid.com/[^]

Looks like a regular address, and I guess that you can simply download from that URL.

Bastard Programmer from Hell Suspicious | :suss:

Help! Saving data from a datagridview to a local table in Visual Studio

AnthonyDailyMail20-Apr-12 8:10

AnthonyDailyMail

20-Apr-12 8:10

Hey everyone, I'm new to this forum. I'm hoping someone can help me understand how to update a table created in visual studio from an unbound datagrid control in a form. The data in the grid control is populated from a text file I import and want to save to the table. Below is the code I'm using. Any thoughts? Frown | :(

[code]
If IsDBNull(Me.FileData.Text) Or Len(Me.FileData.Text) < 1 Then
MsgBox("You must select the reformatter flate file", MsgBoxStyle.Information)
Exit Sub
Else
Using MyReader As New _
Microsoft.VisualBasic.FileIO.TextFieldParser(Me.FileData.Text)
MyReader.TextFieldType = FileIO.FieldType.Delimited
MyReader.SetDelimiters(",")
Dim currentRow As String()
While Not MyReader.EndOfData
FlatFileImportDataGridView.DataSource = Nothing
Try
currentRow = MyReader.ReadFields()
FlatFileImportDataGridView.Rows.Add(currentRow)
Catch ex As Microsoft.VisualBasic.FileIO.MalformedLineException
MsgBox("Line " & ex.Message & _
"is not valid and will be skipped.")
End Try
End While
End Using
'FlatFileImportDataGridView.DataSource = FlatFileImportBindingSource
Dim dr As New System.Windows.Forms.DataGridViewRow
For Each dr In Me.FlatFileImportDataGridView.SelectedRows
'Me.DataGridView2.Rows.Add(dr.Cells(0).Value, dr.Cells(1).Value, dr.Cells(2).Value, dr.Cells(3).Value, dr.Cells(4).Value, dr.Cells(5).Value, dr.Cells(6).Value, dr.Cells(7).Value)
Next

For Each row1 As DataGridViewRow In FlatFileImportDataGridView.Rows

Dim copyrow As DataRow = Me.Database1DataSet.FlatFileImport.NewRow

For Each col As DataGridViewCell In row1.Cells
copyrow(col.Value) = (col.Value)
Next
Me.Database1DataSet.FlatFileImport.Rows.Add(copyrow)

Next

Me.FlatFileImportTableAdapter.Update(Me.Database1DataSet.FlatFileImport)

End If
[/code]

Re: Help! Saving data from a datagridview to a local table in Visual Studio

Eddy Vluggen21-Apr-12 4:18

Eddy Vluggen

21-Apr-12 4:18

AnthonyDailyMail wrote:
The data in the grid control is populated from a text file I import and want to save to the table. Below is the code I'm using. Any thoughts?

Yup. Import the old-fashioned way (generate insert-commands) or spend quite some time on MSDN reading on how to update using the adapters.

Bastard Programmer from Hell Suspicious | :suss:

Re: Help! Saving data from a datagridview to a local table in Visual Studio

AnthonyDailyMail23-Apr-12 3:40

AnthonyDailyMail

23-Apr-12 3:40

Thanks Eddie. Straight to the point. Could you help me a bit more. You mention generating insert-commands. Can you give an example of how I would do this using my example? I'm still trying to make sense of things.

Re: Help! Saving data from a datagridview to a local table in Visual Studio

Eddy Vluggen23-Apr-12 8:03

Eddy Vluggen

23-Apr-12 8:03

Databinding doesn't save all things back in the database; it merely updates the dataset in memory. It should be possible to have the IDE generate the statements to do that, but I haven't used that feature yet.

An example of executing an insert-command is on the MSDN[^] site. For an import, I usually execute one of these for each row, varying the parameters. Also allows for a nice progressbar Smile | :)

Basic building blocks that you'll need are;

The SqlCommand, as linked above,
A SqlConnection[^], with a ConnectionString[^] on which you execute the command
The INSERT[^]-command in TSQL syntax

Hope this helps a bit Smile | :)

Bastard Programmer from Hell Suspicious | :suss:

Re: Help! Saving data from a datagridview to a local table in Visual Studio

AnthonyDailyMail23-Apr-12 4:36

AnthonyDailyMail

23-Apr-12 4:36

Hey everyone, I'm taking a different approach. Below is the code I'm using to save data from an unbound datagridview to a table using VB. The unbound datagridview control is called "DataGridView1". The bound datagridview control is called "MyImporterDataGridView". This grid is bound to a table called "MyImporter". Everything seems to work. When I click the button it imports a text file into the unbound datagridview control called "DataGridView1 and then the second datagridview control called MyImporterDataGridView which is bound to the table is filled with the data from the unbound grid which suggest to me that the table is being filled with the data. Problem is when I close the form and go to the table to view the data it's empty. What am I doing wrong here? Frown | :(

If IsDBNull(Me.FileData.Text) Or Len(Me.FileData.Text) < 1 Then
            MsgBox("You must select the reformatter flate file", MsgBoxStyle.Information)
            Exit Sub
        Else
            Using MyReader As New  _
              Microsoft.VisualBasic.FileIO.TextFieldParser(Me.FileData.Text)
                MyReader.TextFieldType = FileIO.FieldType.Delimited
                MyReader.SetDelimiters(",")
                Dim currentRow As String()
                While Not MyReader.EndOfData
                    Try
                        currentRow = MyReader.ReadFields()
                        DataGridView1.Rows.Add(currentRow)
                    Catch ex As Microsoft.VisualBasic.FileIO.MalformedLineException
                        MsgBox("Line " & ex.Message & _
                        "is not valid and will be skipped.")
                    End Try
                End While
            End Using
            'FlatFileImportDataGridView.DataSource = FlatFileImportBindingSource
            Dim dr As New System.Windows.Forms.DataGridViewRow
            'For Each dr In Me.FlatFileImportDataGridView.SelectedRows
            'Me.DataGridView2.Rows.Add(dr.Cells(0).Value, dr.Cells(1).Value, dr.Cells(2).Value, dr.Cells(3).Value, dr.Cells(4).Value, dr.Cells(5).Value, dr.Cells(6).Value, dr.Cells(7).Value)
            'Next
            Dim workrow As DataRow
            Dim i As Integer
            For i = 0 To DataGridView1.Rows.Count - 2
                workrow = Database1DataSet.Tables("MyImporter").NewRow()
                workrow(0) = DataGridView1.Rows(i).Cells(0).Value 'if the table field is a string
                workrow(1) = Val(DataGridView1.Rows(i).Cells(1).Value) 'if the table field is a number
                'workrow(2) = Val(DataGridView1.Rows(i).Cells(2).Value) 'if the table field is a number
                'workrow(3) = Val(DataGridView1.Rows(i).Cells(3).Value) 'if the table field is a number
                'workrow(4) = Val(DataGridView1.Rows(i).Cells(4).Value) 'if the table field is a number
                Database1DataSet.Tables("MyImporter").Rows.Add(workrow)
            Next

            TableAdapterManager.UpdateAll(Database1DataSet)
            
        End If

Chat without server

Member 885590419-Apr-12 23:00

Member 8855904

19-Apr-12 23:00

Hello,

I appreciate a litle help, i'm a newbiie in programing and i'm developing my skills around VBasic 2010.

I'm tryng to develop a chat to work in a network, without server.
The users login to a central database sql, in there i have de records of host and trhu that
-I easely get de Ip,
-in database i can know who is login,
-i can add to database aswell a record of port.

My problem's, without a server, a client need more than 2 port's to connect to for ex. 10 computers (outher clients) or need 20 port's
2 ports to comunicate with any computer?

I appreciate your wise opinion.
best regards,
BGUALTER

Re: Chat without server

Dave Kreskowiak20-Apr-12 3:28

Dave Kreskowiak

20-Apr-12 3:28

Yep. You talk on one and listen on the other. So, what's the problem?

A guide to posting questions on CodeProject[^]

Dave Kreskowiak

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