Search results

Have a look at the following... http://www.worthytips.com/12935/control-status-bar-information.html

Sorry...add the kill line below... Dim dbPath As String Dim OldDbName As String Dim NewDbName As String Dim DbBackup As String Dim Response As Integer Dim fs As Object dbPath = Application.CurrentProject.Path OldDbName = "OldDatabaseName.mdb" NewDbName = "BackUp" & "_" & Format(Date, "yyddmm")...

Sure... Dim OldDbName As String Dim NewDbName As String Dim DbBackup As String Dim Response As Integer Dim fs As Object 'Get current path of the database currently open dbPath = Application.CurrentProject.Path 'Current database name OldDbName = "OldDatabaseName.mdb" 'Creates the new name of...

Try the following: Dim dbPath As String Dim OldDbName As String Dim NewDbName As String Dim DbBackup As String Dim Response As Integer Dim fs As Object dbPath = Application.CurrentProject.Path OldDbName = "OldDatabaseName.mdb" NewDbName = "BackUp" & "_" & Format(Date, "yyddmm") & ".mdb"...

I am assuming you are using the Active X Calendar Control. Is so, try changing the DayFont property of the control. Then resize the calendar to incorporate the larger font size.

Not sure why you need to close the first form, but here is the code to open the second form to your record: Dim stDocName As String Dim stLinkCriteria As Variant stDocName = "F_Project_Summary" stLinkCriteria = Forms!F_Project_Summary_Index!Job_No DoCmd.OpenForm stDocName, , , stLinkCriteria

Have a look at the following example. You'll need to manipulate the code to search each table individually, but this should get you started in the right direction. A sample database is included from John Big Booty...

See Microsofts site http://learn.iis.net/

See the following: Lebans Paint Program

If you are replacing the existing table, just click on it and hit DELETE. However, I would rename it and then link in the new table (just in case you need to reverse what you are about to do) or make a back-up copy before you proceed.

Pair it with Chr(13)... Left([Full Question],InStr(1,[Full Question]," ")) & Chr(13) & Chr(10) & Trim(Mid([Full Question],InStr(1,[Full Question]," ")))

Do a search on the "instr()" function. That should get you moving in the right direction.

In case anyone wants the code....this will extract out the date from a file name (ex: EXT_EXTIMPORT_20100708.txt) from multiple files and import them into your table for a date range.... HTH... Dim stDate, edDate As Date Dim myConvtName As Date 'Prompt for the START and END import dates...

Re: Importing multiple cvs based on Modified Date DC: I tried but it doesn't import any files. If I swap out the "<" and ">" under If myFTime < stDate > edDate Then it imports everything except the files I want...any ideas?? Could it be because there is no time on the Start and End dates...

I have several .csv files in a common directory that are sporadically updated. Utilizing a Start Date prompt and an End Date prompt, I want to import the files in the directory that coincide to those prompted dates. Start date: 7/12/2010 End date: 7/14/2010 Files in directory...

my ex-wife...

Try this: IIf ([Forms]![frmLMBSearch]![txtTitle]<>"",[Forms]![frmLMBSearch]![txtTitle]& "*" ,"*") Don't have time to test this, but I believe it should work.

Nope...got the message: Runtime Error file "" does not exist. We are close, but i can't seem to grasp what is missing.

Let me give this a try and see, thanks. And no, only 3 or 4. But you never know :)

I was wondering if anyone had code examples for emailing the contents of an entire folder? The folder can have multiple file types in it (excel, pdf, word, etc) but every file need to be linked to the Outlook e-mail that Access produces. I was trying to use this, but it completely ignores this...