[AccessD] right clean after a specific character
kost36 at gmail.com
kost36 at gmail.com
Sat Dec 31 05:36:26 CST 2022
Thank's Stuart,
Will try it
-----Original Message-----
From: AccessD <accessd-bounces+kost36=gmail.com at databaseadvisors.com> On
Behalf Of Stuart McLachlan
Sent: Saturday, December 31, 2022 11:24 AM
To: Access Developers discussion and problem solving
<accessd at databaseadvisors.com>
Subject: Re: [AccessD] right clean after a specific character
You are better off parsing things like that based on the content rather than
hard coded
positions. Something like this:
Function MTitle(strHTML as string) As String
Dim strHTML As String
Dim lngStart As Long, lngEnd As Long
lngStart = InStr(strHTML, "</td><td><b>") + 12
lngEnd = InStr(lngStart, strHTML, "</b>")
MTitle = Mid$(strHTML, lngStart, lngEnd - lngStart)
End Function
On 31 Dec 2022 at 9:25, kost36 at gmail.com wrote:
> HI all,
> In a field there are strings like
> <table cellpadding="8"><tbody><tr><td><img
> src="./images/posters/1334.jpg" width= "80"
> height="130"></td><td><b>Movie title</b><br><b>.....some other
> characters What I need is to get only the movie title I use
> Mid$([title];113 for the left side but how to clean all the right
> characters after the movie title? Thank's I wish a Happy New Year to
> all of you from Chania, Crete, Greece /kostas konstantinidis
>
>
> --
> AccessD mailing list
> AccessD at databaseadvisors.com
> https://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com
>
--
AccessD mailing list
AccessD at databaseadvisors.com
https://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com
More information about the AccessD
mailing list