President Biden is expected to publish executive order concerning new agreement on EU-U.S. data flows per Oct. 3. It covers legal protections over personal data access and use by U.S. national security entities. EC ratification could take 6 months. #GDPR https://t.co/PQ8GF2JZEf
27 Sep 2022
Happy 4th anniversary #GDPR #EuropeanUnion @EU_EDPB @toezicht_AP Indeed a strong and swift enforcement by #supervisory #authorities is crucial so companies do invest to protect #personaldata and reduce the risk of #dataleaks https://t.co/oGcBzb4hfV
25 May 2022
The #EDPB adopted #European harmonisation of #privacy #fines. The guidelines also include harmonised ‘starting points’ for the calculation of a fine. 3 elements considered: the categorisation of infringements by nature, infringement seriousness and the worldwide turnover. #GDPR https://t.co/E7L7Z0wV6X
17 May 2022
@ charanzova: 23 Apr 2022
@ vestager: 23 Apr 2022
Display creation date of Twitter tweetsTim Acheson provides a free ASPtwitter library to display authenticated tweets. You can get it here : http://WWW.timacheson.com/Blog/2013/jun/asptwitter. This library exposes but does not show the creation date of the tweets. To format the tweet creation date I have written the following function, that I publish on request:
Function funcConvertDate(strDate) ' function to retrieve only wanted bits of the strDate ' (C)Copyright 2013 - 2022 by J.P.G. van Soest [www.vanSoest.it] ' input string containing a date format e.g. "Tue Jul 16 08:13:59 +0000 2013" ' Output "16 Jul 2013" funcConvertDate = Mid(strDate,9,3) & Mid(strDate,4,5) & Right(strDate,4) End Function
Tweet date: <%= funcConvertDate(oTweet.created_at) %>
Update the ASPtwitter library so it also shows https links.Change the regex Pattern code in the function URLsBecomeLinks so it resembles the code below.
Function URLsBecomeLinks(sText) ' Wrap URLs in text with HTML link anchor tags. Dim objRegExp Set objRegExp = New RegExp ' objRegExp.Pattern = "(http://[^\s<]*)"]*)" ' *** Original did not do https:// objRegExp.Pattern = "(https?://[^\s<]*)" ' *** changed 11-05-2015 Johan van Soest objRegExp.Global = True objRegExp.ignorecase = True UrlsBecomeLinks = "" & objRegExp.Replace(sText, "<a href=""$1"" target=""_blank"">$1</a>") Set objRegExp = Nothing End Function
You may vote your opinion about this article:
Scripts and programming examples disclaimerUnless stated otherwise, the script sources and programming examples provided are copyrighted freeware. You may modify them, as long as a reference to the original code and hyperlink to the source page is included in the modified code and documentation. However, it is not allowed to publish (copies of) scripts and programming examples on your own site, blog, vlog, or distribute them on paper or any other medium, without prior written consent.
Many of the techniques used in these scripts, including but not limited to modifying the registry or system files and settings, impose a risk of rendering the Operating System inoperable and loss of data. Make sure you have verified full backups and the associated restore software available before running any script or programming example. Use these scripts and programming examples entirely at your own risk. All liability claims against the author in relation to material or non-material losses caused by the use, misuse or non-use of the information provided, or the use of incorrect or incomplete information, are excluded. All content is subject to change and provided without obligation.