ACCESS FEED: Juli 2022

Kamis, 28 Juli 2022

Re: [MSAccessProfessionals] Send SMS from Access

Khalid,

There are two (or maybe even more) ways to send SMS/Text message from MS Access.

1 - GSM Modem - a SIM card will be needed and the recipient sees a unknown mobile number as Sender.

2 - Masked bundle SMS you buy from a carrier such as ZONG (Pakistan).

The carrier provides API that can be integrated with MS Access.

I'd recommend method #2.

Best,

Ozair

[MSAccessProfessionals] MS SQLSERVER Drivers

Again, Microsoft has messed with the ODBC driver for SQL Server connections. Read up on the latest here.
https://docs.microsoft.com/en-us/sql/connect/oledb/oledb-driver-for-sql-server?view=sql-server-ver16#3-microsoft-ole-db-driver-for-sql-server-msoledbsql
--

Regards,

Bill Mosca, Founder - MS_Access_Professionals

Microsoft Office Access MVP 2010-2016

My nothing-to-do-with-Access blog

http://wrmosca.wordpress.com

_._,_._,_

Groups.io Links:

You receive all messages sent to this group.

_._,_._,_

Re: [MSAccessProfessionals] Send SMS from Access

I haven't used it for awhile, but I used Twilio years ago. You don't need to know the carrier, but there is a small cost involved. I adapted this code:

https://www.twilio.com/blog/2013/08/twilio-from-excel-and-access.html

Paul

------ Original Message ------

From "Khalid Tanweer via groups.io" <khalidtanweerburrah=yahoo.com@groups.io>

To MSAccessProfessionals@groups.io

Date 7/28/2022 11:54:19 AM

Subject Re: [MSAccessProfessionals] Send SMS from Access

hi crystal, thanks for your reply. One thing is that I'm in Pakistan, secondly each customer may have a different carrier. I have previously in my other application did it before to send "Happy Birthday" email to members, but did not tried for sending SMS if you can help in my case and scenario i will be very much thankful.

best regards,
Khalid

Re: [MSAccessProfessionals] Send SMS from Access

hi crystal, thanks for your reply. One thing is that I'm in Pakistan, secondly each customer may have a different carrier. I have previously in my other application did it before to send "Happy Birthday" email to members, but did not tried for sending SMS if you can help in my case and scenario i will be very much thankful.

best regards,
Khalid

_._,_._,_

Groups.io Links:

You receive all messages sent to this group.

_._,_._,_

Re: [MSAccessProfessionals] Hide Box on report based on value of control

Crystal,

Perfect idea.

Thank You

Jim Wagner

From: MSAccessProfessionals@groups.io <MSAccessProfessionals@groups.io> on behalf of crystal (strive4peace) via groups.io <strive4peace2008=yahoo.com@groups.io>
Sent: Wednesday, July 27, 2022 4:49 PM
To: MSAccessProfessionals@groups.io <MSAccessProfessionals@groups.io>
Subject: Re: [MSAccessProfessionals] Hide Box on report based on value of control

hi Jim,

a TEXTbox? (if not,make it one) then instead of code ... use Conditional Formatting and Expression Is

kind regards,
crystal

msaccessgurus.com

On 7/27/2022 5:51 PM, Jim Wagner wrote:

Hello all,

I have a report with a header named GroupHeader3 that has a box in the header named boxVariance.
I am trying to hide this box if a control in the detail section is > 0 or < 0 essentially <> 0. the Name of the control is Computed difference and the Control source is VarianceCalc.

I have tried putting code in practically every event and it will not give me the results that i need.
this is the code that i finally gave up trying to adjust.

If Me![VarianceCalc] > 0 Then
    Me.GroupHeader3.Visible = True
'Else Me![VarianceCalc] = 0 Then
    Me.GroupHeader3.Visible = False
End If

I tried this as well

