עקסעס: הילף

די אחראים: זייער נייגעריג,אחראי,thefact

אמת לאמיתו
שר מאה
תגובות: 162
זיך איינגעשריבן אום: מיטוואך פעברואר 11, 2015 5:34 pm

  • ציטיר
  • צו לייגן א דאנק דארפט איר זיין אריינגעלאגט

תגובה דורך אמת לאמיתו »

פאטאקי08 האט געשריבן:נישט עכט
ווילסט פרובירן אביסל קלארערצושטעלן?


וויאזוי זאגט מען? אז עס פעלט אין הסברה פעלט אין הבנה! כהאב מיך געטריייט בעסער מסביר זיין, האב איך שוין געכאפט די תירוץ אויכעט, אבער אז איך האב שוין אנגעהויבן וועל איך עס איבערגיין.

איך וועל אנהייבן מיט א סעמפעל:
איך האב אן item table מיט א 2 fields איינס איז א key number און איינס איז א description.

ווען איך וויל האבן א field פון items אין די database, מאך איך א combo box פון די item table.
די וועג וויאזוי איך מאך די combo, איך select ביידע fields, די ערשטע איז די key number און די צווייטע איז די description, נאר איך hide די key number (די column widths איז: "1,"0) און איך store די combo אין א item field (וואס איז א number field), וואס דעמאלטס קומט אויס אז זעהן זעסטו די description, אבער עכט שרייבסטו אין די database א נומבער. (איך מיין אז דעס איז שוין יא קלארער, איז וואר פאטאקי?)

וואס קומט יעצט אויס? אז אויב ווילסט מאכן א קאוד אויך די combo, מיזטו רעדען פון די Item number אין די קאוד, ווייל דאס איז פארשריבן אין די database.

די סיבה פארוואס איך מאך אזוי? ווייל אזוי האט מיך מיין מלמד אין חדר אויסגעלערנט און איך פאלג שיין.
אבער מיין פראגע יעצט איז אויב דאס איז טאקע א גוטע וועג? אדער קומט ענדערשט צו מאכן אז עס זאל זיך אויפשרייבן די description אין די database דורך די combo, מ'זאל קענען מאכן א קאוד אויף דעם?

בין איך שוין גענוג קלאר??
חותמו של הקב"ה אמת
אוועטאר
פאטאקי08
שר עשרת אלפים
תגובות: 13862
זיך איינגעשריבן אום: דאנערשטאג אוגוסט 09, 2007 1:30 pm
פארבינד זיך:

  • ציטיר
  • צו לייגן א דאנק דארפט איר זיין אריינגעלאגט

תגובה דורך פאטאקי08 »

אמת לאמיתו האט געשריבן:אבער מיין פראגע יעצט איז אויב דאס איז טאקע א גוטע וועג? אדער קומט ענדערשט צו מאכן אז עס זאל זיך אויפשרייבן די description אין די database דורך די combo, מ'זאל קענען מאכן א קאוד אויף דעם?

יא כך דרכו
אויב ווילסטו אבער פאר עני אנדערע סיבה צוקומען צום דעסקריבשען קעסנטו שרייבן אזוי

קאוד: וועל אויס אלע

me.combo1.column(1)


אמת לאמיתו האט געשריבן:בין איך שוין גענוג קלאר??

יאפ זייער קלאר
אמת לאמיתו
שר מאה
תגובות: 162
זיך איינגעשריבן אום: מיטוואך פעברואר 11, 2015 5:34 pm

  • ציטיר
  • צו לייגן א דאנק דארפט איר זיין אריינגעלאגט

תגובה דורך אמת לאמיתו »

א גרויסן שכוח !!!
ווילסט אפשר אויכעט קלארער מאכן וואס די זאגסט??

איך געב דיר א סעמפעל פון א קאוד:

קאוד: וועל אויס אלע

If ItemCombo = order Then
   DoCmd.OpenForm "SOrderF", , , "TicketID = " & Me.TicketID
End If

און די פארעכט עס מיט וואס די האסט געשריבען.

נאכאמאל א גרויסן שכוח !!!
לעצט פארראכטן דורך אמת לאמיתו אום דאנערשטאג יאנואר 21, 2016 9:52 am, פארראכטן געווארן 2 מאל.
חותמו של הקב"ה אמת
אמת לאמיתו
שר מאה
תגובות: 162
זיך איינגעשריבן אום: מיטוואך פעברואר 11, 2015 5:34 pm

  • ציטיר
  • צו לייגן א דאנק דארפט איר זיין אריינגעלאגט

