dcsimg
Page 111 of 1604 FirstFirst ... 11611011081091101111121131141211612116111111 ... LastLast
Results 4,401 to 4,440 of 64148

Thread: Post Race!

  1. #4401
    Banned
    Join Date
    Dec 2000
    Location
    USA, NJ
    Posts
    72

    Question y. . .

    y do i always post last?

  2. #4402
    Member Visual Programmer's Avatar
    Join Date
    Dec 2000
    Posts
    59
    How did this end up being 115 pages? thats about 4600 posts!!!!!!!

    VP
    VP/Sonic taking on the (vb) world, one post at a time.

  3. #4403
    Banned
    Join Date
    Dec 2000
    Location
    USA, NJ
    Posts
    72

    Talking becuase. . .

    at one point it was really a race. and becuase we talk alot. in UK time CA time and NJ time.
    i remember sonic when i was about 5 i beat all the games now i play computer games.

  4. #4404
    Guest
    Morning people, how are you all? the visibility is so bad i had trouble seeing my nose!

  5. #4405
    Fanatic Member Ianpbaker's Avatar
    Join Date
    Mar 2000
    Location
    Hastings
    Posts
    696
    Morning matey.

    I just checked my mail and i've won on the bananalotto, I can now give up work, see the world and not have a care in the world. Or I can go down the newsagent and buy myself a can of coke to cellebrate as it was 50p.
    Yeah, well I'm gonna build my own lunar space lander! With blackjack aaaaannd Hookers! Actually, forget the space lander, and the blackjack. Ahhhh forget the whole thing!

  6. #4406

    Thread Starter
    Hyperactive Member CyberSurfer's Avatar
    Join Date
    Aug 2000
    Location
    Old London Town
    Posts
    425
    Morning All!

    Does anybody have a function kicking about to check if a date is in valid British format? IsDate switches invalid british dates to US format and then checks. I've already tried Format, and that didn't work either.

    If no-one has one, I'll have to write one..DOH!

    And yes, I know this should have been in VBQ, but it's my thread!

  7. #4407
    Fanatic Member Ianpbaker's Avatar
    Join Date
    Mar 2000
    Location
    Hastings
    Posts
    696
    it's all gone quiet said rubarb
    too quiet said custard
    Yeah, well I'm gonna build my own lunar space lander! With blackjack aaaaannd Hookers! Actually, forget the space lander, and the blackjack. Ahhhh forget the whole thing!

  8. #4408
    Guest
    morning Jonathan, it wont be that much work to write it yourself, and how are you?

    morning Ian, so who you gonna take on holiday then and how are you?

  9. #4409

    Thread Starter
    Hyperactive Member CyberSurfer's Avatar
    Join Date
    Aug 2000
    Location
    Old London Town
    Posts
    425
    I'm decidedly fine, and you're right, it isn't all that much work. I'm nearly done already! How's yasel?

  10. #4410
    Guest
    Originally posted by CyberSurfer
    How's yasel?
    whos yasel....? oh yourself, im ok still very tired, i have been for ages, and i cant consentrate on my programming i was working on this function for 3 days, and found all i needed was to add +2 to one of the varibles, somit that wud usally have taken 0-30mins show how much im lagging, so im gonna take a holiday soon, maybe iceland... or just my bed

  11. #4411

    Thread Starter
    Hyperactive Member CyberSurfer's Avatar
    Join Date
    Aug 2000
    Location
    Old London Town
    Posts
    425
    Sounds Nice!

    Do you have any idea how I might find out if "/" occurs more than twice in a string? I can't use split, coz I'm using VB5 at college.

  12. #4412
    Fanatic Member Ianpbaker's Avatar
    Join Date
    Mar 2000
    Location
    Hastings
    Posts
    696
    it was quite funny chenko, I opened the email and it said congratulation's for winning, you have matched three number's blah de blah and and it wasn't untill you got to the bottom of the mail that it told you how much you got for three number's
    Yeah, well I'm gonna build my own lunar space lander! With blackjack aaaaannd Hookers! Actually, forget the space lander, and the blackjack. Ahhhh forget the whole thing!

  13. #4413
    Fanatic Member Ianpbaker's Avatar
    Join Date
    Mar 2000
    Location
    Hastings
    Posts
    696
    cyber - eaiest thing, is to use the instr function inside a loop to c how many "/" are in the string
    Yeah, well I'm gonna build my own lunar space lander! With blackjack aaaaannd Hookers! Actually, forget the space lander, and the blackjack. Ahhhh forget the whole thing!

  14. #4414

    Thread Starter
    Hyperactive Member CyberSurfer's Avatar
    Join Date
    Aug 2000
    Location
    Old London Town
    Posts
    425
    Errm...I thought that, but I only discovered InStr today (don't laugh!) and I'm not entirely sure how to do that.....

  15. #4415
    Guest
    Code:
    Public Function MyFunction()
    Dim Data
    Dim X
    Dim iCount
    
    For X = 1 To Len(Data) + 1
    If Right(Left(Data, X), 1) Then iCount = iCount + 1
    Next X
    
    If iCount > 2 Then MyFunction = True
    End Function
    sorry if there are many mistakes i just cant concentrate and im sure there is a better way...

  16. #4416
    Guest
    Ian, please call me Simon,
    iva had before emails saying youve won, and all you win is entry into a prize draw but someone must win somewhere hey. just its gonna be me

  17. #4417

    Thread Starter
    Hyperactive Member CyberSurfer's Avatar
    Join Date
    Aug 2000
    Location
    Old London Town
    Posts
    425
    Does that check for occurences of "/"? It probably does, but I can't concentrate either!

  18. #4418
    Guest
    Originally posted by chenko
    Code:
    Public Function MyFunction()
    Dim Data
    Dim X
    Dim iCount
    
    For X = 1 To Len(Data) + 1
    If Right(Left(Data, X), 1) = "/" Then iCount = iCount + 1
    Next X
    
    If iCount > 2 Then MyFunction = True
    End Function
    sorry if there are many mistakes i just cant concentrate and im sure there is a better way...

    oppps

  19. #4419

    Thread Starter
    Hyperactive Member CyberSurfer's Avatar
    Join Date
    Aug 2000
    Location
    Old London Town
    Posts
    425
    I'll just try it...

  20. #4420
    Fanatic Member Ianpbaker's Avatar
    Join Date
    Mar 2000
    Location
    Hastings
    Posts
    696
    let me give you a hand

    Code:
    Dim blnFound as Boolean
    Dim strDate as String
    Dim iCountslash as Interger
    Dim iSearchPlace as Interger
    
    'set the search to true
    blnFound = True
    
    'start searching the string at the first character
    iSearchPlace = 1
    
    iCountslash = 0
    
    Do While blnFound = True
      If instr(iSearchplace,strDate,"/") >= 1 Then
         'set the search to 1 character past the / that has been found
         iSearchplace = instr(iSearchplace,strDate,"/") + 1
         iCountslash = iCountslash + 1
      Else
        no slahes found
         blnFound  = False
      End If
    Wend
    there you go mate, nice an easy
    Yeah, well I'm gonna build my own lunar space lander! With blackjack aaaaannd Hookers! Actually, forget the space lander, and the blackjack. Ahhhh forget the whole thing!

  21. #4421
    Guest
    if it has MORE than 2 "/" it will return True

  22. #4422

    Thread Starter
    Hyperactive Member CyberSurfer's Avatar
    Join Date
    Aug 2000
    Location
    Old London Town
    Posts
    425
    It works!! Cheers Simon!

  23. #4423
    Guest
    ive only use inStr once before and it was hit and miss until i got i right...

  24. #4424
    Fanatic Member Ianpbaker's Avatar
    Join Date
    Mar 2000
    Location
    Hastings
    Posts
    696
    if that's about my code simon, i've got iCountslash to count how many slashes there are, same as yours, just done a different way
    Yeah, well I'm gonna build my own lunar space lander! With blackjack aaaaannd Hookers! Actually, forget the space lander, and the blackjack. Ahhhh forget the whole thing!

  25. #4425
    Guest
    Originally posted by CyberSurfer
    It works!! Cheers Simon!

    It works!!! *faints*

  26. #4426
    Fanatic Member Ianpbaker's Avatar
    Join Date
    Mar 2000
    Location
    Hastings
    Posts
    696
    simon - it's actually a proper win, if you goto www.bananalotto.co.uk, they have have a draw every day, no hassle, no spam, all you've got to do is click on an advertiser's link and close it as soon as it's open
    Yeah, well I'm gonna build my own lunar space lander! With blackjack aaaaannd Hookers! Actually, forget the space lander, and the blackjack. Ahhhh forget the whole thing!

  27. #4427
    Guest
    yea i know that, just showing how funny these things can be... is this the most youve won?

  28. #4428
    Guest
    BTW do you know anywhere where i can get decent little graphics animated or not for my avitari?

  29. #4429
    Fanatic Member Ianpbaker's Avatar
    Join Date
    Mar 2000
    Location
    Hastings
    Posts
    696
    yeah first time, although i've only been playing it for about a month

    3 balls - 50p
    4 balls - 5
    5 balls - 100
    6 balls - 100,000
    6 balls + banana ball - 1,000,000 (put's little finger at the side of his mouth)
    Yeah, well I'm gonna build my own lunar space lander! With blackjack aaaaannd Hookers! Actually, forget the space lander, and the blackjack. Ahhhh forget the whole thing!

  30. #4430
    Guest
    wat do you do to enter?

  31. #4431
    Fanatic Member Ianpbaker's Avatar
    Join Date
    Mar 2000
    Location
    Hastings
    Posts
    696
    nothing much. just enter your name and address and you can play every day for free
    Yeah, well I'm gonna build my own lunar space lander! With blackjack aaaaannd Hookers! Actually, forget the space lander, and the blackjack. Ahhhh forget the whole thing!

  32. #4432
    Guest
    Can one of you help me with this please...

    Code:
    Dim DB As Database
    Dim RS As Recordset
    Dim sSQL As String
    Set DB = DAO.OpenDatabase(DBpath, False, False, ";pwd=" & DBpassword)
    sSQL = "SELECT * FROM holidaydata WHERE employee = '" & Department & "'"
    Set RS = DB.OpenRecordset(sSQL)
    
    Dim iRecords
    RS.MoveLast
    RS.MoveFirst
    iRecords = RS.RecordCount
    it stops at Movelast and complains there is no record!!!

  33. #4433
    Guest
    dont worry i got it, the table name is employee and the field name is dept.... me just stupid.... would one of you have a look at my little program once ive finished... id like some ideas on how i could make it better... Thanks

  34. #4434
    Fanatic Member Ianpbaker's Avatar
    Join Date
    Mar 2000
    Location
    Hastings
    Posts
    696
    if the recordset is not reurning any row's you can't use any of the move function's without getting an error.

    Try enclosing this

    If RS.BOF = False AND RS.EOF = False Then

    RS.MoveLast
    RS.MoveFirst

    End IF
    Last edited by Ianpbaker; Feb 2nd, 2001 at 06:54 AM.
    Yeah, well I'm gonna build my own lunar space lander! With blackjack aaaaannd Hookers! Actually, forget the space lander, and the blackjack. Ahhhh forget the whole thing!

  35. #4435
    Guest
    Do you suspect that Parksie might be dead?

  36. #4436
    Hyperactive Member barrk's Avatar
    Join Date
    Sep 2000
    Location
    My own little world
    Posts
    274
    Congratulations Ian..........buy a beer for us all?????


    I sure hope parksie's not dead. He said he was going to try to make it to class today. Maybe he's learning something instead of just chatting.

  37. #4437
    Fanatic Member Ianpbaker's Avatar
    Join Date
    Mar 2000
    Location
    Hastings
    Posts
    696
    I wish I could Katie, 50p = 0.736200 USD
    Yeah, well I'm gonna build my own lunar space lander! With blackjack aaaaannd Hookers! Actually, forget the space lander, and the blackjack. Ahhhh forget the whole thing!

  38. #4438
    Hyperactive Member barrk's Avatar
    Join Date
    Sep 2000
    Location
    My own little world
    Posts
    274
    I hate to show my ignorance (as I usually pretty good at hiding it). Isn't 50p fifty pounds?

  39. #4439
    Fanatic Member Ianpbaker's Avatar
    Join Date
    Mar 2000
    Location
    Hastings
    Posts
    696
    I wish it was, 50p is 50 pence, a penny is our equivelent to you dime's and cents
    Yeah, well I'm gonna build my own lunar space lander! With blackjack aaaaannd Hookers! Actually, forget the space lander, and the blackjack. Ahhhh forget the whole thing!

  40. #4440
    Hyperactive Member barrk's Avatar
    Join Date
    Sep 2000
    Location
    My own little world
    Posts
    274
    What a dissappointment. I was looking forward to that beer.

Page 111 of 1604 FirstFirst ... 11611011081091101111121131141211612116111111 ... LastLast

Tags for this Thread

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  



Featured


Click Here to Expand Forum to Full Width