Finally got it after fighting with it for 3 days!!!!!
Private Sub Form_Current()
'On Error Resume Next
Dim strCaseLoginID As String
Dim varActiveDirID_FK As Variant
varActiveDirID_FK = StringFromGUID(Me.txtbx_ActiveDirID_FK)
varActiveDirID_FK = Right(varActiveDirID_FK...
Trying to figure out why DLOOKUP is not returning the GUID. The GUID displays properly in the txtbox field but DLOOKUP is not returning the GUID value.
From the VBA Editor window
?DLookup("[ActiveDirID_FK]", "Activity", "Activity_PK = " & 76)
????U???
How can I get the GUID Value??
Thanks...
I guess I was being silly.
I will have to use the COALESCE in an update statement and create a new column to put the combined result set into.
Thanks
Thanks
John Fuhrman
I need to combine 2 columns in the same DB and table. (MS SQL Server 2008 ent.)
If columnA has a value AND ColumnB isNull Then use ColumnA value
If columnB has a value AND ColumnA isNull Then use ColumnB value
If both ColumnA AND ColumnB have values then use ColumnA value
This query...
This is a general response to the running conversation.
I am familiar with the old 'Replication' feature, but to my knowledge this was supported only by using local Access DBs. This is not what I am looking for because I have an Enterprise Microsoft SQL Server that the databases will be on and...
Regretfully, All the above.
But for the most part it will be used to store new data and when the primary back-end becomes available use the new rows to perform several select statements to run a QC process.
There is also another pre-existing application that I would like to add this...
I need to create a MS Sql front end application and would like to use Access because it is what I am most familiar with. but, I need it to be able to work with data Offline. is this possible? How would I go about setting it up??
Thanks
John
Thanks
John Fuhrman
OK, this runs without any errors, but I need it to open the result set in a datasheet view.
What am I missing?
Private Sub btnOpneNatSecQuery_Click()
Dim strSQL As String
Dim dbs As DAO.Database
Dim qdf As DAO.QueryDef
Dim rst As DAO.Recordset
Set dbs = CurrentDb
strSQL = "SELECT [ID], [Login...
A straight copy and paste from the debug.print runs the query just fine.
SELECT ID, [Login ID], SEIPrint, [Start Time & Date], [Program Name], [Contact Name], [RPC Code], NatSecButton, FRCFileButton, [Digitized File], [Afile Number], Memo, Login1, [Reason for call], [Status of Activity] FROM...
Took the elapsed time portion out of the SQL just in case. But still has the same error.
SELECT
ID, [Login ID], SEIPrint, [Start Time & Date], [Program Name], [Contact Name],
[RPC Code], NatSecButton, FRCFileButton, [Digitized File], [Afile Number],
Memo, Login1, [Reason for call], [Status...
For some reason I get a Type Mismatch when compiling on the second equals of this line.
Set qdf = dbs.QueryDefs("Date Range Pending for National Security with Elapsed Time").SQL = strSQL
Thanks
John Fuhrman
Here is the SQL code for the query.
PARAMETERS StartDate DateTime, EndDate DateTime;
SELECT Activity.ID, Activity.[Login ID], Activity.SEIPrint, Activity.[Start Time & Date], ElapsedTimeString([Activity]![Start Time & Date],Now()) AS ElapsedTime, Activity.[Program Name], Activity.[Contact...
I am trying to run a query from a form with 2 date picker fields for start and end dates and having some problems.
I am getting a datatype conversion error.
Am I missing something? The parameters in the query are defined as Date/Time.
Here is the VBA code.
Private Sub...
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.