Home | Contact Us | FAQ | Search & Site Map | Link to Us
Sign In | Join | Other 45 Sites in Network
Home
Discussion GroupsFormsForms ProgrammingQueriesModules / DAO / VBAReports / PrintingMacrosDatabase DesignSecurityConversionImporting / LinkingSQL Server / ADPMultiuser / NetworkingReplicationSetup / ConfigurationDeveloper ToolkitsActiveX ControlsNew UsersGeneral 1General 2
Access DirectoryToolsTutorialsUser Groups
Related Topics
SQL ServerOther DB ProductsMS OfficeMore Topics ...

MS Access Forum / Modules / DAO / VBA / May 2008

Tip: Looking for answers? Try searching our database.

Need help with a VB script for a command button in Access 2003

Thread view: 
Enable EMail Alerts  Start New Thread
Thread rating: 
Seanwind - 24 May 2008 16:32 GMT
I’m having a little problem…
Using MS Access 2003:
I need to build an event for a Command Button, but I’m not VB savvy at all.
I’ll try to make it as literal as possible.
My database is for tracking customer incidents. [ TheDatabasemain.mdb ]
I have a form built for entering an incident for a customer. [ Form-Incident
Data ]
Now, in that form is a button to refer the incident for another department.
[ Refer to another dept ]

Above that Button is a Combo Box [ Combo41 ] which is the department the job
needs to be referred to.
__________________
Here is my algorithm:
On Click
Open a new blank - Form [ Form-Incident Data ]
Copy [value] (Customer ID) from original form to new form
Copy [value] (Date Created) from original form to new form
Copy [value] (Ticket Created By) from original form to new form
Copy [value] (Combo41) from original form to (Incident Type) in new form
Then
In the New form:
Set [value] (Level of Completion) to [(1)Received]
_______________
Any help would really be greatly appreciated.
Thanks All
Sean
pietlinden@hotmail.com - 24 May 2008 17:43 GMT
On May 24, 10:32 am, Seanwind <Seanw...@discussions.microsoft.com>
wrote:
> I’m having a little problem…
> Using MS Access 2003:
[quoted text clipped - 23 lines]
> Thanks All
> Sean

DoCmd.OpenForm "formname"
Forms!NewForm.Controls("CustomerID")=Me!CustomerID
Forms!NewForm.Controls("Date Created")=Me.Controls("Date Created")
...etc etc etc.
 
Sign In
Join
My Latest Posts
My Monitored Threads
My Blog
My Photo Gallery
My Profile
My Homepage

Start New Thread
Enable EMail Alerts
Rate this Thread



©2008 Advenet LLC   Privacy Policy - Terms of Use
This website includes both content owned or controlled by Advenet as well as content owned or controlled by third parties.