Article View: pl.comp.bazy-danych.msaccess
Article #137808Re: Czy wystarczy # VBA7 PtrSafe czy coś jeszcze zmieniać?
From: Zbigniew Bratko
Date: Wed, 19 Aug 2020 08:21
Date: Wed, 19 Aug 2020 08:21
33 lines
2110 bytes
2110 bytes
W dniu 19.08.2020 o 08:09, Maciej Franciszkowski pisze: > #If VBA7 Then > > Private Const LOCALE_USER_DEFAULT As Long = &H400 > Private Const LOCALE_SDECIMAL As Long = &HE > Private Declare PtrSafe Function GetLocaleInfo Lib "kernel32" _ > Alias "GetLocaleInfoA" _ > (ByVal Locale As Long, _ > ByVal LCType As Long, _ > ByVal lpLCData As String, _ > ByVal cchData As Long) As Long > > #Else > > Private Const LOCALE_USER_DEFAULT As Long = &H400 > Private Const LOCALE_SDECIMAL As Long = &HE > Private Declare Function GetLocaleInfo Lib "kernel32" _ > Alias "GetLocaleInfoA" _ > (ByVal Locale As Long, _ > ByVal LCType As Long, _ > ByVal lpLCData As String, _ > ByVal cchData As Long) As Long > > #End If Moim zdaniem nic nie trzeba zmieniać. I w VBA i VBA7 zwraca u mnie "," -- Pozdrawiam Zbigniew Bratko
Technical Details
Message-ID:
<5f3ce107$0$543$65785112@news.neostrada.pl>Path:
mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.icm.edu.pl!newsfeed.pionier.net.pl!3.eu.feeder.erje.net!2.eu.feeder.erje.net!feeder.erje.net!news.uzoreto.com!aioe.org!peer03.ams4!peer.am4.highwinds-media.com!news.highwinds-media.com!newsfeed.neostrada.pl!unt-exc-01.news.neostrada.pl!unt-spo-a-01.news.neostrada.pl!news.neostrada.pl.POSTED!not-for-mailReferences:
<26ffccfe-90ce-4a9c-b83d-9ea65e07f30en@googlegroups.com>Show Full Headers
Complete Article Headers
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.icm.edu.pl!newsfeed.pionier.net.pl!3.eu.feeder.erje.net!2.eu.feeder.erje.net!feeder.erje.net!news.uzoreto.com!aioe.org!peer03.ams4!peer.am4.highwinds-media.com!news.highwinds-media.com!newsfeed.neostrada.pl!unt-exc-01.news.neostrada.pl!unt-spo-a-01.news.neostrada.pl!news.neostrada.pl.POSTED!not-for-mail Subject: Re: Czy wystarczy # VBA7 PtrSafe czy coś jeszcze zmieniać? Newsgroups: pl.comp.bazy-danych.msaccess References: <26ffccfe-90ce-4a9c-b83d-9ea65e07f30en@googlegroups.com> From: Zbigniew Bratko <adminBEZTEGO@accdb.pl> Date: Wed, 19 Aug 2020 10:21:21 +0200 User-Agent: Mozilla/5.0 (Windows NT 10.0; WOW64; rv:68.0) Gecko/20100101 Thunderbird/68.11.0 MIME-Version: 1.0 In-Reply-To: <26ffccfe-90ce-4a9c-b83d-9ea65e07f30en@googlegroups.com> Lines: 59 Message-ID: <5f3ce107$0$543$65785112@news.neostrada.pl> Organization: Telekomunikacja Polska NNTP-Posting-Host: 37.248.158.74 X-Trace: 1597825287 unt-rea-a-02.news.neostrada.pl 543 37.248.158.74:37186 X-Complaints-To: abuse@news.neostrada.pl X-Received-Bytes: 2498 X-Received-Body-CRC: 3429949840 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit