Search results

No, I am getting a number from a web page and copying it, then pasting it to the forms telephone number field. I was hoping that there would be a simple anser for this, but perhaps I need to have an unbound field, to which I copy the formatted telephone number then when I do something like...

I have been trying to figure out a way to copy a telephone number that is usually in the format (800)-555-1212 into a form. The form is formatted for telephone numbers so the input mask is (???)-???-????. Right now when I copy the number to the telephone control it only pastes the area code...

Finally figured out that this will parse the first word of a string and not throw the error message. Org: IIf(InStr([Organization]," "),Left([Organization],InStr([Organization]," ")-1),[Organization]) Going to see if MajP's suggestion applies to me. But not tonight.

Trimming won't work. Trying to see if there is for example, Bob's Burger Barn and Bob's Burgers or Bob's Barn.

I want to compare two large lists where the Organization name is the same. Unfortunately the names may not be exactly the same thus I am attempting to parse the first word in each list against the other. Thus I thought if I could get the first word in a string that I could at least determine if...

Thank you for all your replies and suggestions. The only reason that I thought about this is that sooner or later I will give up my assistance to the users of the DBs and didn't want to burden them with unnecessary coding. Like me, early binding was easy to figure out. You just added the...

Yes, that is why I had to use late binding foe a while. Now testing all the code to make sure all,is ok 2hen I added b@ck the old references.

Thank you

When all the computers at work were upgraded to Windows 10 and Office 365 and I still had my old machine with Office 2010 at home where I do my coding, I had to start using late binding because of some issues with Office 2010 programs; not all of the computers at work were changed over to the...

Got it! Alt least if does what I want it to do. Dim dbs As Object Dim rst As Object Dim lngPK As Long Dim booValueFound As Boolean 'booValueFound = False lngPK = Me.NumberID Set dbs = CurrentDb 'Set rst = dbs.OpenRecordset("qryNewNamesSequential") Set rst = dbs.OpenRecordset("tblNewNames")...

I think I almost have it except for one glaring error. The following will open the next sequential record that exists but unfortunately doesn't stop there. It gets hung up and seems to be in an endless loop. (Both the table and the query result in the same thing – either one will give me the...

I have the following code to search for a record based on its record number. What I want to do is modify the code so that if a certain number is not found I want to open the next sequential record. I.e. if record number 80 is not found, then open the next record in sequence which may be 85. (I...

Thank you. I knew it was something simple but I was brain dead for a while.

I tried to modify the code found on BaldyWeb that opens a record set and includes all the records. So far I have gotten to this but nothing happens. I definitely have records where the Organization name begins with B. If I could get this to work then I could use a letter picker to change the B...

Thank you. However when I debug, the term Private Const throws this error message: "Compile Error, Invalid Attribute in Sub or Function"

I am getting the error message, Compile Error, Variable not Defined as follows: (shown in red) config.fields(cdoSendUsingMethod).Value = cdoSendUsingPort config.fields(cdoSMTPServer).Value = "smtp.gmail.com" config.fields(cdoSMTPServerPort).Value = 465 config.fields(cdoSMTPUseSSL).Value =...

Forgot to include this.

My wife has been after me to get a new bridge for our Koi pond/stream and today I ordered one from Wayfair. About an hour later she told me that she found a bridge that would fit nicely and I should order it. It appeared as an unsolicited ad on her Face Book feed. It was the same exact bridge...

No, mine slightly different. I tried this but as I am using late binding many lines of the above code say that I have not defined. These are: config.fields(cdoSendUsingMethod).Value = cdoSendUsingPort config.fields(cdoSMTPServer).Value = "smtp.gmail.com"...

OK, I will look at the App password thing again, but it looked too complicated for me.