קטעי קוד שימושים לACCESS בעיקר

[chaim1989]

לכל המעונין שיצור איתי קשר
1. קוד שמבטל את הפתיחה של מסד הנתונים בהחזקת shift בעת כניסה
2. קוד לפתיחת תיבה משולבת בעת קבלת מוקד
<לא ניתן לפרסם מיילים באופן פומבי>

 

[אריה123]

חיים, איך זה?

Sub &#225;&#232;&#236;&#242;÷&#233;&#244;&#228;()
Const DB_Boolean As Long = 1
ChangeProperty "AllowBypassKey", DB_Boolean, False
End Sub
Sub &#224;&#244;&#249;&#248;&#242;÷&#233;&#244;&#228;()
Const DB_Boolean As Long = 1
ChangeProperty "AllowBypassKey", DB_Boolean, True
End Sub

Function ChangeProperty(strPropName As String, _
varPropType As Variant, _
varPropValue As Variant) As Integer

Dim dbs As Object, prp As Variant
Const conPropNotFoundError = 3270

Set dbs = CurrentDb
On Error GoTo Change_Err
dbs.Properties(strPropName) = varPropValue
ChangeProperty = True

Change_Bye:
Exit Function

Change_Err:
If Err = conPropNotFoundError Then ' Property not found.
Set prp = dbs.CreateProperty(strPropName, _
varPropType, varPropValue)
dbs.Properties.Append prp
Resume Next
Else
' Unknown error.
ChangeProperty = False
Resume Change_Bye
End If
End Function

(המפתח לאקסס)

"הכל שלך ומידך נתנו לך"

 

[chaim1989]

למעשה ראית שאת חזקה גם שם ראיתי את הכתובת מייל שלך לא זוכר בדיוק ביקוש עבודה או משהו כזה

 

[chaim1989]

אבל את הפתיחת תיבה משולבת אין לך!?
נראה לי שראיתי את זה בdr v-b אחרי שעשיתי את זה
זה משהו כמו בעת קבלת מוקד שם פקד .dropdown
פשוט מאוד ואני הייתי עושה את זה תמיד בתנאי בטופס הגרדות תיבת סימון "פתח תיבות משולבות בעת הכניסה"

 

[אריה123]

אולי תוכל לעזור לי באשכול הזה ? בתודה מראש

http://www.prog.co.il/showthread.php?t=37368

אני שולחת מיילים ישר מהאקסס, (כ300 מיילים ביום), ואני לא רוצה להצטרך לעשות על כל אימייל "שלח" של האאוטלוק כי זה מאט את העבודה מאד..
ישנה פקודה ששולחת את המיילים ישר לאאוטלוק, אבל האאוטלוק מתנגד ומוציא לי הודעה מרגיזה, האם אני מסכימה לאשר לאנשים אחרים לשלוח אימיילים מהמחשב שלי, וזה לקוח המון זמן.
יש לזה פתרון ?

 

[chaim1989]

מיכל, לקחתי את זה אני מנסה לבדוק

 

[SHL]

בקשר לפתיחת תיבה משולבת בעת כניסה
אפשר לכתוב בקוד

docmd.senkeys "{F4}"

אני לא בטוח בקשר ל F4 אולי F אחר
בהצלחה

 

[chaim1989]

אבל למה לעקוף את הישיר activecontrol.dropdown