| | 1 | = Obliczanie ceny ogłoszenia = |
| | 2 | |
| | 3 | przykład: |
| | 4 | {{{ |
| | 5 | set ctb=CreateObject("CTB.Application") |
| | 6 | ctb.LoadCennik "D:\Projects\giełda\CT.Biuro\xmldata\cennik2008.xml" |
| | 7 | |
| | 8 | Set Conn=ctb.ConnOpen("Provider=SQLOLEDB.1;Password=POLzax;Persist Security Info=True;User ID=sa;Initial Catalog=CTB_BOK_TEST;Data Source=10.0.1.1") |
| | 9 | |
| | 10 | |
| | 11 | where="idp=130431" |
| | 12 | Conn.Execute "update OGL set WYROZNIENIE=0 where " & where |
| | 13 | cena=ctb.Przelicz(where) |
| | 14 | WSCript.Echo cena |
| | 15 | Conn.Execute "update OGL set WYROZNIENIE=1 where " & where |
| | 16 | cena=ctb.Przelicz(where) |
| | 17 | WSCript.Echo cena |
| | 18 | |
| | 19 | |
| | 20 | |
| | 21 | }}} |
