Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

Register Log in
  • Congratulations derfloh on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Search results for query: *

  • Users: DSTR3
  • Order by date
  1. DSTR3

    FindFile By Time

    ...help is appreciated. Thanks. HANDLE hFile; LPFILETIME lpCreationTime, lpLastAccessTime, lpLastWriteTime; // Find the file. hFile = FindFirstFile( *.txt, GENERIC_READ, 0, NULL, OPEN_ALWAYS, FILE_ATTRIBUTE_NORMAL, NULL ); GetFileTime(hFile, lpCreationTime <= currenttime); DeleteFile(*.txt)...
  2. DSTR3

    Copy File

    Thank you as well. DS
  3. DSTR3

    Copy File

    Great! Perfect! Thanks DS
  4. DSTR3

    Copy File

    So it would be like this? Date().Mdb Thanks DS
  5. DSTR3

    Copy File

    That sounds goog, how do you add a datestamp? Thanks DS
  6. DSTR3

    Progress Bar

    Disregard That, I have that figured out, It seems that I need to tie the progress bar to the copying of a file. It needs to progress and finish when the file is copied. How do you know when the file is copied? Thanks DS
  7. DSTR3

    Copy File

    Thanks, It shouldn't be this hard. I thought that by doing this it would just overwrite the mdb file. Private Sub Command1_Click() FileCopy "c:\Proserv\DB\DellSat.mdb", "C:\ProServ\DB\BU.mdb" Unload Me End End Sub DS
  8. DSTR3

    Progress Bar

    I want to run a Progress Bar in VB6. I need it to run for 40 Seconds and then close the Application. I put the Progress Bar on the form, now I'm lost. this isn't tied to any information or code running, Thanks DS
  9. DSTR3

    Copy File

    Ok Thanks, I'm doing this and it works fine. FileCopy "c:\Proserv\DB\DellSat.mdb", "C:\ProServ\DB\BU.mdb" MsgBox "Completed" A quick question though. Does it Overwrite the exsisting file? How exactly does it work? Thanks DS
  10. DSTR3

    Copy File

    Hi, I'm new to VB...I'm using VB6. I need a command button to copy a file and place it into another directory... Copy C:\ProServ\DB\PS.mdb to C:\ProServ\BackUp It has to rename the file from PS.mdb to BU.Mdb and overwrite the previous BU.mdb file. Any help appreciated. Thanks DS
  11. DSTR3

    Numeric Alpha Field

    Its becoming one. It's Simple. I have a field with Numbers and Alpha... 1 1a 1b 33 33a 343 343a 343b 5 3 etc... Why when I go to add a record can't I merely check fr the highest alpha that corresponds with the number I've choosen. If I pick 1 then t would be 1b and the new record would become...
  12. DSTR3

    Numeric Alpha Field

    Can't quite make out what is happening here. I'm still new! But I do see the problem with this... 1a 22a 234a What happens in this situation? With this? DMax("Right(NumberID,1) Thanks DSTR3
  13. DSTR3

    Numeric Alpha Field

    I tried this but I get... 1,2,3 instead of 1,1a,1b,1c etc... Dim strWhere As String Dim intChar As String intChar = Asc(Nz(DMax("NumberID", "tblTest", "NumberID = '" & Me.Text3 & "'"), "@")) Me.TxtNumber = Me.TxtNumber & Chr(intChar + 1) Thanks DSTR3
  14. DSTR3

    Numeric Alpha Field

    I have a field that contains data like this. 1 1a 1b 2 2a 3 3a 3b 3c etc... I need a DMax statement that will find the highest value of a series, then add the next alpha to it. For instance if I had a 3, the next value would be 3d, if it's 1 then it would be 1c. The Table is called called...
  15. DSTR3

    Setting a TextBox in a Variable

    I'm trying to set the value in a Textbox where the form name changes. I thought this would work. Dim stWhatForm as String Forms!stWhatForm!TxtBox = " & Me.TxtBox1 & " The problem is that the stWhatForm doesn't work. Help is appreciated. Thanks DS
  16. DSTR3

    SQL INSERT Date is Null

    Aceman, it almost works....it returns time, not date. Phv, Works perfectly! Thanks DS
  17. DSTR3

    Recordset Question

    Thanks, I'll give it a shot! DSTr3
  18. DSTR3

    Recordset Question

    Even Better! Thanks DS
  19. DSTR3

    SQL INSERT Date is Null

    I'm having a problem inserting a record if the date field empty, It only works if there is a Date in the Me.TxtDate, otherwise I get an Error. I tried this but, it doesn't work. Thanks DS CurrentDb.Execute "INSERT INTO Table1 (ID,DateF) " & _ "VALUES(" & Forms!Form1!TxtID & ", " & _ "" &...
  20. DSTR3

    Recordset Question

    Thanks! That works! DS

Part and Inventory Search

Back
Top