Re: How can I take one record from one form and the values to open another form? - Visual Basic Discussion Boards

Congratulations. You're the stupidest person on these forums, at least today.

Christian Graus

Driven to the arms of OSX by Vista.

"I am new to programming world. I have been learning c# for about past four weeks. I am quite acquainted with the fundamentals of c#. Now I have to work on a project which converts given flat files to XML using the XML serialization method" - SK64 ( but the forums have stuff like this posted every day )

Rajesh B --> A Poor Workman Blames His Tools <--

:~I have a form that takes info from the user when all the entry is correct, the user can open another form for the next process.
What I mean is that let's say a registration form is open to create a registration record, when it's done, a complaint form is then open to create a complaint record based on the registration record. registration is a parent form and complaint is a child form.
the open registration record must be parsed to the complaint form for it to be opened.
the child form must be able to update the database and create a new record form its instance.

can anyone guide..

Best regard,
waner

Pass the 'registration' info from the parent form to the child form in the child forms constructor or property's (constructor is safest way since then you have to pass them)

Pseudo code:

class form1

private sub button1_click
'validate the registration info
if valid then 
dim frm as new form2(param1,param2,...)
frm.showdialog
end if
end sub

end class

class form2

public sub new (param1 as ..., param2 as ..., ...)
initializecomponent
'do more code here with the params
end sub

end class

thanks,

this is what I have done.

In the registration form that is the parent form

Private sub CreateAComplaint_Click

Dim row As IGRegistrationDataSet.RegistrationRow
row = CType(CType(Me.RegistrationBindingSource.Current, DataRowView).Row, IGRegistrationDataSet.RegistrationRow)

Dim frm As New ComplaintProfile(Me.IGRegistrationDataSet, row.Reg_ID)

frm.ShowDialog()

end sub

int the complaint form that is the child form, I have this

Sub New(ByVal ds As IGRegistrationDataSet, ByVal id As Integer)

' This call is required by the Windows Form Designer.
InitializeComponent()
' Add any initialization after the InitializeComponent() call.
Me.RegistrationBindingSource.DataSource = ds
Me.RegistrationBindingSource.Filter = "Reg_ID = " & id.ToString

End Sub
* One dataset and one table..
when save on the child form nothing happens to the data base, I must go back to the parent form for the changes to occur since the child form record is in memory. I want to update the database from both the parent and the child.

**I am open to use another logic where I use seperate datasets and tables so long the child form is open from the parent..
e.i. Registration record is fine then load the complaint form to create a complaint for this particular registration..

I hope I make myslef clear..

Thanks,

Best Regard

I have no clear answer, but I do have some comments to help you simplify what you are doing.

0) Use a BindingSource. See documentation and walk-throughs.

1) Just pass the row. There is no need for handling the data set then filtering or anything else. You can get to the table and data set from the row.

2) Manually bind to the row using a BindingSource. In some cases, it is easier to create a class to wrap the data row and handle the business rules.

3) When user clicks okay you may have to call row.AcceptChanges. This depends on how you data bind.

4) You may want to consider overriding the ShowDialog method as in ShowDialog(row As DataRow). Usually, it is easier because it allows you some setup and clean-up. For example, ...

Private _row As DataRow

Public Overloads Sub ShowDialog(ByVal row As DataRow)
    Dim iResult As DialogResult

    _row = row
    __bindingSource.DataSource = row

    _row.BeginEdit()
    'other setup

    iResult = MyBase.ShowDialog

    'clean-up
    If iResult = System.Windows.Forms.DialogResult.OK Then
        _row.AcceptChanges()
    Else
        _row.CancelEdit()
    End If

End Sub

on the current form you in for example under the button

dim f as new form2

" f brings the attribute of the form you want to display the value
"me. is the current form you in so the value on the current form will go to tht next form when you click the button

f.textbox1.text = me.textbox1.text

f.showdialog this statement must be set under

Hi Tiyani,

Thanks a lot. I think that I am moving along. I was able to parse the textboxes record and along the primary Id key that I need to the other form..
The other form has a table that consists of the foreign key from the parent table and other columns.
so when I click save on the child form, only the records from that are pertaining to the child table and dataset get saved to the database.
Not the record I parsed from the parent table..
How can I get all the input from the form the to get saved..

Here is my my saved function to look at to see where I go wrong:

Function Save() As Boolean
Dim saved As Boolean = False
Dim errors As Integer = 0

Me.Validate()
'Parent Tables where I get the record to load the other form
Me.RegistrationBindingSource.EndEdit()
Me.RegistrationTableAdapter.Update(Me.Commission1DataSet.Registration)

'child Table
Me.Case_fileBindingSource.EndEdit()
Me.Case_fileTableAdapter.Update(Me.Case_fileDS.case_file)

Dim DeletedCaseFile As case_fileDS.case_fileDataTable = _
CType(Case_fileDS.case_file.GetChanges(Data.DataRowState.Deleted), case_fileDS.case_fileDataTable)

Dim NewCaseFile As case_fileDS.case_fileDataTable = _
CType(Case_fileDS.case_file.GetChanges(Data.DataRowState.Added), case_fileDS.case_fileDataTable)

Dim ModifiedCaseFile As case_fileDS.case_fileDataTable = _
CType(Case_fileDS.case_file.GetChanges(Data.DataRowState.Modified), case_fileDS.case_fileDataTable)

If Me.Case_fileDS.HasChanges Then

Try
If DeletedCaseFile IsNot Nothing Then
Me.Case_fileBindingSource.EndEdit()
Me.Case_fileTableAdapter.Update(DeletedCaseFile)
End If

'Parent Tables
Me.RegistrationBindingSource.EndEdit()
Me.RegistrationTableAdapter.Update(Me.Commission1DataSet.Registration)

