Search results for query: *

Randy , Thanks for the post! I combined the 2 pieces of code ok, but decided to use the MS WebBrowser activeX module instead. Do you know how I can add my variables ...? ----------------------------------------- Private Sub txtMap_Click() Dim strPrefix As String, strAddress As String...

I would like to combine this code (which was listed above) --------------------------------- Shell "c:\program files\internet explorer\iexplore.exe www.yahoo.com", vbMaximizedFocus --------------------------------- with my code listed below: -------------------------- Private Sub txtMap_Click()...

Thanks to all, gbs01

on the vbCrLf , how did you know to enter it twice? I checked out the F1 & F2, but it doesn't mention that. Thanks for the help.. gbs01

Oh my Gosh, That did the trick! Where do you guys get all of this information? Books? Instructors? Thanks again, gbs01

That did the trick except adding the blank line between the new & the old. I moved the vbCrLf around but no good. jlig

PHV, You are amazing! To further fine tune this.... 1) How do I make the username in all CAPS? 2) How do I make it add one blank line below the notes, or just add a cr/lf/enter at the end of the txtNotes? This would keep the new text from running with the old. Thanks again!

Thanks for the kind post. I get run-time error 2185 : You can't reference a property or method for a control unless the control has the focus. The debugger stops on : Me.txtNotes.Text = sNote It seems like it doesn't like my txtNotes field? thanks, jlig

I have a form with the following fields: --------- - AcctNum - txtAppendField - btnAppend - txtNotes --------- Here's what I need to be able to do: 1) Have user type in comments/notes into the AppendField, 2) Then click the btnAppend button & have the text added to the top of the txtNotes. 3)...

One more question, on refreshing the data in my form. Once my module finishes the update, all fields say #deleted# so I have to close the form & reopen. I inserted this into the bottom of the code, -------------------------- DoCmd.Close acForm, "frmSelectGradientFillDirection" DoCmd.Open...

PHV, You must live & breathe this forum. Thanks for the quick response. It did the trick. Much gratitude, jlig

Here is the code in my Module: ----------------------------- Function Appaoo() On Error GoTo Appaoo_Err DoCmd.SetWarnings False 'Step 1) Delete old records in each table '***************************************** DoCmd.OpenQuery "qryDelRectblANI", acNormal, acEdit DoCmd.OpenQuery...

Here is my code behind a command button: ------------------------------ Private Sub Command96_Click() Dim X As Variant X = InputBox("Please enter password to open this form:", "PASSWORD Prompt") If X = "5491632" Then DoCmd.OpenModule Module1.Appaoo Else MsgBox ("Sorry, you cannot update...

I know this is simple but I'm unclear how to.... ---------------------------- Have the following 2 tables: ------------------------------ tblBusinessAgreement BusinessID BusinessName FeatureID (linked to tblFeatures) tblFeatures ------------------------------ FeatureID...

Aceman, Thanks for looking over my code & jogging my memory. The problem is now fixed! I originally had tblCust with ACCT as Decimal & Primary Key. I went back to that table & added the field ID, as AutoNumber & made it the Primary Key. It seems that the Look-Up wizard in my form lookup didn't...

Row Source ----------- SELECT tblcust.acct, tblcust.name1, tblcust.add1, tblcust.phone1 FROM tblcust WHERE (((tblcust.acct) Like "*" & [Forms]![frmModelSearch]![txtSearch2] & "*")) OR (((tblcust.name1) Like "*" & [Forms]![frmModelSearch]![txtSearch2] & "*")) OR (((tblcust.add1) Like "*" &...

I'm using this sample database called: ---------------------- search multiple fields.zip ---------------------- http://www.access-programmers.co.uk/forums/attachment.php?attachmentid=7315 It allows a user to type in any piece of info about your customer & then open your main customer form with...

I have the following code behind the DblClick on frmSearch: -------------------------------------------------------- Private Sub SearchList_DblClick(Cancel As Integer) On Error GoTo Err_SearchList_DblClick Dim db As DAO.Database Dim rst As DAO.Recordset DoCmd.OpenForm "frmMainCustomerWTabbed"...

LimitToList : No AutoExpand : Yes

Thanks PHV, I tried it but it works same as before. I think these properties have something to do with the problem: Combo23 Properties: ------------------- Row Source Type : Table/Query Row Source : SELECT tblCust.name1 FROM tblCust ORDER BY tblCust.name1; Column Count : 1 Bound...