Search results

Check out this Thread.

Hope this helps but I just loop through the foundfiles and capture the names by string delimination. You can just use the filename to get that information. Dim filename As String, filepath As String Dim Trigger As Integer Trigger = InStrRev(.FoundFiles(I), "\") filename =...

Nevermind I made my own. Thanks for reading though. Function searchForNumeric(data As String) As Boolean Dim I As Integer For I = 1 To Len(data) If IsNumeric(Mid("data", I, I + 1)) Then searchForNumeric = True Exit Function End If Next...

Is there a way to find out if there is any numbers inside of a string such as: 111222BM12A = true 1111233asaa = true FREDS DATA = false etc etc.. I am looking at actual file names so input masks wont help me. Any advice would be appreciated.. Thanks again.

Thanks so much thats going to work.. One more question. Do you happen to know how to get the name of the CD (the one that shows up next to the drive when the CD is in). I could use that name to find out if that CD has already been inputed or not. Thanks again.

I have an issues where I need to analyze a CD and put all file names with there extensions into a database. These CD's have different directory structures though I dont need to capture that information as much as the files and theres extensions. Does anyone know how I can make a complete list...

Did not think of that... That will work aswell. Isn't access grand!! P

You could just generate that serial number in the form that is creating the record and when your posting it to the table assign it to each record. Rich, He needed the serial number to regenerate every day... not just change the date. So it searches for the serial number with the date and...

You can certainly do that... I have an identification set of forms that run on the startup of the application. The user types in his name and password and it goes from there. Once the user is validated it runs SetUsername function below and whenever I need that username I can call GetUsername...

This forum is really for asking specific questions concerning your DB. We can give you ideas though as I have never used Ebay to any extent I would have none to offer you. I think you would be best served if you came up with the ideas of what you needed and then attempted asking questions as...

Public Function getNumber() As String Dim MyDate, MyYear, MyWeek, MyDay, MyNumber As Integer Dim Ret As String Dim Test As Variant MyDate = Date MyYear = Format(Date, "yy") MyWeek = Format(DatePart("ww", MyDate, vbUseSystemDayOfWeek, vbUseSystem), "00") MyDay = Format(DatePart("w", MyDate...

what code are you using to export the text?

You dont really need to do the goto you can make a doevents command right before you check for the tables existance and it will make sure all previous commands are finished before proceding. Up to you though I hate goto statements outside of using them for error handling and you dont really need...

For Each ctrl In frmActiveForm If ctrl.ControlType = acCommandButton Then If Not ctrl.Tag = "keep" Then ctrl.Enabled = True End If End If Next You can make it say actextbox etc etc etc and it will do the same thing. I have some command buttons that I...

It has to do with your tab order I would imagine. Check to see where your subform is on your tab order list. Make sure it is not at the top because access will set focus to that first. Hope this helps

Public Function CheckTable(strTblName As String) As Boolean On Error GoTo checktable_err Dim objTBL As Object For Each objTBL In CurrentDb.TableDefs If objTBL.name = strTblName Then CheckTable = True End If Next If IsEmpty(CheckTable) Then CheckTable = False End If...

Dim t As Object For Each t In CurrentDb.TableDefs if t.Name = "tblRecords" then DoEvents end if Next t if you need it to not = or whatnot just replace if not t.name = "tblrecords" then. My mistake about the last post that wouldnt work anyway... though you are using a do...

Could just make the users actions update a log file or table.. then you would be able to see whose doing what when, less of a neato solution but it will get the job done.

Might want to put the next t before the loop statement...

To return global variables like this you have to have code running all the time. Such as open all your forms before you close the previous one. If at a time code stops the variable values disapear. The way around this is to make a class module and pass each instance thru to the next form by...