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!

  • Congratulations Mike Lewis 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: friend01
  • Order by date
  1. friend01

    VB is awful

    VB sucks! My .02 ....LOL
  2. friend01

    cool menu

    maybe some sort of small ribbon or something. You know, something a little more up-to-date. thanks, f1
  3. friend01

    cool menu

    The link craigber gave me seems outdated with many bugs apparently. Any others? Thanks, f1
  4. friend01

    cool menu

    Hi Mike, Something within the lines of "gradient colors" with maybe some small bitmaps (icons) next to the menu option. Something 'updated'. What do have in mind? Thanks, F1
  5. friend01

    cool menu

    Hi, I remember reading somewhere that we can make VFP MENU's look "cooler" (more kinda up to date). Anybody know how? Can you point me in the right direction? Thanks, F1
  6. friend01

    case...endcase or something better

    Thanks Mike and everybody.
  7. friend01

    case...endcase or something better

    Oh well, I guess I'll stick with my code and what I have. Thanks.
  8. friend01

    case...endcase or something better

    I get a "FILE MUST BE OPENED EXCLUSIVELY" when I try to : INDEX ON amount_rem TAG AmountRem I canot open it excl. other people are in it. any suggestions?
  9. friend01

    case...endcase or something better

    Craig, I found the error in your code. It should be: IF SEEK(T7, "Pic_City") BUT It still takes quite a while. any idea on making this thing fly?
  10. friend01

    case...endcase or something better

    Hi Mike, Is this not good? INDEX ON amount_rem='3004' AND EMPTY(state) TO idxmstr let me know, f1
  11. friend01

    case...endcase or something better

    Hey Craig, I just tries some of your code and I get : VARIABLE PIC_CITY NOT FOUND at the IF SEEK(T7, Pic_City) command. Why would that be?
  12. friend01

    case...endcase or something better

    I don't seem to have an index set on my MST. What would be the most optimized INDEX for it. I now have: INDEX ON amount_rem='3004' AND EMPTY(state) TO idxmstr what do you think. FYI this DBF has over 4 million records in it. Thanks, F1
  13. friend01

    case...endcase or something better

    Hi Craig, Are you sure that code does the exact same thing as mine above? I'm not sure your SCAN does as mine does. I do a REPL first then based on that I do the SCAN. Please let me know. Thanks, F1
  14. friend01

    case...endcase or something better

    here's my revised code: CLOSE DATABASES ALL CLEAR ALL CLEA SELECT 0 USE C:\Users\johnk\Desktop\srtest\mst0910 SELECT 0 USE F:\DATA\pic_city ORDER npanxx SELECT 0 USE F:\DATA\cell_tel &&very small dbf INDEX ON npanxx TO idxcelltel SELECT 0 USE F:\DATA\us_desti ORDER area SELECT mst0910 REPLACE...
  15. friend01

    case...endcase or something better

    actually, I think there's something wrong with my last "ELSE". The one that says "SELECT mst0910. SKIP" basically what I want to do is if it's not found in pic_city or cell_tel or us_desti, sele the mst0910 and go to the next record. I'm I correct in my code in the last ELSE...
  16. friend01

    case...endcase or something better

    Hi Mike, OK, this is what I have: It seems a bit slow. Anything you can do to speed up this? CLOSE DATABASES ALL CLEAR ALL CLEA SELECT 0 USE C:\Users\johnk\Desktop\srtest\mst0910 SELECT 0 USE F:\DATA\pic_city ORDER npanxx SELECT 0 USE F:\DATA\cell_tel &&very small dbf INDEX ON npanxx TO...
  17. friend01

    case...endcase or something better

    Hi, I have a brain freeze currently and at a lose on hos to do this. I would think "CASE...ENDCASE" is the best way but I can't for the life of me write the darn code for it. It's pretty simple. Here's my code: USE MST0910 SCAN FOR amount_rem="3004" AND EMPTY(state) STORE SUBSTR(tel,1,7)...
  18. friend01

    rename file to datestamp

    Hi, I've copied/pasted the code: PUBLIC oform1 oform1=NEWOBJECT("form1") oform1.SHOW RETURN DEFINE CLASS form1 AS FORM gdiplusToken = '' TOP = 0 LEFT = 17 HEIGHT = 350 WIDTH = 400 DOCREATE = .T. CAPTION = "Get Image Properties (EXIF)" NAME = "Form1"...
  19. friend01

    rename file to datestamp

    I guess I am out of luck. :( I really thought there would be something / somehow I could get the "Date Picture Taken" property. If not with VFP can anybody recommend another way of doing this? Any help would be greatly appreciated. Thanks, F1
  20. friend01

    rename file to datestamp

    Hi, Unfortunately, your assumption is incorrect. The File Creation Date/Time does not coincide with the 'date picture taken' column. Any help? Thanks, F1

Part and Inventory Search

Back
Top