Search results for query: *

Thanx Roy.... Forms![Enquirer].Form![Quotation].Form![Work_Quotes].Form.Refresh provided the solution!! [cheers] to all else who contributed to this thread!!

Hi PHV.... Tried your code but still getting an error message...pls instruct. [cheers]

Thanks Bob, Quotation is a subform on Enquirer....and Work Quotes is a subform on Quotation. So not quite sure how to apply the above rules you surgested. Pls instruct and have patience with this novice programmer! [cheers]

Hi Guys, Tried to Refresh a Form using the following module code; Forms![Enquirer].Form![Quotation].Form![Work_Quotes].Refresh This generated the following error message; Object does not support this property or method. Changed the code to include brackets, resulting in the following...

4got to add; The Control Source for 'Combo30' is 'Client_Id' Thanx for ur tyme [cheers]

Hi, Thats where i have put the code Sorry...didn't past the first line of code intially; Private Sub Combo30_BeforeUpdate(Cancel As Integer) Dim strSQL As String, ans As Integer, astr As String If IsNull(Me.Client_Id) Then Exit Sub Else ans = MsgBox("You are about to change an existing...

Sorry.... Combo30 is the combo box....the value is stored in Client_Id. If the user changes the text value in Combo30, the value in Client_Id will change also. What I'm trying to do is prompt the user before they make such a change. However, its seems that the BeforeUpdate event only runs...

Thanx 4 that Ken, Tried the code including the Cancel = True...however, it does not roll back the combo value to its original value. Any suggestions?? [cheers] again

Hi Guys, Does anybody know the code for canceling a change made using a combo box. I would like a message to appear before the Update. If the user opts for 'Yes' then the change should be registered. If the user selects 'No', the combo value should 'roll back' to its original value. Tried...

Thanks Ken Had already looked in there and the only thing I could find which nearly did waht i require is vbPropercase. Only problem with this is that it converts the 1st letter of each word in the string to UpperCase i.e. The Dog Is Black. The Cat Is Brown. as opposed to converting just the...

Hi Guys, Trying to take a memo string input and convert it into Sentence Case i.e. the dog is black. the cat is brown. > The dog is black. The cat is brown. Looked through the archives, but can't seem to find anything...any suggestions?? [cheers]

Thanx Danvlas...that code did the trick. Posting u a star. Also posting u a star Nice, for sticking with me on this one. [cheers] again guys

Hi Guys, Nice - tried ur suggestion...the MsgBox returns '4', even though the underlying query actually returns 'no records' (I re-checked this). The query consist of 3 fields; Enquiry_Id - criteria is et to return only the records that relate to a specific Enquiry Count_of_Order - Expression...

Thanks again Nice.... Tried ur surgestion...the MsgBox opens with the number '512', after which the blank form is opened. Tried to change query name to 'Enquiry_Orders' but get following error message 'Invalid SQL Statement; expected 'DELETE','INSERT','PROCEDURE','SELECT', or 'UPDATE' in...

Hi Nice, Thanks for that....have carried out as instructed in ur thread, but the form still seems to open...used the following code; Dim myQuery As New ADODB.Recordset myQuery.Open "Enquiry Orders", CurrentProject.Connection, adOpenKeyset If myQuery.RecordCount = 0 Then Cancel = 1 End If...

Hi Guys, Would appreciate any advise for the following scenario; I have a form (Form1) that gets its recordsource from a Query (Query1). If Query1 returns no data, Form1 opens blank. What I am trying to do is stop Form1 opening if their is No Data in Query1...I know this can be donw through...

Hey AceMan and hneal98...thanx for your guidance thus far. Have tried to adjust hneals' code to my requirements and have come out with the following; Private Sub Form_Current() Dim Criteria As String 'This is the argument to the FindFirst Method. Dim MyRS As Recordset 'Recordset used...

Hi Guys, Ok...this problem looks like it might be harder to xplain than it may actually be to solve it, so pls bear with me. I have a FrmEnquiry on a tab page. Related to it, and on the 2nd tab page is FrmQuotation. Now, one Enquiry can have many Quotations associated with it(i.e Client may...

Thanks guys....one slight prob though...each time i run the code i only seem to be getting |symbol??? Any one know why??? [cheers] again

Hi Guys, I am using the following code to increment numbers; Set dbs = CurrentDb Set rst = dbs.OpenRecordset("SELECT [Sequence_No] FROM Quote_Number") rst.MoveFirst With rst 'Edit recordset object .Edit...