|
You don't appear to be setting the value of inc anywhere before you try to use it.
|
|
|
|
|
I am new to databse, I don't know how to set the value in the code yet.
I did try this, but it is not working
If inc <> -1 Then
ds.Tables("Blokkies").Rows(inc).Item(1) = TxtLuidraad.Text
ds.Tables("Blokkies").Rows(inc).Item(2) = txtA1.Text
ds.Tables("Blokkies").Rows(inc).Item(3) = txtA2.Text
ds.Tables("Blokkies").Rows(inc).Item(4) = txtA3.Text
ds.Tables("Blokkies").Rows(inc).Item(5) = txtA4.Text
ds.Tables("Blokkies").Rows(inc).Item(6) = txtA5.Text
ds.Tables("Blokkies").Rows(inc).Item(7) = txtA6.Text
ds.Tables("Blokkies").Rows(inc).Item(8) = txtA7.Text
ds.Tables("Blokkies").Rows(inc).Item(9) = txtA8.Text
ds.Tables("Blokkies").Rows(inc).Item(10) = txtA9.Text
ds.Tables("Blokkies").Rows(inc).Item(11) = txtA10.Text
ds.Tables("Blokkies").Rows(inc).Item(12) = txtA11.Text
ds.Tables("Blokkies").Rows(inc).Item(13) = txtA12.Text
da.Update(ds, "Blokkies")
MsgBox("Register verander")
End If
modified on Thursday, March 19, 2009 2:27 AM
|
|
|
|
|
You're entering a contest to see who can write the most illegible code ?
Christian Graus
Driven to the arms of OSX by Vista.
|
|
|
|
|
now what is the best why do wright this code, I am new and want to get this right.
|
|
|
|
|
Like I said, your best option is to let your client know you're not the right man for the job. Buy some books and read them. Learn how to program before having clients.
Christian Graus
Driven to the arms of OSX by Vista.
|
|
|
|
|
I'm sorry, I thought you were someone else.
Break it down into steps. Write code that checks that a table of that name exists, that it has rows, etc. Then step through the code in the debugger.
Christian Graus
Driven to the arms of OSX by Vista.
|
|
|
|
|
Hi,
I have a treeview within directories of all drives including checkboxes (Netframework 2.0) When I check one node the following procedure below checks all the childs of the checked node. Therefore I have called the procedure inside the Treeview1_AfterCheck event procedure. But my aim is also to also check the node which is tagged with a driver name such as (C:\, D:\ maybe E:\ or something else). When I do that I am getting stackoverflow error because of recursive calls. How could you perform both actions at once to check the main node (driver name) and the nodes under the other checked one? Somehow I have to get rid of CheckRootNode procedure. Any sample code will be appreciated.
Thanks.
'
'This procedure checks the root node of any child under it
'
Private Sub CheckRootNode(ByVal GetNode As TreeNode)
Do While Not GetNode.Parent Is Nothing
Root = GetNode.Parent
CheckRootNode(Root)
Loop
TreeView1.Nodes(Root.Index).Checked = True
End Sub
'
'This procedure checks all the child nodes of the parent
'
Private Sub CheckChildNodes(ByVal GetParentNode As TreeNode, ByVal CheckState As Boolean)
For Each xnode As TreeNode In GetParentNode.Nodes
xnode.Checked = CheckState
Next
End Sub
Private Sub TreeView1_AfterCheck(ByVal sender As Object, ByVal e As System.Windows.Forms.TreeViewEventArgs) Handles TreeView1.AfterCheck
Call CheckChildNodes(e.Node, e.Node.Checked)
Call CheckRootNode(e.Node)
End Sub
What a curious mind needs to discover knowledge is noting else than a pin-hole.
|
|
|
|
|
Your issue is that the event fired when the check state changes, is setting the check state. Add a boolean, and use it to stop the event fired in CheckChildNodes from causing CheckChildNodes to be called again from the event handler.
Christian Graus
Driven to the arms of OSX by Vista.
|
|
|
|
|
This is probably a newbie question and I am just not getting it today but... I just want to open a file directory so that the user can open a text file but I dont need to use it in the program. The main form has a button called 'LogFiles' and when the user presses it, I just want it to open the directory and do nothing else. I was using OpenFileDialog but that is stopping execution until a file is chosen. Am i missing something obvious. Thanks
|
|
|
|
|
You can use FolderBrowserDialog for this purpose
|
|
|
|
|
Thanks for the reply,
I looked at the folderbrowserdialog as you suggested and it seems as if it does the same thing. I cannot do anything else on the main form until i select a folder or press cancel. That is not exactly what I was going for. Instead of putting a shortcut on the desktop the the application log file, I wanted to open the folder from a button on the front panel. If the folder stays open in the background, the application doesnt care. Is this not possible.
|
|
|
|
|
I guess you want to the browse to the some path when LogFiles button is clicked.
You need to set SelectedPath property FolderBrowserDialog in button click event.
Isn't it
|
|
|
|
|
yeah thats what I want but I was hoping it could display in the background. Both the folderbrowse and openfile dialog open as modal, it seems, preventing me from doing anything else on the form. I was hoping maybe the folder could open and just sit in background in case the user needed to open one of the files at a later time. I thought there might be a way to do it that didnt require opening an actual file/folder from within the code. Is that not typical?
|
|
|
|
|
I am cofused with Background. If you dont want to show to dialog box than you need to save your log file path in some variable. Nothing else
|
|
|
|
|
|
Hi,
I see three ways of getting a look at a directory:
1. use an existing folderbrowser dialog; since it is a dialog, it will have modal behavior.
2. open up the folder using Windows Explorer; use Process.Start(fileName) to make it happen. This launches a separate process and will behave completely independently of your app.
3. write your own Form that somehow displays folder contents, and Show() it modelessly.
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
|
|
|
|
|
Thanks Luc,
by background, what I really meant was, independent of my application. I wanted an explorer window to stay open regardless of whether or not a file was chosen. I just couldnt explain myself properly.
Process.Start was just what I was looking for!
|
|
|
|
|
Hi,
I think that you want to open a Windows Explorer window at a particular directory for the convenience of your users, correct?
In which case use
System.Diagnostics.Process.Start(pathname) [EDITED typo]
The Start method has many overloads and this simple one uses the associated application to open pathname.
So as an example, if pathname is d:\logfile.txt then Notepad is used to open the file d:\logfile.txt.
What you might not have realised is that directories are associated with Explorer. As a consequence if pathname is a directory, e.g. d:\logfiles then the Start method will open an Explorer windows at the d:\logfiles directory.
Alan.
[EDIT: Like Luc said a few minutes ago]
modified on Wednesday, March 18, 2009 4:09 PM
|
|
|
|
|
Hi,
I dont think i understand correctly.
1. Yes, I do want to open an explorer window, not a file as your example demonstrates
2. I cannot find System.Diagnostics.Start
|
|
|
|
|
Ah, my mistake. If I had written System.Diagnostics.Process.Start, the original post might have made more sense.
In the System.Diagnostics namespace is the Process class and that has a Start method. If you pass a directory path to the Start method it will open an Explorer window at that path.
Alan.
modified on Wednesday, March 18, 2009 3:59 PM
|
|
|
|
|
ah Got it now...
Thanks again for everyone's help
|
|
|
|
|
How do i call a menu form from another menue i have tried the following and not working.
Private Sub RestoreToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RestoreToolStripMenuItem.Click
Dim frmSecondMenu As New SecondMainMenu
frmSecondMenu. (this did have showDialog in the list of methods)
End Sub
if i type it as frmSecondMenu.ShowDialog() i have the following error
Error: Error 9 'showDialog' is not a member of 'System.Windows.Forms.SecondMainMenu'.
what will i do
|
|
|
|
|
I think you want to call SecondMainMenu's Click procedure in the RestoreToolStripMenuItem_Click()
If you, then
Private Sub RestoreToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RestoreToolStripMenuItem.Click<br />
<br />
SecondMainMenu_Click(sender, e)<br />
<br />
End Sub
|
|
|
|
|
Why do that when you can simply call SecondMainMenu.PerformClick? That way, you get your function parameters filled in automatically
|
|
|
|
|
Hi everyone,
I started writing programs on VB .NET in the year of 2006, reading Jim Buyens book "Faster Smarter Beginning Programming" and that's only skill I got in programming, so I could say that I'm new in writing programs. My dream was to make my own game, I searched the net to find a simple collision detect system, but all I found was "detecting collisions between 2 or three, or maximum 10 objects" which is pretty simple because there is very small count of objects and we know exactly how much they are. There was nothing like "collision detect between various number of objects", so I've made myself one using the following logic:
I've created a string array which size is equal to the count of the pixels that the playground is made of - if my playground is 9000 x 9000 then the array is something like this: strWorldArr(81000000) - each element in the array represents a single pixel of the playground and all objects that move on the playground fill their name in the elements of the array using their coordinates to locate the elements of the array which represents the pixels beneath them. Here is the code of the main part of my collision detect system:
<pre>REM: checking the pixels before moving the object if the values of the array elements which they present are clean then its good to go:
Function CleanChecker(ByVal panHero As HeroBody, ByVal szeSize As Size, _
ByVal intStartPos As Integer, ByVal intEndPos As Integer, _
ByVal intCycle As Integer)
Dim intCount As Integer = 0
For i = 0 To intCycle
For e = intStartPos To intEndPos
If strWorldArr(e) <> panHero.Name And strWorldArr(e) <> "†" Then
intCount += 1
End If
Next
intStartPos += szeSize.Width
intEndPos += szeSize.Width
Next
Return intCount
End Function
REM: this subroutine cleans behind the object, or fills it's new positions:
Sub CleanOrFill(ByVal panHero As HeroBody, ByVal strChar As String, _
ByVal szeSize As Size, ByVal intStartPos As Integer, _
ByVal intEndPos As Integer, ByVal intCycle As Integer)
For i = 0 To intCycle
For e = intStartPos To intEndPos
strWorldArr(e) = strChar
Next
intStartPos += szeSize.Width
intEndPos += szeSize.Width
Next
End Sub
REM: this subroutine is one of 4 which call the CleanChecker and CleanOrFill to detect a collision:
Private Sub mUP(ByVal panHero As HeroBody, ByVal szeSize As Size, _
ByVal intObjSpeed As Integer, ByVal intTolerance As Integer)
Dim intChkStart As Integer = panHero.Left + intStartNum(panHero.Top - intObjSpeed)
Dim intChkEnd As Integer = intChkStart + panHero.Width
Dim intCleanStart As Integer = panHero.Left + intStartNum(panHero.Bottom - intObjSpeed)
Dim intCleanEnd As Integer = intCleanStart + panHero.Width
If CleanChecker(panHero, szeSize, intChkStart, intChkEnd, intObjSpeed) >= intTolerance Then
REM: the path is blocked
Else
REM: the path is passable
panHero.Top -= intObjSpeed
CleanOrFill(panHero, panHero.Name, szeSize, intChkStart, intChkEnd, intObjSpeed)
CleanOrFill(panHero, "†", szeSize, intCleanStart, intCleanEnd, intObjSpeed)
End If
End Sub</pre>
To pass this code through all of the objects I use For Each... Next statement.
On core2 duo CPU 2GHz 4mb l2 cache and 2GB RAM this system can support smoothly up to 100
objects, on intel Pentium4 1800 MHz 512 kb l2 cache and 1GB RAM this system works so badly that it
can't move even one object normally.
I think that this code is pretty simple, why it takes so much power to run? Is this slow calculation have
anything to do with the programming language - Visual Basic 2008 - .NET Framework 3.5? Is there anyway to
improve the collision detect performance of this system or this project is doomed?
Sorry for my bad english, and thank you in advance.
<div class="ForumMod">modified on Wednesday, March 18, 2009 10:39 AM</div>
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
