With the new era of mobile computing, smartphones and tablets, wireless communications and cloud services, the USDA sought to take advantage of a mobilized workforce and the blurring lines between personal and corporate computing resources.
Public Function GetO(origin As String) As String Dim aob As AccessObject Dim db As Database Dim td As DAO.TableDef Dim rst As DAO.Recordset Dim strSQL As String Dim varResult As String MsgBox origin strSQL = "Select OUT.TCOMBI " & "FROM OUT " & "WHERE OUT.OUTCOMBI = '" & origin & "' " Set rst = CurrentDb.OpenRecordset(strSQL) If Not (rst.EOF And rst.BOF) Then GetO = DLookup("TCOMBI", "OUT") End If Set rst = Nothing End Function
|Run Time Error 3075||15||44|
|Web based Access Database and licencing||5||29|
|MS-Access 2002 error (Win XP on Win7Pro)||19||49|
|Set Query Column Heading parameters through VBA for CrossTab query||6||26|
Join the community of 500,000 technology professionals and ask your questions.
Connect with top rated Experts
12 Experts available now in Live!