תגובה דורך אמת לאמיתו »

איך האב מיך נאכנישט מייאש געווען אויף מיין פרעדיגע שאלה! פאטאקי, אויב האסטו נאך א מינוט פאר מיר בין איך גרייט אויסצוהערן.

אבער לאמיר גיין נעקסט:
וויאזוי DELETE מען א RECORD אין א Continuous Forms, איך וויל DELETED יענע ליין ווי איך שטעל די באטען

איך טריי מיט DoCmd.RunCommand acCmdDeleteRecord, אבער ס'גייט נישט, קוק אויס אז ער האט נישט קיין פויקעס

עני סעלאשען ???

גרויסע שכוח
חותמו של הקב"ה אמת
אוועטאר
פאטאקי08
שר עשרת אלפים
תגובות: 13862
זיך איינגעשריבן אום: דאנערשטאג אוגוסט 09, 2007 1:30 pm
פארבינד זיך:

  • ציטיר
  • צו לייגן א דאנק דארפט איר זיין אריינגעלאגט

תגובה דורך פאטאקי08 »

אמת לאמיתו האט געשריבן:איך האב מיך נאכנישט מייאש געווען אויף מיין פרעדיגע שאלה! פאטאקי, אויב האסטו נאך א מינוט פאר מיר בין איך גרייט אויסצוהערן.


קאוד: וועל אויס אלע

If ItemCombo.column(1) = order Then
   DoCmd.OpenForm "SOrderF", , , "TicketID = " & Me.TicketID
End If


אבער לאמיר גיין נעקסט:
וויאזוי DELETE מען א RECORD אין א Continuous Forms, איך וויל DELETED יענע ליין ווי איך שטעל די באטען

איך טריי מיט DoCmd.RunCommand acCmdDeleteRecord, אבער ס'גייט נישט, קוק אויס אז ער האט נישט קיין פויקעס

עני סעלאשען ???

קאוד: וועל אויס אלע

SendKeys "^-"

גרויסע שכוח
אמת לאמיתו
שר מאה
תגובות: 162
זיך איינגעשריבן אום: מיטוואך פעברואר 11, 2015 5:34 pm

  • ציטיר
  • צו לייגן א דאנק דארפט איר זיין אריינגעלאגט

תגובה דורך אמת לאמיתו »

