-

   rss_sql_ru_access_programming

 - e-mail

 

 -

 LiveInternet.ru:
: 16.03.2006
:
:
: 4

:


MS Access 2010: 1 ID = 1 = 1 ()

, 12 2016 . 12:25 +
!

MS Access 2010:

:
c ID ( , MS Outlook )

:
VBA ID :

:
ID = 1 = 1 ()


:

With rsEmail
.MoveFirst
Do Until rsEmail.EOF
If IsNull(.Fields(14)) = False Then
sToName = Left(.Fields(14), 7)
sSubject = "Ticket #: " & .Fields(1)
sMessageBody = ""
MailOutLook.SentOnBehalfOfName = ""

DoCmd.SendObject acSendNoObject, , , _
sToName, , , sSubject, sMessageBody, False, False

End If
.MoveNext
Loop
End With

????

!

http://www.sql.ru/forum/1209533/rassylka-pisem-iz-ms-access-2010-1-id-kontrakta-1-pismo-1-uchastnik-poluchatel


: [1] []
 

:
: 

: ( )

:

  URL