solmaz_zm
یک شنبه 04 آذر 1386, 22:29 عصر
سلام به دوستان
من یک spنوشتم که در محیطsql server اجرا میشه و مشکلی نداره،این برنامه را ازداخل دلفی صدا می زنم اما نهایتا چیزی به جدول من اضافه نمیشه...می خوام بدونم مشکلش چیه،ضمنا هیچ پیغام خطایی نمیده...
//sp_lock
//sp_lock1.Parameters.ParamByName('Tid').Value:=temp ;
//set sp_save
sp_save1.Close;
sp_save1.Parameters.ParamByName('@type').Value:='I ';
sp_save1.Parameters.ParamByName ('@Tid').Value :=Tid.Text;
sp_save1.Parameters.ParamByName('@fname').Value :=Tname.Text;
sp_save1.Parameters.ParamByName('@family').value:= Tfamily.Text;
sp_save1.Parameters.ParamByName('@tarikh1').value: =Ttarikh1.Text;
sp_save1.Parameters.ParamByName('@tarikh2').Value :=Ttarikh2.Text;
sp_save1.Prepared;
try
sp_save1.ExecProc;
except
MessageDlg('Error',mtError , [mbok], 0);
end;
من یک spنوشتم که در محیطsql server اجرا میشه و مشکلی نداره،این برنامه را ازداخل دلفی صدا می زنم اما نهایتا چیزی به جدول من اضافه نمیشه...می خوام بدونم مشکلش چیه،ضمنا هیچ پیغام خطایی نمیده...
//sp_lock
//sp_lock1.Parameters.ParamByName('Tid').Value:=temp ;
//set sp_save
sp_save1.Close;
sp_save1.Parameters.ParamByName('@type').Value:='I ';
sp_save1.Parameters.ParamByName ('@Tid').Value :=Tid.Text;
sp_save1.Parameters.ParamByName('@fname').Value :=Tname.Text;
sp_save1.Parameters.ParamByName('@family').value:= Tfamily.Text;
sp_save1.Parameters.ParamByName('@tarikh1').value: =Ttarikh1.Text;
sp_save1.Parameters.ParamByName('@tarikh2').Value :=Ttarikh2.Text;
sp_save1.Prepared;
try
sp_save1.ExecProc;
except
MessageDlg('Error',mtError , [mbok], 0);
end;