'If Me.[VarianceCalc].Value > 0 Then
'    boxVariance.Visible = True
''ElseIf [VarianceCalc].Value < 1 Then
''    boxVariance.Visible = False
' Else
' boxVariance.Visible = False
'End If

thank you

Jim Wagner

Re: [MSAccessProfessionals] Send SMS from Access

hi Khalid,

one sure way is to know the carrier for the phone and you can construct address in email form and then just use email ;)

If you use Outlook, here is some basic code:

sub SendEmail()
'151118 strive4peace
   on error goto Proc_Err

   Dim outApp As Object
   Dim outMsg As Object

   Set outApp = CreateObject("Outlook.Application")
   Set outMsg = outApp.CreateItem(0) '0=olMailItem

   with outMsg
      '.Importance = olImportanceHigh
       .To = sEmail
       '.CC = "cc email address"
       '.BCC = "cc email address"
        .Subject = "Your subject line"
        .Body = "Your message"
       ' .Attachments.Add sPathFile
       ' If you want to edit the message then uncomment Display and comment Send
       '.Display
        .Send
   end with

Proc_Exit:
   On Error Resume Next
   'release object variables
   Set outMsg = Nothing
   Set outApp = Nothing
   Exit Sub

Proc_Err:
   MsgBox Err.Description, , _
        "ERROR " & Err.Number _
        & "   SendEmail"

   Resume Proc_Exit
   Resume
End Sub

If you know phone number and carrier, you can construct SMS through E-Mail. For instance (this is an old list so some might be different now):

T-Mobile: phonenumber@tmomail.net
Virgin Mobile: phonenumber@vmobl.com
Cingular: phonenumber@cingularme.com
Sprint: phonenumber@messaging.sprintpcs.com
-- [10-digit phone number]@messaging.sprintpcs.com
Verizon: phonenumber@vtext.com
Nextel: phonenumber@messaging.nextel.com
Alltel: phonenumber@message.alltel.com
AT&T (formerly Cingular): phonenumber@txt.att.net
-- For multimedia messages, use [10-digit-number]@mms.att.net
Boost Mobile: phonenumber@myboostmobile.com
Cricket Wireless: phonenumber@sms.mycricket.com
--- For multimedia messages: [10-digit phone number]@mms.mycricket.com
Nextel (now part of Sprint Nextel): [10-digit telephone number]@messaging.nextel.com
Virgin Mobile USA: [10-digit phone number]@vmobl.com
Bell Canada: [10-digit-phone-number]@txt.bellmobility.ca
Centennial Wireless: [10-digit-phone-number]@cwemail.com
Cellular South: [10-digit-phone-number]@csouth1.com
Cincinnati Bell: [10-digit-phone-number]@gocbw.com
Metro PCS: [10-digit-phone-number]@mymetropcs.com or [10-digit-phone-number]@metropcs.sms.us
Qwest: [10-digit-phone-number]@qwestmp.com
Rogers: [10-digit-phone-number]@pcs.rogers.com
Suncom: [10-digit-phone-number]@tms.suncom.com
Telus: [10-digit-phone-number]@msg.telus.com
U.S. Cellular: [10-digit-phone-number]@email.uscc.net

kind regards,
crystal

On 7/28/2022 9:48 AM, Khalid Tanweer via groups.io wrote:

Hello everyone,
My client has demanded me that when an invoice is printed for any customer a thank you SMS should go to the customer and a SMS should be received by the owner of the shop containing some selected fields of that invoice. I need complete help in this regard.
I'm using Access 2019 on windows 11.
Best regards,
Khalid

[MSAccessProfessionals] Send SMS from Access

Hello everyone,
My client has demanded me that when an invoice is printed for any customer a thank you SMS should go to the customer and a SMS should be received by the owner of the shop containing some selected fields of that invoice. I need complete help in this regard.
I'm using Access 2019 on windows 11.
Best regards,
Khalid

_._,_._,_

Groups.io Links:

You receive all messages sent to this group.

_._,_._,_

