Visual Basic

Christian Graus22-Jun-09 11:05

Christian Graus

22-Jun-09 11:05

We have a SQL forum. You can also look here[^]

Christian Graus

Driven to the arms of OSX by Vista.

"! i don't exactly like or do programming and it only gives me a headache." - spotted in VB forums.

I can do things with my brain that I can't even google. I can flex the front part of my brain instantly anytime I want. It can be exhausting and it even causes me vision problems for some reason. - CaptainSeeSharp

EliottA22-Jun-09 11:11

EliottA

22-Jun-09 11:11

clouse = cluse = clause??

how the hell did you figure that out??

More complicated then the daily CCC.

Check out the CodeProject forum Guidelines[^]
The original soapbox 1.0 is back![^]

Dalek Dave22-Jun-09 23:54

Dalek Dave

22-Jun-09 23:54

EliottA wrote:
More complicated then the daily CCC.

Thanks, I work hard at them, his seem to come easy!

------------------------------------

"When Belly Full, Chin Hit Chest"
Confucius 502BC

Reference Equivelants in .net

dan!sh 23-Jun-09 2:53

dan!sh

23-Jun-09 2:53

"Gifted" is the word.

Winsock 2005 Problem

morpheusv622-Jun-09 6:48

morpheusv6

22-Jun-09 6:48

Hi,

I am trying to make a client server form application using VB2005. I am using VS2005 Professional for development.

The problem is as follows:

When more than one client tries to connect to the server. The connection is refused and the Client gets an exception in Connect() method - Target machine actively refused the connection.

This problem occurs only when 2 or more clients try to simultaneously connect to the server. For a single client accessing at a time the problem does not occur.

The code segment is as given below:

-----------1 Module
Imports System.Net.Sockets
Imports System.Net
Public Class FrmMdiParent

   Dim WithEvents wsServer As New Winsock2005DLL.Winsock

   Private Sub FrmMdiParent_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
      If wsServer.State = Winsock2005DLL.WinsockStates.Connected Then wsServer.Close()
   End Sub

   Private Sub FrmMdiParent_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
      main()
      Try
                  wsServer.MaxPendingConnections = 20
                  wsServer.LocalPort = 8000
         wsServer.Listen()

      Catch ex As Exception
         MessageBox.Show(ex.Message, "Exceptions Handler!", MessageBoxButtons.OK, MessageBoxIcon.Error)
      End Try
   End Sub

   Private Sub wsServer_ConnectionRequest(ByVal sender As Object, ByVal e As Winsock2005DLL.WinsockClientReceivedEventArgs) Handles wsServer.ConnectionRequest
            If wsServer.State = Winsock2005DLL.WinsockStates.Connected Then
            MessageBox.Show("Server is busy with other clients.", "Server connection failed!", MessageBoxButtons.OK, MessageBoxIcon.Exclamation)
            End If
            wsServer.Accept(e.Client)
      End Sub

   Private Sub wsServer_DataArrival(ByVal sender As Object, ByVal e As Winsock2005DLL.WinsockDataArrivalEventArgs) Handles wsServer.DataArrival
      Try

         Dim str As String = ""
                  wsServer.Get(str)
         .........(other statements)
         End Select
      Catch ex As Exception
         MessageBox.Show(ex.Message, "Exceptions handler!", MessageBoxButtons.OK, MessageBoxIcon.Error)
      End Try
   End Sub

   Private Sub wsServer_Disconnected(ByVal sender As Object, ByVal e As System.EventArgs) Handles wsServer.Disconnected
      wsServer.Listen()
   End Sub

   Private Sub mnuItmLogin_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mnuItmLogin.Click
      Select Case mnuItmLogin.Tag
         Case 0
            ' Login
            Dim objfrmlogin As New FrmLogin
            objfrmlogin.ShowDialog()

         Case 1

            ' Logout
            mnuSvrAuth.Enabled = False
            mnuItmLogin.Tag = 0
            mnuItmLogin.Text = "&Login"
      End Select
   End Sub

