Анализ текста из поля MS Access memo

У меня есть memo-поле MS Access 2013, которое я использую для хранения текстовых версий . Вот пример:Анализ текста из поля MS Access memo

From: Simon Smith 
To: Bob Brown 
Date: 5/4/15 2:30PM 
Subject: Draft Report 

Please find attached the draft report as discussed.

Я хочу, чтобы извлечь данные (т.е. «Проект отчета») от электронной почты поле «Тема:» из поля мемо в текстовое поле на форме MS Access.

Может ли кто-нибудь помочь?

Thankyou GM

источник

2015-05-31 georgemackenzie

В своих исследованиях по этому вопросу вы пришли по понятиям (1) с помощью пользовательской функции (написанный на VBA) в запросе доступа, (2) с помощью функции InStr(), чтобы найти текст в string, (3) используя функцию Mid() для извлечения части строки? –

Спасибо за ваш совет Горд. Я работал над использованием InStr и Mid :-) – georgemackenzie

Ok. Я понял это с помощью Instr и Mid. Благодарю за ваше предложение Горд. Я уверен, что есть лучший способ сделать это, но он работает!

Dim strStart As String 
Dim strEnd As String 

' figure out where the string starts 
strStart = InStr(Me.EmailMemo, "Subject:") + 9 

' figure out where the line ends by looking for a carriage return 
strEnd = InStr(strStart, Me.EmailMemo, Chr(10)) 

' display the string 
Me.EmailTitle = Mid(Me.EmailMemo, strStart, strEnd - strStart)

источник

2015-06-01 02:28:20 georgemackenzie

Анализ текста из поля MS Access memo

ответ

Смежные вопросы