Visual Basic

5-Dec-06 3:21

I'm not sure if this is the correct area, forgive me if it is not!

I have this datagrid that is called deleteCourseGrid and it has a template column. I put a checkbox inside and its ID is deleteCheck.

I also have a confirm button that runs the code below.

The problem is, somehow, it does not detect that a box is checked. I tried checking each individual rows and cb.checked is always false.

Am I doing something wrong?

Thanks for help in advance!

Dim connection As New SqlConnection(ConfigurationSettings.AppSettings("ConnectionString"))<br />
Dim command As New SqlCommand("delete from course where courseID = @courseID", connection)<br />
Dim i As Integer = 0<br />
Dim cb As CheckBox<br />
Dim courseID As String<br />
cb = deleteCourseGrid.Items(i).FindControl("deleteCheck")<br />
For i = 0 To deleteCourseGrid.Items.Count - 1<br />
    If cb.Checked = True Then<br />
        courseID = deleteCourseGrid.Items(i).Cells(0).Text<br />
        command.Parameters.Add("@courseID", courseID)<br />
        connection.Open()<br />
        command.ExecuteNonQuery()<br />
        connection.Close()<br />
    End If<br />
Next<br />
Response.Redirect("updated.aspx")

Kevin Nicol5-Dec-06 3:53

5-Dec-06 3:53

try treating cells in that column as bools

<br />
If row.item("deleteCheck") then<br />
  Delete<br />
End if<br />

Kenshino5-Dec-06 4:28

5-Dec-06 4:28

Hi! Thanks for the help.

But I'm really not sure what you mean. Could you elaborate?

Thanks!

Kevin Nicol5-Dec-06 5:18

5-Dec-06 5:18

well your normal textbox data column in the grid, displays all strings and numbers as text. It works the same for boolean columns. A DataGridBoolColumn will display true as checked, false as unchecked. So whatever column on your datatable is mapped to this DataGridBoolColumn will contain the true or false that is shown in the datagrid column.

If you had a datatable (Two columns -> Name, Smoker) where smoker would be mapped to the DataGridBoolColumn, in each row in the table, a boolean would appear in the column smoker with resepct to the checked state of the textbox on the datagrid.

Hope that helps.

Kenshino5-Dec-06 5:29

5-Dec-06 5:29

Thanks Kevin.

I think understand the logic behind your explanation, however I fail to find anything that relates DataGridBoolColumn in Visual Studio 2003.

Is there something that I'm missing?

What I'm trying to do is to allow the administrator to tick the courses that he wants to delete and then when he clicks the confirm button, the code scrolls through, if it's ticked, it sends the SQL command and deletes it.

I'm sorry for troubling you =/

Kevin Nicol5-Dec-06 6:17

5-Dec-06 6:17

ok This is how I would do that. Lets say you have a datatable (courseTable) with one column (A course ID).

First add a second column to the table

<br />
courseTable.columns.add(new dataColumn("Delete"))<br />

Setup the tablestyle for the bool column

<br />
Dim style As New DataGridTableStyle<br />
style.GridColumnStyles.Clear()<br />
style.MappingName = courseTable.TableName<br />
<br />
Dim col As New DataGridBoolColumn<br />
col.MappingName = "Delete"<br />
col.HeaderText = "Delete"<br />
col.AllowNull = False<br />
style.GridColumnStyles.Add(col)<br />
<br />
DataGrid1.TableStyles.Add(style)<br />
DataGrid1.DataSource = courseTable<br />

now you have the right setup for the bool column, just display it by adding rows to the datatable somehow from the database.

so in your confirm button routine just check for deletes

<br />
For Each row As DataRow In courseTable.Rows<br />
  If row.Item("Delete") Then<br />
     'This row was ticked so perform a delete<br />
  End If<br />
Next<br />

That should do it for you

Kenshino5-Dec-06 10:08

5-Dec-06 10:08

I'm trying this out and I have a strong feeling that it will help with my problem.

However, I am stuck at trying to dim a new DataGridTableStyle. Is this not available in The .Net 1.1 framework or something? Visual Studio 2003 says that Type DataGridTableStyle is not defined.

I tried reading http://msdn.microsoft.com/msdnmag/issues/03/08/DataGrids/default.aspx#S6 and it talks about DataGridTableStyle, yet visual studio does not seem to recognise this.

What should I do? And a million thanks for your many replies!

Kapil Thakur6-Dec-06 1:06

Kapil Thakur

6-Dec-06 1:06

DataGridTableStyle is valid in windows application.
but you are working in web applications that why you are getting it and it is giving errors.

anyways next time post your questions in asp.net forum....you have currently posted this question in vb.net ..............thats why the person has misunderstood the scenario and he has given this answer.....anyways it happens..

hope you have found solution to your problem.

