PDA

View Full Version : تبدیل تاریخ شمسی به میلادی و ثبت تاریخ میلادی



siavash_skh
پنج شنبه 29 مهر 1389, 15:25 عصر
با سلام

من تو فرمم می خوام یه فیلد تاریخ داشته باشم. به این صورت که با وارد کردن تاریخ شمسی توی فیلد فرم، توی DataBase تبدیل شده به تاریخ میلادی ثبت بشه.

یعنی یه مرحله ی تبدیل تاریخ شمسی به میلادی خودکار انجام بشه و تاریخ میلادی ثبت بشه

با تشکر

amirzazadeh
پنج شنبه 29 مهر 1389, 16:37 عصر
با سلام

من تو فرمم می خوام یه فیلد تاریخ داشته باشم. به این صورت که با وارد کردن تاریخ شمسی توی فیلد فرم، توی DataBase تبدیل شده به تاریخ میلادی ثبت بشه.

یعنی یه مرحله ی تبدیل تاریخ شمسی به میلادی خودکار انجام بشه و تاریخ میلادی ثبت بشه

با تشکر
سلام
شما ميتونين اين تابع رو به توابع آقاي آزادي كه سورسش تو همين تالار هست اضافه كنيد:


Public Function miladi(x As Long) As Date
Dim Shamsi_Mabna As Long
Dim Miladi_mabna As Date
Dim dif As Long
Shamsi_Mabna = 791012
Miladi_mabna = #1/1/2001#
dif = Diff(Shamsi_Mabna, x)
miladi = DateAdd("D", dif, Miladi_mabna)
End Function
موفق باشيد

ali190
پنج شنبه 29 مهر 1389, 16:45 عصر
سلام
از تابع J_GREGORIANDATE که که در ماژول پیوست قرار دارد استفاد کنید
یاعلی

mazemi2
پنج شنبه 29 مهر 1389, 17:30 عصر
با سلام. اگر درخواستم خيلي ابتدايي هست معذرت ميخوام. دوست عزيز علي 190 اگر كمي ريزتر در مورد فايل ارسالي تون توضيح بدين ممنون ميشم. دقيقا براي استفاده از فايلتان چه بايد كرد.:خجالت:
سپاسگذارم.

ali190
پنج شنبه 29 مهر 1389, 18:25 عصر
سلام
یک نمونه ساده برات درست کردم
بازهم مشکل داشتی بگو
یاعلی

siavash_skh
پنج شنبه 29 مهر 1389, 20:49 عصر
سلام
یک نمونه ساده برات درست کردم
بازهم مشکل داشتی بگو
یاعلی

ممنون از جواب های خیلی خوبتون
آقا علی نمونتون خیلی خوبه، ولی ازون جایی که من مبتدیم نمی دونم چیکار کنم که تو فرم من فقط TextBox بالایی باشه و وقتی که تاریخ شمشی رو وارد می کنم به جای تاریخ شمسی که تو فرم نمایش داده میشه تبدیل شدش به میلادی توی Table دیتابیس ثبت بشه، ولی یوزر با تاریخ شمسی که تو فرم میبینه کار کنه

ممنون

ali190
پنج شنبه 29 مهر 1389, 22:00 عصر
سلام
برای اینکار میتونی از متد رکوردست استفاده کنی
اگر بتونی در مورد برنامه ای که میخوای بسازی شاید راتتر بتونم کمکت کنم
شاید با توضیحات لازم از ذخیره تاریخ میلادی در بانکت منصرف شدی
یاعلی

siavash_skh
پنج شنبه 29 مهر 1389, 22:22 عصر
سلام
برای اینکار میتونی از متد رکوردست استفاده کنی
اگر بتونی در مورد برنامه ای که میخوای بسازی شاید راتتر بتونم کمکت کنم
شاید با توضیحات لازم از ذخیره تاریخ میلادی در بانکت منصرف شدی
یاعلی

راستش برنامه ای که می خوام بسازم برای یک کار تحقیقاتیه
بعدا اطلاعات باید وارد SPSS بشه و آنالیز

ولی خوب تو SPSS تاریخ ها باید میلادی باشه تا بشه باهاش کار کرد

7skies
جمعه 30 مهر 1389, 23:10 عصر
اگه فضای فرم بهتون اجازه میده. شما یک فیلد ثانویه به صورت non visible تعریف کنید که هرگاه در فیلد اولیه در فرم، تاریخ شمسی وارد شد، آنگاه معادل آن به صورت میلادی در این فیلد ثانویه نوشته شود.بعد داده این فیلد ثانویه در جدولتون ذخیره شود.برعکس این کار هم می تونید برای نمایش تاریخ شمسی برای یوزر انجام دهید.
*اگه جدول برنامه بهتون اجازه میده هردو فرمت رو ذخیره کنید. وبا تاریخ میلادی کارتون انجام بدید و تاریخ شمسی باشد برای کار یوزر

dadsara
شنبه 01 آبان 1389, 16:58 عصر
يك نمونه همراه ماژولهاي مورد نياز