Rabu, 27 Juli 2022

Re: [MSAccessProfessionals] Hide Box on report based on value of control

hi Jim,

a TEXTbox? (if not,make it one) then instead of code ... use Conditional Formatting and Expression Is

kind regards,
crystal

msaccessgurus.com

On 7/27/2022 5:51 PM, Jim Wagner wrote:

Hello all,

I have a report with a header named GroupHeader3 that has a box in the header named boxVariance.
I am trying to hide this box if a control in the detail section is > 0 or < 0 essentially <> 0. the Name of the control is Computed difference and the Control source is VarianceCalc.

I have tried putting code in practically every event and it will not give me the results that i need.
this is the code that i finally gave up trying to adjust.

If Me![VarianceCalc] > 0 Then
    Me.GroupHeader3.Visible = True
'Else Me![VarianceCalc] = 0 Then
    Me.GroupHeader3.Visible = False
End If

I tried this as well

'If Me.[VarianceCalc].Value > 0 Then
'    boxVariance.Visible = True
''ElseIf [VarianceCalc].Value < 1 Then
''    boxVariance.Visible = False
' Else
' boxVariance.Visible = False
'End If

thank you

Jim Wagner

[MSAccessProfessionals] Hide Box on report based on value of control

Hello all,

I have a report with a header named GroupHeader3 that has a box in the header named boxVariance.
I am trying to hide this box if a control in the detail section is > 0 or < 0 essentially <> 0. the Name of the control is Computed difference and the Control source is VarianceCalc.

I have tried putting code in practically every event and it will not give me the results that i need.
this is the code that i finally gave up trying to adjust.

If Me![VarianceCalc] > 0 Then
    Me.GroupHeader3.Visible = True
'Else Me![VarianceCalc] = 0 Then
    Me.GroupHeader3.Visible = False
End If

I tried this as well

'If Me.[VarianceCalc].Value > 0 Then
'    boxVariance.Visible = True
''ElseIf [VarianceCalc].Value < 1 Then
''    boxVariance.Visible = False
' Else
' boxVariance.Visible = False
'End If

thank you

Jim Wagner

_._,_._,_

Groups.io Links:

You receive all messages sent to this group.

_._,_._,_

Re: [MSAccessProfessionals] Print preview doesn't match actual print

I second Duane's advice. If the PDF is properly structured then print that.

You might want to double-check the margins. If there is a control forcing the right margin to expand it might be causing blank pages to print.

Regards,

Bill Mosca

From: MSAccessProfessionals@groups.io <MSAccessProfessionals@groups.io> On Behalf Of Duane Hookom
Sent: Wednesday, July 27, 2022 3:47 AM
To: MSAccessProfessionals@groups.io
Subject: Re: [MSAccessProfessionals] Print preview doesn't match actual print

Hi Jane,

I would print to pdf first and then print the pdf. If the pdf is always correct than it might be the printer driver. I haven't heard of an issue like this that didn't involve the data source but 150 pages is a lot.

Duane

Sent from my mobile

On Jul 27, 2022, at 5:25 AM, Jane <jcross@crossproducts.plus.com> wrote:

Hi all
I have an Access report (invoice) which displays as either 1 or 2 pages in print preview. If the user then goes to print it, it intermittently tries to print many pages (commonly 150+ before they cancel the print).
The report has a subreport at the top of each page which displays the company name/logo/ address etc. This subreport is used in other reports & no other reports have any printing problems.
If the user lets it prints, then it prints the first 1 or 2 pages correctly, but the remaining pages (before unplugging the printer) only print the contents of the subreport.
The report has been printing correctly for many years, but this issue is increasing in frequency.

Is this more likely to be a problem with the print driver or the Access report (size maybe)?

Re: [MSAccessProfessionals] Print preview doesn't match actual print

Hi Jane,

Duane

Sent from my mobile

On Jul 27, 2022, at 5:25 AM, Jane <jcross@crossproducts.plus.com> wrote:

Hi all
I have an Access report (invoice) which displays as either 1 or 2 pages in print preview. If the user then goes to print it, it intermittently tries to print many pages (commonly 150+ before they cancel the print).
The report has a subreport at the top of each page which displays the company name/logo/ address etc. This subreport is used in other reports & no other reports have any printing problems.
If the user lets it prints, then it prints the first 1 or 2 pages correctly, but the remaining pages (before unplugging the printer) only print the contents of the subreport.
The report has been printing correctly for many years, but this issue is increasing in frequency.

Is this more likely to be a problem with the print driver or the Access report (size maybe)?

[MSAccessProfessionals] Print preview doesn't match actual print

Hi all
I have an Access report (invoice) which displays as either 1 or 2 pages in print preview. If the user then goes to print it, it intermittently tries to print many pages (commonly 150+ before they cancel the print).
The report has a subreport at the top of each page which displays the company name/logo/ address etc. This subreport is used in other reports & no other reports have any printing problems.
If the user lets it prints, then it prints the first 1 or 2 pages correctly, but the remaining pages (before unplugging the printer) only print the contents of the subreport.
The report has been printing correctly for many years, but this issue is increasing in frequency.

Is this more likely to be a problem with the print driver or the Access report (size maybe)?

_._,_._,_

Groups.io Links:

You receive all messages sent to this group.

_._,_._,_

Selasa, 26 Juli 2022

Re: [MSAccessProfessionals] Latest Office update causes bug's in Access

Thank you Bill!

On Jul 26, 2022, at 2:18 PM, Bill Mosca <wrmosca@myself.com> wrote:

Hi all.MS has announced a problem with the latest update. Read this:
https://support.microsoft.com/en-us/topic/error-when-trying-to-open-an-accde-mde-file-created-in-a-different-version-of-access-f4cd36cd-549e-42ba-b75a-dfe964294a81
--

Regards,

Bill Mosca, Founder - MS_Access_Professionals

Microsoft Office Access MVP 2010-2016

My nothing-to-do-with-Access blog

http://wrmosca.wordpress.com

[Special] [MSAccessProfessionals] Latest Office update causes bug's in Access

Hi all.MS has announced a problem with the latest update. Read this:
https://support.microsoft.com/en-us/topic/error-when-trying-to-open-an-accde-mde-file-created-in-a-different-version-of-access-f4cd36cd-549e-42ba-b75a-dfe964294a81
--

Regards,

Bill Mosca, Founder - MS_Access_Professionals

Microsoft Office Access MVP 2010-2016

My nothing-to-do-with-Access blog

http://wrmosca.wordpress.com

_._,_._,_

Groups.io Links:

You receive all messages sent to this group.

_._,_._,_

Selasa, 12 Juli 2022

Re: [MSAccessProfessionals] Karenware.com soon to be closing

Thanks, Bill. I used to enjoy her occasional emails about the Power Tools and was sad to hear of her passing many years ago. She was a good programmer, and her tools were a treat to use.

James

On Jul 12, 2022, 10:58 AM -0500, Bill Mosca <wrmosca@comcast.net>, wrote:

Hi all

I just got a notification that karenware.com will soon be closing. For those of you who don't recognize that site, it has several free utilities that you might find useful. The file backup app is especially useful when you are developing Access applications. You can keep a history of versions in case you blow up the one you are working on.

Anyway, take a look at the offerings just in case you see something you might like before they go away.

Regards,
Bill Mosca,
Founder, MS_Access_Professionals

MS Access MVP 2006-2016
My Nothing-to-do-with-Access blog

https://wrmosca.wordpress.com

Re: [MSAccessProfessionals] Karenware.com soon to be closing

thanks for the heads-up, Bill!

kind regards,
crystal

On 7/12/2022 10:58 AM, Bill Mosca wrote:

Hi all

ï¿½