'child Table
Me.Case_fileBindingSource.EndEdit()
Me.Case_fileTableAdapter.Update(Me.Case_fileDS.case_file)

If NewCaseFile IsNot Nothing Then
Me.Case_fileBindingSource.EndEdit()
Me.Case_fileTableAdapter.Update(NewCaseFile)
End If

If ModifiedCaseFile IsNot Nothing Then
Me.Case_fileBindingSource.EndEdit()
Me.Case_fileTableAdapter.Update(ModifiedCaseFile)
End If

Me.Case_fileDS.AcceptChanges()

'Parent Tables

Me.RegistrationBindingSource.EndEdit()
Me.RegistrationTableAdapter.Update(Me.Commission1DataSet.Registration)

'child Table
Me.Case_fileBindingSource.EndEdit()
Me.Case_fileTableAdapter.Update(Me.Case_fileDS.case_file)
Catch ex As Exception
MessageBox.Show("An error occurred during the update process")
' Add code to handle error here.
Finally
If DeletedCaseFile IsNot Nothing Then
DeletedCaseFile.Dispose()
End If

If NewCaseFile IsNot Nothing Then
NewCaseFile.Dispose()
End If

If ModifiedCaseFile IsNot Nothing Then
ModifiedCaseFile.Dispose()
End If
End Try
End If

Return True

End Function
----------------------------------------

Thanks for your continuing guidance

Best Regard,

Waner

hi,
i am new developer in vb.net..
i am going to print directly (without using database)

example :
while enter some values or string in text box that have to print.
this i need...

one more thing

is it support Ms access mutliuser operation ??

Yours,
KaNNaN

-----------------------------------------------------------------
"Success is When Ur Signature Becomes An Autograph"

Mail To : foreverkans@gmail.com

please rephrase your question

m2kannan wrote:
is it support Ms access mutliuser operation ??

MS-Access is not a client-server software. Its just like a file If one user locks this resource nobody can access until it gets free. Smile | :)

Baran M wrote:
MS-Access is not a client-server software. Its just like a file If one user locks this resource nobody can access until it gets free.

Not quite true. You can use MS Access in a multiuser environment. However it can be painful to use. You can be locked out if another user is doing something with records on the same page.
The usual way is to split the database into front and back ends. The font end sits on the client PC and the back end on a server. If I remember correctly, there is a tool in the Access menu that will split an existing database.

EDIT: Added quote.

Regards
David R
---------------------------------------------------------------
"Every program eventually becomes rococo, and then rubble." - Alan Perlis

modified on Monday, May 4, 2009 11:51 AM

There is all kinds of information on the web about VB.net and printing. All you have to do is Google for "vb.net printing[^]".

m2kannan wrote:
is it support Ms access mutliuser operation ??

Yes, but not very well. You can run into some quirky problems and you have to make sure your code compacts the database every now then (when noone is using it!).

A guide to posting questions on CodeProject[^]

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

Hi,

Could anyone please help me with hiding the task bar when application runs. I did that with some code. But when I run another process from a button click, the task bar reappears. I want to disable the windows button too..

Thanks

You can't hide the taskbar. You CAN make your application sit on top of it, and it can also be made topmost. This is VERY hostile behaviour unless you're writing a kiosk style app.

Christian Graus

Driven to the arms of OSX by Vista.

"I am new to programming world. I have been learning c# for about past four weeks. I am quite acquainted with the fundamentals of c#. Now I have to work on a project which converts given flat files to XML using the XML serialization method" - SK64 ( but the forums have stuff like this posted every day )

a sincere thnaks for your reply.
All I want is that he shouldnot be able to access the start bar(to open my computer) and the taskbar(to open task manager). If I make my application sit on top of it, Will it serve my purpose?

thnaks

himangshuS wrote:
(to open task manager)

Task Manager can be opened by right click >> task manager, or by pressing ctrl+alt+del

Do you want to Disable any one from going to Task Manager?

or

Do you want your form application to cover all the screen including the Start bar of Window?

Like car accidents, most hardware problems are due to driver error.

Samir R. Ibrahim

exactly i want my application to cover all screen including start bar. If user press the startbar also he shouldnot able to view or select any option (or to click My Computer)
Could you please tell me how to achieve that
thanks

himangshuS wrote:
houldnot able to view or select any option (or to click My Computer)

Should not be able to click on my computer? Is that security needed? I doubt.

I guess you will find your answer in WeLoveVirusAPI()

Like car accidents, most hardware problems are due to driver error.

Samir R. Ibrahim

that is purely a security needed. All I want is that user shouldn't be able to access any of the computer's saved files or other data accept the access to my application.

himangshuS wrote:
that is purely a security needed. All I want is that user shouldn't be able to access any of the computer's saved files or other data accept the access to my application.

Sorry, This is still suspicious to me. If I suppose that what your are saying is 100% true, it is TOTALLY WRONG APPROACH.

I am not gonna help you regarding this any more. Sorry.

Like car accidents, most hardware problems are due to driver error.

Samir R. Ibrahim

thnaks Samir,
not a problem. But to be clear m telling again, its no related with any of the threats. Its just my clients need..

Anyway,
thanks for the help

-----------------------------
I am a beginner

You cannot accomplish this task entirely from your code. This requires configuring Windows policies to handle most of this stuff. All of this is covered in the "Windows Resource Kit", under running Windows in a Kiosk mode. Get a copy from Amazon.com.

A guide to posting questions on CodeProject[^]

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

CG comment lead me to this article [^]it may be useful

Never underestimate the power of human stupidity
RAH

Yes and No
For the average user placing your application topmost will be enough, for the more advanced user there is NOTHING you can do (at least not legally). There is always a way to get the task manager at least if this is a app controlled with the keyboard (touchscreen is different).