Recent content by RSX02

Hi I had many textboxes, check box, combo box, radio button, well...many objects in a tab control (let's called it Tab1) I had to move all them in a new tab control (called tab2) Since I moved them, all the events that I have for all of them doesn't occured. For example, if I had code in my...

take the second message (I made a mistake in this one)

Hi I have a datagrid which I display all lines that I have for a job. As my lines has revision also, I have to do a filter when I add a new revision for a specific row to see only the last revision in my datagrid. for example I have the line 1 rev 0 1 rev 1 2 rev 0 2 rev 1 2 rev 2 I display...

Ooopss Sorry about that Dim DRPUBLICVIEW As DataRowView m_DataLayer.DvPool = m_DataLayer.DsPool.Tables("Pool_type").DefaultView m_DataLayer.DvPool.RowFilter = mForm.sfilter dr = m_DataLayer.DvPool.Item(NoSeq) Me.DRPUBLICVIEW = dr DRPUBLICVIEW.Item("OccupiedAF") and...

Hi I have two lines: DRPUBLICVIEW.Item("OccupiedAF") = Me.OccupiedAf.Text DRPUBLICVIEW.Item("unOccupiedAF") = Me.UnoccupiedAF.Text which both fields in my DrPublicView are Decimal. In the both textbox I have the value 8. on the second line it prompt me this error message: "There is no row at...

Hi Christiaan I have a similar problem. Here it is: I execute this code: Dim teste As String teste = CType(actl3.Checked, Boolean) & " " & CType(Me.TempImperial, Boolean) If CType(actl3.Checked, Boolean) <> CType(Me.TempImperial, Boolean) Then haschanges = 1 In the teste variable it put "True...

Hi I compare this where ChkSpaceHeatingCoil is a checkbox in my form and where DRPUBLICVIEW.Item("Space_heating_coil") is a field that I have in my table that is declared as integer. When ChkSpaceHeatingCoil.Checked is set to True I put 1 in my record. Now this : If...

Christiaan I tried this Me.Country.SelectedValueChanged which "country" is my combobox and it's underline the line as it's not valid.

So do you think it has a property that does the same in a combobox?

Hi I saw that a textbox has the property "modified" does it have something similar for a combobox? I didn't see anything Thanks in advance

I found how to resolve it: Dim str1 As String Dim str2 As String str1 = Trim(dr.Item("Job_type")) str2 = Trim(Me.JobType.SelectedValue) If str1 <> str2 Then dr.Item("Job_type") = Me.JobType.SelectedValue This is working.

No I load my record. And, for the testing, i'm only trying to save (because if it has no change done I don't want to save it (create a new revision) but if it has changes I want to create a new revision). So as I didn't change anything between the Load record in my form and the save record. It...

yeah it's kind of that. I want to create a new revision of a job only when changes has been done. It detects the "haschange" properties as soon as I do an assignment even if both values are equal. This, I don't understand why... that's why I put an if statement.

Hi I have a problem. I would like to update a field in a dataset only when it's different to the value in the form. I saw that it passed as if it was different. I put messages boxes to see if they were different but it seems like it's the same. Does somebody understand why it does this...

wonderful!