wow wow!
איך האב נישט געוויסט פארוואס מען טאר זיך נישט מייאש זיין
(אאד"ו יעצט פארשטייסטו פארוואס כהאב געפרעגט נאך א קשיא ??)

Just kidding א גרויסן שכח מר פאטאקי יר"ה

אויב די וועסט לויפן פאר פרעזידענט העל איך נישט וואויטן פאר דיר כוועל נישט האבן וווער עס וועט ענטפערן :grin: :grin:
חותמו של הקב"ה אמת
אמת לאמיתו
שר מאה
תגובות: 162
זיך איינגעשריבן אום: מיטוואך פעברואר 11, 2015 5:34 pm

  • ציטיר
  • צו לייגן א דאנק דארפט איר זיין אריינגעלאגט

תגובה דורך אמת לאמיתו »

פאטאקי08 האט געשריבן:
עני סעלאשען ???

קאוד: וועל אויס אלע

SendKeys "^-"



מען קען נישט אויסלעשען די cascade delete warning פאר די related tables, מיט set warning to false ???
(איך וויל לייגען מיין אייגענע ווארנינגען)
חותמו של הקב"ה אמת
אוועטאר
פאטאקי08
שר עשרת אלפים
תגובות: 13862
זיך איינגעשריבן אום: דאנערשטאג אוגוסט 09, 2007 1:30 pm
פארבינד זיך:

  • ציטיר
  • צו לייגן א דאנק דארפט איר זיין אריינגעלאגט

תגובה דורך פאטאקי08 »

קאוד: וועל אויס אלע

    DoCmd.SetWarnings False
    SendKeys "^-", True
    DoCmd.SetWarnings True


דארפסט געדענקן אז אויב די פראסידער קראכט אינמיטן וועט די ווארענונגען בלייבן אויסגעלאשן ביזן צומאכן די פייל/פראגרעם
דעריבער קענסטו ניצן אזאנס

קאוד: וועל אויס אלע

    On Error GoTo Error_Handler
    DoCmd.SetWarnings False
    SendKeys "^-", True
Error_Handler:
    DoCmd.SetWarnings True
אמת לאמיתו
שר מאה
תגובות: 162
זיך איינגעשריבן אום: מיטוואך פעברואר 11, 2015 5:34 pm

  • ציטיר
  • צו לייגן א דאנק דארפט איר זיין אריינגעלאגט

תגובה דורך אמת לאמיתו »

פארוואס דארף איך אייביג זיין די מענטש וואס קאמפלעינט ??

פארוואס ביי מיר ארבעט עס נישט איך לעש אויס די ווארנונג, און ער איז געהעריג דא כאילו לא הי' ??
חותמו של הקב"ה אמת
אמת לאמיתו
שר מאה
תגובות: 162
זיך איינגעשריבן אום: מיטוואך פעברואר 11, 2015 5:34 pm

  • ציטיר
  • צו לייגן א דאנק דארפט איר זיין אריינגעלאגט

תגובה דורך אמת לאמיתו »

יעצט זעה איך אז אויב איך צינד נישט צוריק אן די ווארנונגען ארבעט עס פיין, די פראבלעם איז ווען איך צינד עס צוריק אן

עני פשט ???
חותמו של הקב"ה אמת
אוועטאר
פאטאקי08
שר עשרת אלפים
תגובות: 13862
זיך איינגעשריבן אום: דאנערשטאג אוגוסט 09, 2007 1:30 pm
פארבינד זיך:

  • ציטיר
  • צו לייגן א דאנק דארפט איר זיין אריינגעלאגט

תגובה דורך פאטאקי08 »

האסט צוגעלייגט די , TRUE
?

קאוד: וועל אויס אלע

SendKeys "^-", True
אוועטאר
פאטאקי08
שר עשרת אלפים
תגובות: 13862
זיך איינגעשריבן אום: דאנערשטאג אוגוסט 09, 2007 1:30 pm
פארבינד זיך:

  • ציטיר
  • צו לייגן א דאנק דארפט איר זיין אריינגעלאגט

תגובה דורך פאטאקי08 »

אמת לאמיתו האט געשריבן:פארוואס דארף איך אייביג זיין די מענטש וואס קאמפלעינט ??

דאס איז די איינציגסטע וועג צו ווערן אן "עסקפיריענסד" פראגרעממער
אמת לאמיתו
שר מאה
תגובות: 162
זיך איינגעשריבן אום: מיטוואך פעברואר 11, 2015 5:34 pm

  • ציטיר
  • צו לייגן א דאנק דארפט איר זיין אריינגעלאגט

תגובה דורך אמת לאמיתו »

יא! כהאב געמאכט "קלויב אויס אלעס"

אבער איין מינוט! האסט פארשטאנען וואס כ'האב געזאגט?? ער לעשט זיך אויס (ווייל ווען איך צינד עס נישט צוריק אן איז ער אויסגלאשען), נאר ער צינד זיך צוריק אן פאר די צייט און די ווארנונג קומט ארויף.
חותמו של הקב"ה אמת
אמת לאמיתו
שר מאה
תגובות: 162
זיך איינגעשריבן אום: מיטוואך פעברואר 11, 2015 5:34 pm

  • ציטיר
  • צו לייגן א דאנק דארפט איר זיין אריינגעלאגט

תגובה דורך אמת לאמיתו »

פאטאקי08 האט געשריבן:אפשר טריי אזוי

קאוד: וועל אויס אלע

 
DoCmd.SetWarnings False
    SendKeys "^-", True
    DoEvents
DoCmd.SetWarnings True
 



געוואלדיג ארבעט פיין

ישר כוח, ישר כוח, ישר כוח
חותמו של הקב"ה אמת
giveaway
שר העשר
תגובות: 33
זיך איינגעשריבן אום: דאנערשטאג יוני 18, 2015 7:14 pm

  • ציטיר
  • צו לייגן א דאנק דארפט איר זיין אריינגעלאגט

תגובה דורך giveaway »

א גוטן מיינע טייערע חברים!
איך וואלט געוואלט וויסן אויב עס איז דא א מעגליכקייט אז ווען מען מאכט א נייע ROW און עקסעס זאל אטומאטיש אריין קומען א ס"ה פון א פאריגע שורה?
עקסעס
שר העשר
תגובות: 24
זיך איינגעשריבן אום: זונטאג יולי 20, 2014 7:09 pm

  • ציטיר
  • צו לייגן א דאנק דארפט איר זיין אריינגעלאגט

תגובה דורך עקסעס »

לעזער פ.
שר חמישים
תגובות: 60
זיך איינגעשריבן אום: מיטוואך נאוועמבער 19, 2014 2:58 pm

  • ציטיר
  • צו לייגן א דאנק דארפט איר זיין אריינגעלאגט

תגובה דורך לעזער פ. »

איך האב א פראגרעם אין עקסעס וואס די סטעיטמענטס איז א ריפארט וואס איז סארטירט ביי גרופ. איך וויל צולייגן א payment stub ביי די סוף פון יעדע סטעיטמענט ביי די ענדע פון די פעידש. די ריפארט פוטער ווייזט נאר ביי די ענדע פון אלע סטיטמענטס, די פעידש פוטער ווייזט ביי אלע פעידשעס און אויב א קאסטומער האט א סטעיטמענט פון 2 פעידשעס וועט עס ווייזן אויף ביידע, די גרופ פוטער קומט יא ארויף ביי די ענדע פון די ריפארט אבער אמאל קומט דאס אין מיטען פון דאס בלעטעל.

איך האב געטראפן דעם VBA וואס שרייבט ארויף פעידש נומבערס לויט די גרופ [page 1 of 1, page 1 of 3], עס האט עפעס א וועג צו זעהן ווי די סוף פון גרופע איז, מיין שאלה איז אויב איך קען אויסארבעטען דעם קאוד און לייגען די סטאב אויפן פעידש פוטער און מאכן וויסיבעל נאר אויף די לעצטע פעידש.

קאוד: וועל אויס אלע

'************ Code Start *************
' This code was originally written by James H Brooks.
' It is not to be altered or distributed,
' except as part of an application.
' You are free to use it in any application,
' provided the copyright notice is left unchanged.
'
' Code Courtesy of
' James H Brooks
'
Option Compare Database
Option Explicit

Dim GrpArrayPage(), GrpArrayPages()
Dim GrpNameCurrent As Variant, GrpNamePrevious As Variant
Dim GrpPage As Integer, GrpPages As Integer

Private Sub PageFooterSection_Format(Cancel As Integer, FormatCount As Integer)
Dim i As Integer
  If Me.Pages = 0 Then
    ReDim Preserve GrpArrayPage(Me.Page + 1)
    ReDim Preserve GrpArrayPages(Me.Page + 1)
    GrpNameCurrent = Me!Text2
   

    If GrpNameCurrent = GrpNamePrevious Then
   
        GrpArrayPage(Me.Page) = GrpArrayPage(Me.Page - 1) + 1
        GrpPages = GrpArrayPage(Me.Page)
       
                       
            For i = Me.Page - ((GrpPages) - 1) To Me.Page
                GrpArrayPages(i) = GrpPages
               
            Next i
           
    Else
        GrpPage = 1
        GrpArrayPage(Me.Page) = GrpPage
        GrpArrayPages(Me.Page) = GrpPage
       
       
    End If
  Else
    Me!ctlGrpPages = "Group Page " & GrpArrayPage(Me.Page) & " of " & GrpArrayPages(Me.Page)
 
  End If

  GrpNamePrevious = GrpNameCurrent
End Sub
'************ Code End *************


אוועטאר
פאטאקי08
שר עשרת אלפים
תגובות: 13862
זיך איינגעשריבן אום: דאנערשטאג אוגוסט 09, 2007 1:30 pm
פארבינד זיך:

  • ציטיר
  • צו לייגן א דאנק דארפט איר זיין אריינגעלאגט

תגובה דורך פאטאקי08 »

וואס איז די פראבלעם מיט גרופ פוטער?
לעזער פ.
שר חמישים
תגובות: 60
זיך איינגעשריבן אום: מיטוואך נאוועמבער 19, 2014 2:58 pm

  • ציטיר
  • צו לייגן א דאנק דארפט איר זיין אריינגעלאגט

תגובה דורך לעזער פ. »

אויב די סטעיטמענט פילט נישט אן די בלעטעל ביז אינטען דעמאלט וועט די סטאב זיין אין מיטען פון די בלעטעל.
stub.jpg


עס קומט אזוי
stub2.jpg
לעזער פ.
שר חמישים
תגובות: 60
זיך איינגעשריבן אום: מיטוואך נאוועמבער 19, 2014 2:58 pm

  • ציטיר
  • צו לייגן א דאנק דארפט איר זיין אריינגעלאגט

תגובה דורך לעזער פ. »

יעצט פראבירט דאס צום סוף פון די פריערדיגע קאוד

קאוד: וועל אויס אלע

   If GrpArrayPages(Me.Page) > 1 Then
    PageFooterSection.Visible = False
Else
    PageFooterSection.Visible = True
End If


עס ארבעט האלבוועגס.
דו וועלכע האבן מער ווי איין פעידש (page #5,6,) קומט עס נישט ארויס - אויף די לעצטע (page #6) אויך נישט, און די נעקסטע צוויי קאסטומערס וועלכע האבן נאר איין פעידש (page #7,8) ווייזט עס אויך נישט, נאך ווייזט עס יא.
אוועטאר
פאטאקי08
שר עשרת אלפים
תגובות: 13862
זיך איינגעשריבן אום: דאנערשטאג אוגוסט 09, 2007 1:30 pm
פארבינד זיך:

  • ציטיר
  • צו לייגן א דאנק דארפט איר זיין אריינגעלאגט

תגובה דורך פאטאקי08 »

די סיבה איז ווייל די קאוד פייערט שוין נאכן פארמעטן די פעידזש פוטער

לייג צו די Page Header

קאוד: וועל אויס אלע

="Page " & [Page] & " of " & [Pages] 


לייג דאס צו אין קאוד

קאוד: וועל אויס אלע

Private Sub PageHeaderSection_Print(Cancel As Integer, PrintCount As Integer)
 Me.PageFooterSection.Visible = (GrpArrayPage(Me.Page) = GrpArrayPages(Me.Page))
End Sub
לעזער פ.
שר חמישים
תגובות: 60
זיך איינגעשריבן אום: מיטוואך נאוועמבער 19, 2014 2:58 pm

  • ציטיר
  • צו לייגן א דאנק דארפט איר זיין אריינגעלאגט

תגובה דורך לעזער פ. »

ייש"כ
יעצט דארף איך נאר עס זאל ארויף קומען אויף א סטעיטמענט וואס האט מער ווי איין פעידש
אוועטאר
פאטאקי08
שר עשרת אלפים
תגובות: 13862
זיך איינגעשריבן אום: דאנערשטאג אוגוסט 09, 2007 1:30 pm
פארבינד זיך:

  • ציטיר
  • צו לייגן א דאנק דארפט איר זיין אריינגעלאגט

תגובה דורך פאטאקי08 »

פרוביר דאס
BTW פארוואס איינער וואס באקומט נאר איין פעידזש דארף נישט קיין פעימענט סטאב?

קאוד: וועל אויס אלע

Private Sub PageHeaderSection_Print(Cancel As Integer, PrintCount As Integer)
    If GrpArrayPage(Me.Page) > 1 And GrpArrayPages(Me.Page) > 1 Then
        Me.PageFooterSection.Visible = True
    Else
        Me.PageFooterSection.Visible = False
    End If
End Sub
לעזער פ.
שר חמישים
תגובות: 60
זיך איינגעשריבן אום: מיטוואך נאוועמבער 19, 2014 2:58 pm

  • ציטיר
  • צו לייגן א דאנק דארפט איר זיין אריינגעלאגט

תגובה דורך לעזער פ. »

פארקערט זיי דארפן יא א סטאב.
איך באמערק יעצט אז מיט די ערשטע קאוד וואס דו האסט געשריבן האבן אויך די וואס האבן מער ווי איין פיעדש אויך די סטאב אבער די ערשטע רעקארד האט נישט קיין סטאב.
משה מענטש
שר העשר
תגובות: 29
זיך איינגעשריבן אום: מאנטאג דעצעמבער 01, 2008 1:21 pm

הילף אין עקסעס פראגרעם

  • ציטיר
  • צו לייגן א דאנק דארפט איר זיין אריינגעלאגט

תגובה דורך משה מענטש »

איינער האט ארויף געלייגט דא א שטיק צייט צוריק א פרי פראגרעם פאר קליינע שוהל'ן צי האלטן חשבון אויף נדרים ונדבות. די פראגרעם איז אויף עקסעס, קען מיר איינער ביטע העלפן מיטן אפ-לאודען א פארטיגע ליסט וואס כ'האב אין עקסעל אריין צי עקסעס? א גרויסן יישר כח
שרייב תגובה

צוריק צו “מייקראסאפט עקסעל / עקסעס”