Regards,
Kapil Thakur
(Where's there is Kapil , there is a way) - thakur.kapil@gmail.com

Kapil Thakur5-Dec-06 20:53

Kapil Thakur

5-Dec-06 20:53

hi,
you are currently taking the checked value as string. Instead of it, take it as a boolean variable.
i m using your code and the changes are reflected in BOLD text.

Dim cb As BOOLEAN
Dim courseID As boolean

cb = CTYPE(deleteCourseGrid.Items(i).FindControl("deleteCheck"), CHECKBOX).CHECKED

For i = 0 To deleteCourseGrid.Items.Count - 1

IF cb = TRUE THEN
courseID = deleteCourseGrid.Items(i).Cells(0).Text
command.Parameters.Add("@courseID", courseID)
connection.Open()
command.ExecuteNonQuery()
connection.Close()
End If

use this and your code will work fine.

ALSO check that you are reloading the datagrid on page_load

Regards,
Kapil Thakur
(Where's there is Kapil , there is a way) - thakur.kapil@gmail.com

Kenshino5-Dec-06 23:57

5-Dec-06 23:57

Hi!
Thanks for the help!!
I tried your way, however it does not work.

I've been stepping the program through and the problem lies with the fact that it is somehow ignoring boxes that are checked.

So it keeps looping to If cb = true then and then skipping the entire code within and just stepping over to End If

This is really confusing =/

Help me tune up this class, pls

Kapil Thakur6-Dec-06 1:01

Kapil Thakur

6-Dec-06 1:01

hi,
first of all make sure that before checking the checkboxes values....you are not reloading the datagrid with data again.
make sure that after clicking the button you are loading the data again at some point in your code.....as this is the most common mistake in such scenarios.

so, be sure that the grid is not reloaded with data.

anyways.......
i m attaching a thoroughly tested and working code snippet.

Dim count As Integer = 0

For count = 0 To dgUser.Items.Count - 1

Dim IsChecked As String = CType(dgUser.Items(count).FindControl("chkDeleteUser"), CheckBox).Checked.ToString()

If UCase(Trim(IsChecked)) = UCase(Trim("True")) Then

''IGNORE THE FOLLOWING If-EndIf block - starting here
'If UCase(Trim(Session("userid"))) = UCase(Trim(dgUser.Items(count).Cells(1).Text.ToString)) Then
'ErrorLabel.Visible = True
'ErrorLabel.Text = Session("oRM").GetString("UD_You_Are_Not_Allowed_To_Delete_Your_Own_Data") & " - " & dgUser.Items(count).Cells(3).Text.ToString

'pnlGrid.Visible = True
'pnlAddUser.Visible = False
'Exit Sub
'End If
''IGNORE THE FOLLOWING If-EndIf block - ending here

End If

Next

if even this is not working......then my dear frnd , send ur project to me...i'll be glad to help you out by debuging it and fixing your problem
my email id is thakur.kapil@gmail.com

Regards,
Kapil Thakur
(Where's there is Kapil , there is a way) - thakur.kapil@gmail.com

king gamo5-Dec-06 3:05

king gamo

5-Dec-06 3:05

i have this class below which i'm using to uniquely generate a set of numbers. What it does is if i want 10 numbers randomly selected out of 11 i will pass it as a parameter to it and it'll return me the unique numbers. i dont want repetitions of the same number and it does what i want exactly... the problem is that atimes it gets into an infinite loop especially when i want 4 out of 5 or 3 out of 4.

the class

Public Class UniqueNumbers
Dim randCtr As New Random
Public Function genNumbers(ByVal totalNeeded As Integer, ByVal AvailableRange As Integer) As Integer()
Dim var1, var3 As Integer

Dim generatedNumbers(totalNeeded - 1) As Integer
Dim returnedNumbers(totalNeeded - 1) As Integer

For var1 = 0 To (totalNeeded - 1)
generatedNumbers(var1) = randCtr.Next(1, (AvailableRange + 1))
returnedNumbers(var1) = generatedNumbers(var1)
naa: For var3 = 0 To var1

If returnedNumbers(var3) = generatedNumbers(var1) Then
generatedNumbers(var1) = randCtr.Next(1, (AvailableRange + 1))
If var1 <> 0 Then
'varar(var1) = vararr(var1)
GoTo naa
End If
End If
Next
returnedNumbers(var1) = generatedNumbers(var1)

Next
genNumbers = returnedNumbers

Return genNumbers

End Function
End Class

all that i mean is if i want 3 out of 4
it can return 123 or 321 or 231 anything other than repeating one number twice like 112 or 122 or 332. My main problem is i want it to be faster and atimes it gets into a hang or infinite loop. Help me out guys.

Love makes the world go round

Re: Help me tune up this class, pls

Guffa5-Dec-06 5:15

Guffa

5-Dec-06 5:15

I can very well imagine that your code goes into an eternal loop, it's rather buggy. For example, the first random number created for each position in the array will always be replaced by a new random number, as you regard it as a duplicate as it is equal to itself. Also, if a number is the same as the first in the array, you pick a new number and accept it without checking if the new number is the same as the first in the array.

Perhaps not the most efficient, but very simple and straight forward:

Put all the possible numbers in a list. Pick one of them by random and remove it from the list. Repeat until you have the desired number of numbers.

---
b { font-weight: normal; }

click in datagrid's cell

Smithers-Jones5-Dec-06 2:17

Smithers-Jones

5-Dec-06 2:17

vb.net: when i click into a datagrid, the text becomes blue, the background gray, a cursor appears, and formatting for that cell disappears.
but i want nothing at all to happen, when i click in a cell. no cursor, no change of color. how can i do that?

Re: click in datagrid's cell

Kevin Nicol5-Dec-06 3:01