amir_ir
یک شنبه 29 شهریور 1388, 13:44 عصر
با سلام خدمت همه دوستان
فیلدی در جدول از جنس (10)Nvarchar تعریف کردم و تاریخ در اون مثلا به شکل 02/12/1388 ذخیره میشه. به دلایلی نمیخوام از MaskEdit استفاده کنم. با 3 عدد EditBox روز ، ماه و تاریخ رو میگیرم و اونها رو با 2 عدد / به هم concat و در یک متغیر از جنس String ذخیره میکنم . با استفاده از کد زیر، تاریخ رو به دیتابیس وارد میکنم ولی جالبه چیزی که وارد دیتابیس میشه تاریخی به فرمت بالا نیست، بلکه 1388 تقسیم به 12 شده و جوابش تقسیم به 2 شده و در نهایت عدد 57 به دیتابیس وارد میشه.
1)به چه شکل میشه کد رو تغییر داد که اعداد بالا به هم تقسیم نشن و به عنوان String دست نخورده وارد دیتابیس بشن؟
2 ) اصلا چرا به هم تقسیم میشن؟ همه جای این کد از String استفاده میشه؟ کجای این کد به هم تقسیم میشن؟
3) در ضمن من دقیقا علت دو عدد + در دو طرف متغیر Concat رو در کد زیر نمیدونم؟ اگر توضیح بدید ممنون میشم .
concat:=(TxtFixYear.Text)+('/')+(TxtFixMounth.Text)+('/')+(TxtFixDay.Text);
with FrmDMTransport.ADOQFixCar do
begin
FrmDMTransport.ADOQFixCar.SQL.Clear;
FrmDMTransport.ADOQFixCar.SQL.Text:='Insert into Fix_Car(FixDate) values('+concat+') ' ;
FrmDMTransport.ADOQFixCar.ExecSQL;
end;
فیلدی در جدول از جنس (10)Nvarchar تعریف کردم و تاریخ در اون مثلا به شکل 02/12/1388 ذخیره میشه. به دلایلی نمیخوام از MaskEdit استفاده کنم. با 3 عدد EditBox روز ، ماه و تاریخ رو میگیرم و اونها رو با 2 عدد / به هم concat و در یک متغیر از جنس String ذخیره میکنم . با استفاده از کد زیر، تاریخ رو به دیتابیس وارد میکنم ولی جالبه چیزی که وارد دیتابیس میشه تاریخی به فرمت بالا نیست، بلکه 1388 تقسیم به 12 شده و جوابش تقسیم به 2 شده و در نهایت عدد 57 به دیتابیس وارد میشه.
1)به چه شکل میشه کد رو تغییر داد که اعداد بالا به هم تقسیم نشن و به عنوان String دست نخورده وارد دیتابیس بشن؟
2 ) اصلا چرا به هم تقسیم میشن؟ همه جای این کد از String استفاده میشه؟ کجای این کد به هم تقسیم میشن؟
3) در ضمن من دقیقا علت دو عدد + در دو طرف متغیر Concat رو در کد زیر نمیدونم؟ اگر توضیح بدید ممنون میشم .
concat:=(TxtFixYear.Text)+('/')+(TxtFixMounth.Text)+('/')+(TxtFixDay.Text);
with FrmDMTransport.ADOQFixCar do
begin
FrmDMTransport.ADOQFixCar.SQL.Clear;
FrmDMTransport.ADOQFixCar.SQL.Text:='Insert into Fix_Car(FixDate) values('+concat+') ' ;
FrmDMTransport.ADOQFixCar.ExecSQL;
end;