Recent content by eme126

This is the code I tried: Option Compare Database Option Explicit Dim mstrFormToSearch As String Private Sub cmdFind_Click() Static strLastFind As String Dim ctlFocus As Access.Control Dim strTemp As String Dim I As Integer Dim strSQL As String Dim oSQL As...

After I change ControlSource to Caption, it gives me an error here: DoCmd.FindRecord _ Me.TxtFindWhat.Value, _ acAnywhere, _ False, _ acSearchAll, _ False, _ acAll, _ True Why?? :( help

Hello all, Does anyone know how I can make this code search the captions instead of the Control Sources: :confused: Option Compare Database Option Explicit Dim mstrFormToSearch As String Private Sub cmdFind_Click() Static strLastFind As String Dim ctlFocus As...

Hello, The current database I am working on I made it by copying the one I was working on originally. I just realized on the VB window that there is still some relation between them. Because, if I look at the tree on the left of the code window I see it says "GCB (miniGCB)", being GCB the one I...

Is it possible to make my Splash screen invisible after someone checked the "Do not show me this screen again" just while that current session? Is there a way of using flags and a system table or query that would allow me to do so? Thank you:)

Yup yup :)

does anyone know the command to make something invisible, undisplayable, not showing??

I liked your If...then idea :)

So, I could not see how to make the page disappear after I have checked and clicked?

Hello all, I have this splash screen, which welcomes all the users. It has an OK command button that exits the screen, and a checkbox that says "Do not show this screen again". I still do not have the code behind the checkbox. Thus I was wondering if there is a way where I could entirelly close...

Thank you :)

:( It says that to get rid of a "type mismatch" error I should add the DAO.lib. But I already had it and I always got the error. Set oSQL = "SELECT * FROM TableInfo WHERE Caption Like '" & strTarget & "'* " The last ampersand is the type mismatch.

Should I put it in between quotations?

Thanks. Now, it is telling me know that the last ampersand is a "type mismatch"

Why is it telling me there is a type mismatch on the oSQl definition: Dim oSQL As QueryDef Set oSQL = "SELECT * FROM TableInfo WHERE Caption Like & strTarget & '*'" Set oResults = oSQL.Execute Me.Controls(oResults.Fields("Name").Value).SetFocus