Recent content by Elysynn

Thank you both for your input. It gave me the nudge in the right direction that I needed. Below is the code I implemented... Public Function CopyCalls() Dim db As DAO.Database Dim rs As DAO.Recordset Dim strSQL As String Dim strSource As String Dim strDestination As String Dim strCallPath As...

Hi, I have a challenge that I am hoping you can help with. I need to copy 200 .wav files from a few different servers in to one directory. There are multiple thousands of .wav files in the directories, else I would just copy and paste them manually. The names of the .wav files and their...

PHV - That did the trick. Didn't think to try it without the join. Thanks! Elysynn

Thanks, Golom. I think we were on the same track... this is what I came up with while working on this after I posted: SELECT qryNode1DupExt_Range1.Node, tblQfinitiBackendExtParsed.StationID FROM qryNode1DupExt_Range1 INNER JOIN tblQfinitiBackendExtParsed ON qryNode1DupExt_Range1.Node =...

Hello - I'm just looking for a bit of direction here. I have a table with two fields that looks as follows: Node | StationID Node1 | 12345 Node1 | 12346 Node1 | 12345-12350 Node1 | 12370 Node1 | 12350 What I need to do, is evaluate all the other stationid's that equal or...

Thank you both for you help. Below is the code that works and takes about 2 seconds to run... Dim rs As ADODB.Recordset Dim strSql As String Dim arr() As String Dim lngCounter As Long Set rs = CurrentProject.Connection.Execute("tblQfinitiBackendExt", , adCmdTable) Do...

Eupher - Thanks for the response. Still getting the error... All # signs have been removed from the code. This is the most recent version: Dim rs As ADODB.Recordset Dim strSql As String Dim arr() As String Dim lngCounter As Long Set rs =...

I've removed the # from the #; delimiter. The code now reads as follows: 'modified code from RoyVidar http://www.tek-tips.com/viewthread.cfm?qid=923268 Sub ParseServerValue() Dim rs As ADODB.Recordset Dim strSql As String Dim arr() As String Dim lngCounter As Long Set rs =...

Good Afternoon, I've returned to a problem I was working on a few weeks ago. I attempted to use the suggestion Golom provided to me in the thread701-1232254. However, the number of characters exceeds 6000 in some of the fields. The query takes approximately 25 minutes to run - and I can't do...

Hi Ken, The form frmOpen exists to capture both the login data and the logout as well. The second part of the code that I did not post has a similar procedure to write the user data to the table on the On Close event. I have it set up this way, so no matter how the user closes out of the...

TheAceMan1: Thanks for helping out. There is no code that tells this form to open - it opens when the database opens using the properties in Tools -> Startup. -Elysynn

Just tried the On Load event - still no dice... [code}Private Sub Form_Load() Me.Visible = False End Sub Private Sub Form_Open(Cancel As Integer) Dim strLogStatus As String Dim datLogDate As Date gblUser = Environ("UserName") strLogStatus = "In" datLogDate = Now() DoCmd.SetWarnings False...

Thanks for your reply Geoff. Unfortunately, it didn't work =( Private Sub Form_Open(Cancel As Integer) Dim strLogStatus As String Dim datLogDate As Date Me.Visible = False gblUser = Environ("UserName") strLogStatus = "In" datLogDate = Now() DoCmd.SetWarnings False DoCmd.RunSQL "INSERT...

Hello, I'm feeling particularly baffled this morning. I could have sworn there was a "Visible" option in the properties window for forms. I'm in Access 2003. Here is the simple task i am trying to accomplish... When the database opens, frmOpen opens. I want frmOpen to be hidden. Simple...

Now how easy was that? :) Thank you so much, CMP! -Elysynn