Recent content by PsychoCoder

I wrote a tutorial on working with the Windows Registry (on another site so hopefully I don't get anyone upset for posting the link) Working with the Windows Registry in VB.Net Application Developer: VB.Net, Qik III, SQL 2000/2005 ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ "Let's fact it, most...

Ferlin, This should work for you Dim loConnection As SqlClient.SqlConnection Dim loCommand As SqlClient.SqlCommand Dim loProductImage As SqlClient.SqlParameter Dim loImageValue() As Byte Dim loFile As IO.FileStream Dim lnByteCount As Integer 'Instantiate...

You could always do something like Dim sTemp as String = "3.959" Dim sTemp2 as String sTemp2 = sTemp.Substring(0,(sTemp.IndexOf(".")-1)) Application Developer: VB.Net, Qik III, SQL 2000/2005 ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ "Let's fact it, most computer users have the brain of a Spider...

djtech2k, To do that use if e.KeyCode=Keys.FirstKey And e.KeyCode = Keys.SecondKey And e.KeyCode = Keys.ThirdKey Then 'Do processing here End If Application Developer: VB.Net, Qik III, SQL 2000/2005 ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ "Let's fact it, most computer users have the brain of...

djtech2k, This is really the best way to do what you're looking for. The forms Key_Press event can handle any key combination you can think of, then in that key combination you add your "hidden" function, and if you have an access level set (as described above) then the only ones who can access...

tuzojazz, This is actually a bug in .Net where the underlying connection is closed before the request is complete. You can add something like this to your class where the connection is being handled Protected Overloads Overrides Function GetWebRequest(ByVal uri As Uri) As WebRequest Dim...

aspvbnetnerd, This article should get you started on adding paging to a DataGridView: DataGridView Paging Application Developer: VB.Net, Qik III, SQL 2000/2005 ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ "Let's fact it, most computer users have the brain of a Spider Monkey" ~ Bill Gates ~...

djtech2k, Well if your application is hooked to a database this is much easier. Add a field to the users table that acts as an access level indicator, when the user logs in extract that value into a global property, then you can have a constant in the application, like Public Const ADMIN_LEVEL...

Ajb2528, Unless I'm incorrect (or unless you create a custom control taking control of the Paint Event) that this is not possible with a ListView. Senior Qik III, ASP.Net, VB.Net ,SQL Programmer ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ SELECT * FROM Users WHERE clue > 0 0 Rows Returned...

Ajb2528, Try something like this Private Sub SearchListView(ByVal sSearchString As String) LV1.MultiSelect = True ' Allow multiple finds LV1.HideSelection = False ' Ensure it highlights all finds Dim iCountItems As Integer Dim iCountSubItems As Integer...

tuzojazz, What version of .Net are you using because those 2 are members of 2.0 Senior Qik III, ASP.Net, VB.Net ,SQL Programmer ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ SELECT * FROM Users WHERE clue > 0 0 Rows Returned ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

tuzojazz, This is due to a known .Net issue where the connection is closed before the request is complete. Essentially requests are made by opening a connection, making a number of them then closing it. In this occurrence, the connection times out but is not recognized as closed and thus a new...

ThatRickGuy, Thats what I had in my original, and unless I read his postw rong (which is possible at 4am) he said that wasnt working Senior Qik III, ASP.Net, VB.Net ,SQL Programmer ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ SELECT * FROM Users WHERE clue > 0 0 Rows Returned...

SBendBuckeye, Try removing the MyClass.New, you should need this (Just looked through my code and I don't use it anywhere). Private Sub New (ByVal mText As String) Me.MyPropertyName = mText End Sub And see if that helps. Senior Qik III, ASP.Net, VB.Net ,SQL Programmer...

SBendBuckeye, I program in 2.0 and thats the exact same way I do it as well so it appears to be the same in 2.0 as it is in 1.2. Im assuming you have Class Properties you're setting in your New Construction such as Private Sub New (ByVal mText As String) MyBase.New Me.MyPropertyName =...