Search results

  1. W

    Validation rule

    Working! I'm grateful to you for your help:)
  2. W

    Validation rule

    If ((Not validateStr(Me.NazwaSkrocona)) Or (Len(Me.NazwaSkrocona & vbNullString) = 0)) Then Call MsgBox("The String cannot be EMPTY or cannot contain any of the following characters : "| \ / : * ? " < > ", Please enter again") Cancel = True End If Your first code was great, but I need...
  3. W

    Validation rule

    The name of control is "NazwaSkrocona" and the code is: If ((Not validateStr(Me.NazwaSkrocona)) Or (Len(Me.NazwaSkrocona & vbNullString) = 0)) Then Access show error that can't save in before update.
  4. W

    Validation rule

    Access show me error that can't save this sentence:/ so this (Len(Me.[Name] & vbNullString) = 0)) check of my control that it isn't blank, right? Normally I not use "Name" but I wrote this like example. This control has name "NazwaSkrocona" which means "short name" for polish:)
  5. W

    Validation rule

    How can I check that control "Name" is > 0 Normally I use to If Len(Nz(Me.Name)) > 0 Then But now when I have If not... I don't now how to write it.
  6. W

    Validation rule

    Oh now I see, if I write some good chars like"john" then appears msgbox, but when I write some bad chars like "/" then nothing happens, so it function works conversely
  7. W

    Validation rule

    I don't know why but it doesn't work. This is weird because I will not have any error. I should place code of function below the text in vba "Option Compare Database Option Explicit", right? I put code (theControlName_BeforeUpdate(Cancel As Integer)) on event before update in my control "Name"...
  8. W

    Validation rule

    The field in form should has the same rule what creating folder in Windows. So Field shouldn't get sign like "| \ / : * ? " < > " What I need to write in validation rule? I saw help but there are no information about my problem:/ I can't have: Is Null OR Not Like "*[!((a-z) or (0-9))]*"...
  9. W

    VBA to chhange properties

    I have form with 5 text boxes: 1) Date 2) A 3) B 4) C 5) D When I'll open form, Date field has Enabled status "yes" but others fields have enabled status "no" I need vba which I put in to "after update" Date field, vba should change the enabled status of the rest of the boxes (A, B, C, D) from...
  10. W

    vba for realtions between tables

    This database was an example, what I done to let you know what I mean. But Ok I see that it is too hard to explain with this database, so I done new. Now We have 3 tables: Animals, Birds, Dogs - with relations (one to many) In this example I use only two tables Animals and Dogs. Now I attached...
  11. W

    vba for realtions between tables

    There are four tables. The code for all fields is Private Sub Save_Click() Set dbs = CurrentDb Set rst = dbs.OpenRecordset("Archives") With rst rst.AddNew !Name = Me![Name] rst.Update .Close End With Set dbs = CurrentDb Set rst = dbs.OpenRecordset("Details_archive") With rst rst.AddNew...
  12. W

    vba for realtions between tables

    I saw first two links - doesn't work. I played third and fourth but trust me jdraw I don't have time to watch. When I will have all my database, then I can learn normalization. Of course that I need your help, if you can... About my problem: I found the code on the internet which write from...
  13. W

    vba for realtions between tables

    jdraw if I you'd like to learn VBA from scratch I would have bought a Bible vba, but now I don't have much time to learn, I must do database asap and I looking help with concrete problem. By the way you do not even opened my files before you wrote a post.
  14. W

    vba for realtions between tables

    David I done some database to let you know what I mean, also I done screen to help understand. Please check relations in database.
  15. W

    vba for realtions between tables

    I found code to fill a table from form using button (blank field in a form) and it works for first field in form Private Sub Save_Click() Set dbs = CurrentDb Set rst = dbs.OpenRecordset("name of table") With rst rst.AddNew !name field in a table = Me![name field in a form] rst.Update .Close End...
Back
Top Bottom