kia1349
چهارشنبه 23 خرداد 1386, 06:59 صبح
این هم فایلهای ضمیمه و دستور برای پرینت
SET REPORTBEHAVIOR 90
Local lcDirectory, ;
loHTMLListener, ;
loListener, ;
loShell
lcDirectory = Sys(16)
lcDirectory = Addbs(Justpath(Substr(lcDirectory, At(' ', lcDirectory, 2) + 1)))
loListener = Newobject('_ReportListener', '_reportlistener.vcx')
loListener.ListenerType = 1
Report Form tbrep.FRX Object loListener &&Nowait
اگر دوستان توی این زمینه مثالهائی دارند در همین قسمت قرار بدهند
SET REPORTBEHAVIOR 90
Local lcDirectory, ;
loHTMLListener, ;
loListener, ;
loShell
lcDirectory = Sys(16)
lcDirectory = Addbs(Justpath(Substr(lcDirectory, At(' ', lcDirectory, 2) + 1)))
loListener = Newobject('_ReportListener', '_reportlistener.vcx')
loListener.ListenerType = 1
Report Form tbrep.FRX Object loListener &&Nowait
اگر دوستان توی این زمینه مثالهائی دارند در همین قسمت قرار بدهند