Comment trouver des mots dans un champ Mémo avec accès Microsoft

Question

Ceci est plus complexe que je pensais que j'ai besoin de le faire avec VBA. Donc, voici mon problème: -

J'ai deux tables dans un MS Access DB, le contenu et les adjectifs.

La table de contenu comporte plus de 5 000 lignes de fragments de texte dans un champ Mémo (contenu) et un champ de texte vide (adjectif). La table des adjectifs a 120 adjectifs avec le champ (adjectif).

Je dois vérifier si l'extrait de texte contient l'un des adjectifs et, dans l'affirmative, ajouter l'adjectif au champ d'adjectif. S'il y a plus d'un adjectif, ajoutez le premier.

Voici un exemple des données: -

CONTENU

« La caméra N8 est assez étonnant, va l'amener le N8 complet sur le succès des ventes si seule C'est le seul? « Facteur wow » du combiné, mais d'autres combinés ont 720p qui sont également très bons, comme le Sony Vivaz dont un membre de la famille a et les vidéos sont assez étonnantes à partir de lui aussi. "

ADJECTIVES

peur
agréable
amusée
ancienne
étonnante
colère
ennuyé
anxieuse
arrogante
honte
moyenne
terrible
mauvaise
belle
etc

Comment pourrais-je aller sur le faire est une requête de mise à jour ou en VBA?

Merci d'avance pour votre aide.

Jonathan

Answer 1

Peut-être:

SELECT a.Adjectives, b.Content 
FROM A, B 
WHERE b.Content Like "*" & a.[adjectives] & "*" 

Pour mettre à jour une troisième table:

INSERT INTO C (ContentID, ContentAdjective) 
SELECT b.ID, a.Adjectives 
FROM A, B 
WHERE b.Content Like "*" & a.[adjectives] & "*"