Search results

  1. 2

    Hello all

    sorry but I didnt success. zip file attach>>> text_a text_b text_c. I want afterupdate text_a that text_b flashing like text_c (but just 5 or 6 flashing) thanks s.
  2. 2

    Hello all

    I have 2 textboxes in a form, for example text_a text_b if I write in text_a 0-10 then text_b=small if I write in text_a 200-300 then text_b=big... to insert the value its not a problem. but I want that after that I insert the value the textbox flashing. change the backcolor to green and red...
  3. 2

    counting 1 - 2 - 4 - 8 - 16 - 32

    and this vba code give you all the numbers Dim i As Long Dim j As String For i = 1 To 20 j = j & "," & 2 ^ i Next i j = Right(j, Len(j) - 1) MsgBox j
  4. 2

    lastRecord

    Thanks I Got It http://www.utteraccess.com/forums/showflat.php?Cat=&Board=access_2000&Number=432883&fpart=
  5. 2

    lastRecord

    thanks but its not good for me because when you have to install a record you have to go down... and its not good. there is no idea to see the last record?? thanks s.
  6. 2

    Open query from code

    hello, the email is just an example here you can take a look how does its work.
  7. 2

    Open query from code

    >>> Private Sub filt_Click() Dim f f = "" For Each i In Me.yourListBox.ItemsSelected f = f & "," & Me.yourListBox.Column(0, i) Next f = Right(f, Len(f) - 1) strsql = "select * from email where ID_EMAIL in (" & f & ")" MsgBox strsql End Sub
  8. 2

    lastRecord

    Hello all, I want to open subform at lastrecord. On the subform (open) I write Private Sub Form_Open(Cancel As Integer) DoCmd.GoToRecord , , acLast End Sub Bat it's not good for me because when you go to other record it's doesn't work. If I put this code in the event of "Current" its work...
  9. 2

    i have a table

    thank you so much on your patience.
  10. 2

    i have a table

    thanks WayneRyan its work good. :cool: I have to change 2 things 1. ptr = Instr(1, Me.txtMyControl, Me.txtSearchString) change to ptr = Instr(1, Me.txtMyControl, Me.txtSearchString)-1 2. and to setfoucus but its good just if you serch a string that in just once for example if you search...
  11. 2

    i have a table

    sorry --- its give me error the picture is attach
  12. 2

    i need example for an advanced search!!

    snoopy22 when you write 4 brackets its write one in the sentance then you get [FirstName] like "*mark*" if you dont write the 4 brackets you get [FirstName] like *mark* - and its not good p.s. behtzlacha shana-tova ;)
  13. 2

    How to Check Valid Date

    >>> strdate = InputBox("insert the date!") If IsDate(strdate) Then MsgBox "DATE" Else MsgBox "NOT DATE" End If
  14. 2

    i need example for an advanced search!!

    i'll try... 1.sfilter = "[nameID]>0 " 2.If Not IsNull(c_firstname) Then sfilter = sfilter & " and [FirstName] like " & """" & "*" & c_firstname & "*" & """" 3.If Not IsNull(c_lastname) Then sfilter = sfilter & " and [LastName] like " & """" & "*" & c_lastname & "*" & """" 4. If c_city > 0 Then...
  15. 2

    i have a table

    >>> Wayne can you give me little example: i try do this with no success. Private Sub myclick_Click() Dim SearchString, SearchChar SearchString = "XXpXXpXXPXXPabcp padd" ' String to search in. SearchChar = "PX" ' Search for "PX". For i = 1 To Len(SearchString) MsgBox...
  16. 2

    i have a table

    great it's work wonderfull :) thanks and I have another question ;) i do an advance serch (by form) and I want to color the word that I serch. for example, I search the word "go" when I saw the result I want to color the text "go" to red "-go-od ...", "-go-t" in asp I did like it...
  17. 2

    i have a table

    customerID (int) folderName (text) i want to open the folder on_click. i know how to open a file (by fso), but to open a folder i didn't find. thank alot s.
  18. 2

    i need example for an advanced search!!

    example... maby it will help u
  19. 2

    i need example for an advanced search!!

    >>> First sure that you need do a table form. After you built a form that the customer writes there C_FirstName C_LastName C_country (list box) Then you build a click and write there: sfilter = "[@@@kod@@@]>0 " If Not IsNull(C_FirstName) Then sfilter = sfilter & " and [FirstName] like " &...
  20. 2

    again - sorry on my english

    thanks alot ;) I'll try it.
Back
Top Bottom