I just got a notification that karenware.com will soon be closing. For those of you who donï¿½t recognize that site, it has several free utilities that you might find useful. The file backup app is especially useful when you are developing Access applications. You can keep a history of versions in case you blow up the one you are working on.

ï¿½

Anyway, take a look at the offerings just in case you see something you might like before they go away.

ï¿½

Regards,
Bill Mosca,
Founder, MS_Access_Professionals

MS Access MVP 2006-2016
My Nothing-to-do-with-Access blog

https://wrmosca.wordpress.com

ï¿½

[MSAccessProfessionals] Karenware.com soon to be closing

Hi all

I just got a notification that karenware.com will soon be closing. For those of you who don’t recognize that site, it has several free utilities that you might find useful. The file backup app is especially useful when you are developing Access applications. You can keep a history of versions in case you blow up the one you are working on.

Anyway, take a look at the offerings just in case you see something you might like before they go away.

Regards,
Bill Mosca,
Founder, MS_Access_Professionals

MS Access MVP 2006-2016
My Nothing-to-do-with-Access blog

https://wrmosca.wordpress.com

Senin, 04 Juli 2022

Re: [MSAccessProfessionals] Textbox is populated with the "#NAME?" error code. after upgrading computers

hi Sara,

perhaps try the quoted text?

~~~

you don't need 3 DLookups, or even one since it appears that dFirst will work too. Try this:

=DFirst("[city] & ' ' & [state] & ' ' & Left( nz( [postalcode],''),5)","Provider")

Runtime can be picky. Sometimes you just have to give in and do things differently.

good luck

kind regards,
crystal

On 7/3/2022 9:44 PM, novice012000 wrote:

When I respond show the thread. How? I see 'show quoted text' ,but it does not include the prior posts.

Yes as I mentioned, it works for me in 2003, it is only an issue for the user running 2016 run time.

Sarah

Minggu, 03 Juli 2022

Re: [MSAccessProfessionals] Textbox is populated with the "#NAME?" error code. after upgrading computers

When I respond show the thread. How? I see 'show quoted text' ,but it does not include the prior posts.

Yes as I mentioned, it works for me in 2003, it is only an issue for the user running 2016 run time.

Sarah

_._,_._,_

Groups.io Links:

You receive all messages sent to this group.

_._,_._,_

Re: [MSAccessProfessionals] Textbox is populated with the "#NAME?" error code. after upgrading computers

hii Sarah,

I am also using 2016. I created an example table and that expression works for me even though it could be better written like this:

=DFirst("[city] & ' ' & [state] & ' ' & Left( nz( [postalcode],''),5)","Provider")

Inside the double quotes " are single quotes '

~~~

There could be something else on the form that is really causing the issue.

Since the expressions with multiple DLookups are resulting in the error, perhaps rewrite them to be like the above? NZ shouldn't be necessary if there is data, but I find that when using a function that needs a string like Left, it behaves better.

~~~

> "The BE and FE are both in Access 2003. The user is using Access 2016 run time."

does it work ok for YOU? Is it just this user who is having an issue? Runtime can do quirky things, and I can't test it

~~~

please, when you respond, choose to keep previous message
so we don't lose what has already been written, thanks

kind regards,
crystal

On 7/3/2022 6:22 PM, novice012000 wrote:

I added Option Explicit and compiled. There are no errors and no missing References

Example of text box that works:
=DLookUp("[name]","Provider","")

Example of text box that does not work:
=DLookUp("[city]","Provider","") & " " & DLookUp("[state]","Provider","") & " " & Left$(DLookUp("[postalcode]","Provider",""),5)

All text boxes that are comprised of more than one input field are resulting in #Name? error in Access 2016.

The BE and FE are both in Access 2003. The user is using Access 2016 run time.

Sarah

Re: [MSAccessProfessionals] Textbox is populated with the "#NAME?" error code. after upgrading computers

I added Option Explicit and compiled. There are no errors and no missing References

Example of text box that works:
=DLookUp("[name]","Provider","")