End Class

----------------2 Module

Dim WithEvents winSock1 As New Winsock2005DLL.Winsock

#Region " WinSock events "

#Region " Connected "

      Private Sub winSock1_Connected(ByVal sender As Object, ByVal e As System.EventArgs) Handles winSock1.Connected

            If isRequest Then

               .................

      End Sub

#End Region

#Region " Data Arrival "

      Private Sub winSock1_DataArrival1(ByVal sender As Object, ByVal e As Winsock2005DLL.WinsockDataArrivalEventArgs) Handles winSock1.DataArrival
            Dim str As String = ""
            winSock1.Get(str)

         .................

      End Sub

#End Region

#Region " Error Occured "

      Private Sub winSock1_ErrorReceived(ByVal sender As Object, ByVal e As Winsock2005DLL.WinsockErrorEventArgs) Handles winSock1.ErrorReceived
            MessageBox.Show(e.Message, "Error Occured from server.", MessageBoxButtons.OK, MessageBoxIcon.Error)
      End Sub

#End Region

-----------------

The above exception is thrown when more than 1 clients try to access the server simultaneously.

I am not able to find any solution to this problem, any help will be really useful.

Thanks

-Dev

Re: Winsock 2005 Problem

Dave Kreskowiak23-Jun-09 5:43

Dave Kreskowiak

23-Jun-09 5:43

Your going to have to contact the people that wrote the Winsock2005 library you're using to get this question answered.

A guide to posting questions on CodeProject[^]

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

No-e22-Jun-09 5:56

No-e

22-Jun-09 5:56

A project in VB6 had a reference to a DLL. When the project started it made a decision to load this DLL or not load it (based on reading a configuration setting from a file) If it needed to load it it would launch the DLL which opened a separate window.

After upgrading to .NET, I am not sure how this reference equivalent is done, but when I start my project it always loads this DLL, whether or not I want it to. It appears to load it in the InitializeComponent, but I do not understand why, or how I can prevent it from loading the DLL when I start the project. It is after the initializeConponent that the program looks for the config setting to determine it it should load this. Any idea how I need to handle this?

Public Sub New()
		MyBase.New()
		If m_vb6FormDefInstance Is Nothing Then
			m_vb6FormDefInstance = Me
		End If
		'This call is required by the Windows Form Designer.
		InitializeComponent() ' loads my dll here for some reason
	End Sub

Any help or point in a good direction is appreciated...

No-e

Re: Reference Equivelants in .net

Henry Minute22-Jun-09 6:32

Re: HTML Help Index Problem

22-Jun-09 6:32

I strongly suspect that one of the controls you are using in your upgraded application uses some method/control from the VB6 dll. That is the only way I know that the dll can get loaded in InitializeComponent().

Just in case you don't know how to use the dll in code, here[^] is a link I have found useful in the past, although there are loads more out there.

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.”

HTML Help Index Problem

rdculver22-Jun-09 4:14

rdculver

22-Jun-09 4:14

I am working on a VB2008 project and added the HelpProvider control to display a .chm file. I had built the .chm file and tested before trying to use. However everytime I tried to display it in my VB application the index tab was empty. When I closed the HTML viewer (which I assume is hh.exe) it caused an exception and displayed the familar "Send Report" dialog. Up on further testing I discovered that I could no longer display any .chm file on my system including the one that had previously worked. It almost seems like something in VS2008 has clobbered a link in my system that no longer will properly display any .chm file that has an index associated with it. Has anyone seen this problem before and/or know of a solution?

rdculver29-Jun-09 4:34

rdculver

29-Jun-09 4:34

I was finally able to solve my own problem by simply reregistering (regsrv32) the HHCTRL.OCX module. I don't know how the problem started or why this fixed it but it did.

How to code for design window

Member 300692622-Jun-09 2:21

Member 3006926

22-Jun-09 2:21

I am trying to create print designer. Users can drag and place fields according to their needs.i searched many places. could not find a working vb.net sample code. please help thanks in advance

