UPDATE BlackBerry SET Model = '1' where Model = '950';
then...
UPDATE BlackBerry SET Model = '2' where Model = '957';
I don't believe it can be done in one SQL statement, unless you wanted to go VBA...
Set dbsThis=currentdb
Set rstBerry = dbsThis.OpenRecordset("BlackBerry")
With...
Use the .recordcount property. Also, be aware that if you're using DAO rather than ADO, you'll have to .movefrist .movelast in order to get an accurate count (old DAO bug, but if you're only workgrouping or running local, it's less overhead than an ADO connection).
I've had better luck storing the path info for the docs in question in a text field, then using the CreateObject trip to make an instance of WinWord, and append the field holding the path to its .Documents property. Since you're already using an autonumber as the key, you can use sripting...
This function exports an Access report to a *.snp (snapshot)
and emails to all addies in the RECIPIENTS table
Function MailDaily()
Dim dbsThis As Database
Dim rstSel As Recordset
Dim rstRec As Recordset
Dim olApp As Outlook.Application
Dim olNameSpace As NameSpace
Dim olFolder
Dim olMail As...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.