Example of text box that does not work:
=DLookUp("[city]","Provider","") & " " & DLookUp("[state]","Provider","") & " " & Left$(DLookUp("[postalcode]","Provider",""),5)

All text boxes that are comprised of more than one input field are resulting in #Name? error in Access 2016.

The BE and FE are both in Access 2003. The user is using Access 2016 run time.

Sarah

_._,_._,_

Groups.io Links:

You receive all messages sent to this group.

_._,_._,_

Re: [MSAccessProfessionals] Textbox is populated with the "#NAME?" error code. after upgrading computers

correction, to add a space after the comma ...

=[Last Name] & ", " & [First Name]

Not sure if it is apparent, but & must have at least one space before and after. If field names have a space or special character in them other than underscore, they generally need to be enclosed in [square brackets]

~crystal

On 7/1/2022 9:55 PM, crystal (strive4peace) via groups.io wrote:

hi Sarah,

please give an actual example. for instance, this:
Last Name&","&First Name

should be:
=[Last Name] & "," & [First Name]

~~~~~~~~~ Compile ~~~~~~~~~

Whenever you change code, references, or switch versions or operating environment, or modify objects with code behind them, you should always compile and save before executing any code.

from the menu in a VBE (module) window: [b]Debug, Compile[/b] [the name of your project]
(Alt-F11 to switch to the code window)

Fix any errors on the highlighted lines.
Add needed references, remove unnecessary references, resolve missing references
(from the menu: Tools, References...)

keep compiling until nothing happens (this is good!) -- then Save

also be sure, before compiling, to use Option Explicit at the very TOP of each module so variables that are not declared or are misspelled will be picked up by the compiler as well as many other errors than can be fixed before running.

~~~~~~~~~ Add Option Explicit ~~~~~~~~~

if the top of your module does not have a statement that says Option Explicit, then add this:

Option Explicit ' require variable declaration

If this was not done when the code was written, you will may need to DIM some variables -- it is best to do that anyway

kind regards,
crystal

On 6/30/2022 9:58 PM, novice012000 wrote:

The path to the BE has not changed. the '#name?' error happens in text boxes where the data is a combination of multiple fields: EG Last Name&","&First Name. Or City&state&zip. Maybe the length of the combined text is a problem?

How do I compile the database in the environment with the issue, if that envrionment only has access run time?

Sarah

Jumat, 01 Juli 2022

Re: [MSAccessProfessionals] Textbox is populated with the "#NAME?" error code. after upgrading computers

hi Sarah,

please give an actual example. for instance, this:
Last Name&","&First Name

should be:
=[Last Name] & "," & [First Name]

~~~~~~~~~ Compile ~~~~~~~~~

Whenever you change code, references, or switch versions or operating environment, or modify objects with code behind them, you should always compile and save before executing any code.

from the menu in a VBE (module) window: [b]Debug, Compile[/b] [the name of your project]
(Alt-F11 to switch to the code window)

Fix any errors on the highlighted lines.
Add needed references, remove unnecessary references, resolve missing references
(from the menu: Tools, References...)

keep compiling until nothing happens (this is good!) -- then Save

also be sure, before compiling, to use Option Explicit at the very TOP of each module so variables that are not declared or are misspelled will be picked up by the compiler as well as many other errors than can be fixed before running.

~~~~~~~~~ Add Option Explicit ~~~~~~~~~

if the top of your module does not have a statement that says Option Explicit, then add this:

Option Explicit ' require variable declaration

If this was not done when the code was written, you will may need to DIM some variables -- it is best to do that anyway

kind regards,
crystal

On 6/30/2022 9:58 PM, novice012000 wrote:

The path to the BE has not changed. the '#name?' error happens in text boxes where the data is a combination of multiple fields: EG Last Name&","&First Name. Or City&state&zip. Maybe the length of the combined text is a problem?

How do I compile the database in the environment with the issue, if that envrionment only has access run time?

Sarah