Re: How to code for design window

EliottA22-Jun-09 2:31

EliottA

22-Jun-09 2:31

Well, what have you tried? Can you explain clearer what it is you are trying to construct? Are you simply looking for a working example or are you attempting to create something yourself?

Check out the CodeProject forum Guidelines[^]
The original soapbox 1.0 is back![^]

Re: How to code for design window

Henry Minute22-Jun-09 4:12

get text from html format

22-Jun-09 4:12

These two links may help. The first from MSDN should have VB Code Samples, the second, if memory serves is C# but is nonetheless an excellent article on this sort of thing.

Create And Host Custom Designers With The .NET Framework 2.0[^]
hosting-windows-forms-designers/[^]

If they are of no help, what you are trying to do is essentially the same as a 'Drawing' application. Allowing users to place shapes on a surface and move them around. So Google for drawing applications vb.net, sketchpad vb.net and similar phrases.

rmedo21-Jun-09 23:25

rmedo

21-Jun-09 23:25

Hi all,
i'm using web service in my form, this web service return html text format, i want to extract text writen between html tags

Thanks for help

Re: get text from html format

Christian Graus21-Jun-09 23:55

Christian Graus

21-Jun-09 23:55

You can parse the HTML if it is XML, using the DOM. Or you can use regex.

Re: get text from html format

rmedo21-Jun-09 23:57

rmedo

21-Jun-09 23:57

Thanks for your help
do you have any paper about this subject

Re: get text from html format

Christian Graus22-Jun-09 0:01

Christian Graus

22-Jun-09 0:01

Well, it's really pretty easy. USe the DOM ( XmlDocument class ) to parse XML, or use the RegEx object to run a regular expression. In both cases, there's tons of info on the web.

XP panel [modified]

mirzamujib21-Jun-09 21:43

21-Jun-09 21:43

Hello everybody,

Iam trying to make like xp panel.Here iam unable to move up my 4th panel.
i've 5panels.1main panel,2panels on top and 2 panels on bottom in main panel.

iam unable to move my panel4 "UP" when am unexpanding(pressing up arrow button) my panel2, and getting back to its original height i.e, oldheight when am expanding my panel2....

Please Help me....
Thanks.

modified on Monday, June 22, 2009 5:27 AM

Henry Minute22-Jun-09 1:20

22-Jun-09 1:20

I think that to get any help you are going to have to reword your question. Currently it makes no sense to me.

What on earth is XP Panel?

Re: XP panel [modified]

mirzamujib22-Jun-09 1:39

22-Jun-09 1:39

Hello,
Actually XP Panel means is what we see when we double click on my computer at the left hand side.These panels consists of lables 1)View System Information, Change a setting 2)My Network Place, My Documents.I already made this one but the problem is when we click on an up(^) arrow of lets say panel1 then the bottom panels should come up and when we click on down arrow these panels should go to their standard(old) positions.I need the code of how to move those panels when we click on up and down arrows of panels.

Plz Help me
Thanks in advance

modified on Monday, June 22, 2009 7:47 AM

Henry Minute22-Jun-09 1:56

22-Jun-09 1:56

Have you looked at Full-featured XP Style Collapsible Panel[^]?

If you do not find the answers there, there are plenty more examples on t'interweb.

mirzamujib22-Jun-09 3:31

22-Jun-09 3:31

I've seen that article but i'm not getting some part of it.i only need how to move the below panels when we click on the up arrow button of a top panel.....
its a small code but dont know y i'm unable to do....

Thanks for your reply..
if u can provide me that code....

thanks.

Henry Minute22-Jun-09 3:56

22-Jun-09 3:56

mirzamujib wrote:
if u can provide me that code....

You show me yours and I, or somebody else, might show you ours!

mirzamujib22-Jun-09 20:09

22-Jun-09 20:09

sory i dont get u...
kindly do help.. Frown | :(

Henry Minute23-Jun-09 1:05