בדיקת תאריך

sumoking

New member
בדיקת תאריך

האם יש קוד שבודק מהו התאריך ביום נוכחי? ז"א שהקוד יבדוק מה התאריך לפי הwindows? תודה
 

MaD-d0g

New member
תסביר את עצמך...

אם היית אומר הפוך.. הייתי מבין.. אבל לבדוק מה התאריך ביום נוכחי ? איזה יום ? רביעי ? איזה רביעי.. .? ה 30/5 ?
 

sumoking

New member
הסתדרתי בקשר לזה אבל עוד שאלה יש לי..

האם זה תיקני לעשות ככה?
dim b as date b = adosent.Recordset.Fields("date").Value​
הוא מציג לי שגיאה
 

שינאל

New member
כדי לעשות זאת...

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

sumoking

New member
זה הקוד במלואו+השגיאה

adosent.Recordset.MoveFirst Do While adosent.Recordset.EOF = False b = adosent.Recordset.Fields("date").Value a = DateDiff("d", b, Date) MsgBox a adosent.Recordset.MoveNext Loop​
השגיאה שאני מקבל היא object variable or with block variable not set
 

שינאל

New member
כנראה שלא הגדרת משתנה Data type

dim rs As ADODB.Recordset Set rs = New ADODB.Recordset​
וזה בקצרה. יש כאן מספיק דוגמאות להמחשה.
 
למעלה