LOGO LKS2 SQL şu anki aya göre ürünlerin listelenmesi

SELECT     dbo.LG_114_01_INVOICE.DATE_ AS [TARIH]  ,
                     dbo.LG_SLSMAN.DEFINITION_  AS [SATIŞ ELEMANI],  dbo.LG_114_ITEMS.CODE AS [URUN KODU],
                      dbo.LG_114_ITEMS.NAME AS [ÜRÜN ADI],  dbo.LG_114_ITEMS.STGRPCODE AS [URUN GRUP KODU]  ,SUM(dbo.LG_114_01_STLINE.AMOUNT) AS ADET,
SUM(dbo.LG_114_01_STLINE.VATMATRAH) AS TUTAR, dbo.LG_114_ITEMS.B2CCODE AS [3GSATF]
FROM         dbo.LG_114_01_INVOICE INNER JOIN
                      dbo.LG_114_01_STLINE ON dbo.LG_114_01_INVOICE.LOGICALREF = dbo.LG_114_01_STLINE.INVOICEREF INNER JOIN
                      dbo.LG_114_CLCARD ON dbo.LG_114_01_INVOICE.CLIENTREF = dbo.LG_114_CLCARD.LOGICALREF INNER JOIN
                      dbo.LG_114_ITEMS ON dbo.LG_114_01_STLINE.STOCKREF = dbo.LG_114_ITEMS.LOGICALREF INNER JOIN
                      dbo.LG_SLSMAN ON dbo.LG_114_01_INVOICE.SALESMANREF = dbo.LG_SLSMAN.LOGICALREF
WHERE (dbo.LG_114_01_INVOICE.DATE_ >=DATEADD(MONTH, DATEDIFF(MONTH, 0, getDate())    , 0)) 

GROUP BY dbo.LG_114_01_INVOICE.DATE_ , dbo.LG_114_ITEMS.CODE ,  dbo.LG_114_ITEMS.NAME ,  dbo.LG_SLSMAN.DEFINITION_ , dbo.LG_114_ITEMS.STGRPCODE,dbo.LG_114_ITEMS.B2CCODE

LOGO LKS2 SQL Anlik Sanal Satislar

SELECT     TOP 100 PERCENT dbo.LG_114_01_INVOICE.DATE_ AS TARİH, dbo.LG_114_01_INVOICE.FICHENO AS [FATURA NO],
                      dbo.LG_SLSMAN.DEFINITION_ AS [SATIŞ ELEMANI], dbo.LG_114_CLCARD.DEFINITION_ AS [CARİ HESAP ÜNVANI],
                      dbo.LG_114_ITEMS.NAME AS [ÜRÜN ADI], dbo.LG_114_01_STLINE.AMOUNT AS ADET, dbo.LG_114_01_STLINE.VATMATRAH AS TUTAR,
                      dbo.LG_114_01_INVOICE.GENEXP1 AS [FATURA AÇIKLAMA]
FROM         dbo.LG_114_01_INVOICE INNER JOIN
                      dbo.LG_114_01_STLINE ON dbo.LG_114_01_INVOICE.LOGICALREF = dbo.LG_114_01_STLINE.INVOICEREF INNER JOIN
                      dbo.LG_114_CLCARD ON dbo.LG_114_01_INVOICE.CLIENTREF = dbo.LG_114_CLCARD.LOGICALREF INNER JOIN
                      dbo.LG_114_ITEMS ON dbo.LG_114_01_STLINE.STOCKREF = dbo.LG_114_ITEMS.LOGICALREF INNER JOIN
                      dbo.LG_SLSMAN ON dbo.LG_114_01_INVOICE.SALESMANREF = dbo.LG_SLSMAN.LOGICALREF
WHERE      (dbo.LG_114_ITEMS.CODE = KK 01') OR

(dbo.LG_114_ITEMS.CODE = KK 05') OR
(dbo.LG_114_ITEMS.CODE = KK 06') OR
(dbo.LG_114_ITEMS.CODE = KK 06_2') OR
(dbo.LG_114_ITEMS.CODE = KK 06_3') OR
(dbo.LG_114_ITEMS.CODE = KK 07') OR
(dbo.LG_114_ITEMS.CODE = KK 08') OR
(dbo.LG_114_ITEMS.CODE = KK 09') OR
(dbo.LG_114_ITEMS.CODE = KK 10') OR
(dbo.LG_114_ITEMS.CODE = KK 11') OR

(dbo.LG_114_ITEMS.CODE = KK 12') OR
(dbo.LG_114_ITEMS.CODE = KK 12_1') OR
(dbo.LG_114_ITEMS.CODE = KK 13') OR
(dbo.LG_114_ITEMS.CODE = KK 13_2') OR
(dbo.LG_114_ITEMS.CODE = KK 13_3') OR
(dbo.LG_114_ITEMS.CODE = KK 14') OR
(dbo.LG_114_ITEMS.CODE = KK 15') OR
(dbo.LG_114_ITEMS.CODE = KK 16') OR
(dbo.LG_114_ITEMS.CODE = KK 16_1') OR
(dbo.LG_114_ITEMS.CODE = KK 17') OR
(dbo.LG_114_ITEMS.CODE = KK 17_1') OR
(dbo.LG_114_ITEMS.CODE = KK 17_2') OR
(dbo.LG_114_ITEMS.CODE = KK 17_3') OR
(dbo.LG_114_ITEMS.CODE = KK 17_4') OR
(dbo.LG_114_ITEMS.CODE = KK 17_5') OR
(dbo.LG_114_ITEMS.CODE = KK 17_6') OR
(dbo.LG_114_ITEMS.CODE = KK 17_7') OR
(dbo.LG_114_ITEMS.CODE = KK 36_0')

GROUP BY dbo.LG_114_01_INVOICE.DATE_, dbo.LG_114_01_INVOICE.FICHENO, dbo.LG_114_01_INVOICE.TIME_, dbo.LG_114_CLCARD.DEFINITION_,
                      dbo.LG_114_ITEMS.NAME, dbo.LG_SLSMAN.DEFINITION_, dbo.LG_114_01_STLINE.AMOUNT, dbo.LG_114_01_STLINE.VATMATRAH,
dbo.LG_114_01_INVOICE.CAPIBLOCK_CREATEDHOUR,dbo.LG_114_01_INVOICE.CAPIBLOCK_CREATEDMIN,dbo.LG_114_01_INVOICE.CAPIBLOCK_CREATEDSEC,
                      dbo.LG_114_01_INVOICE.GENEXP1
HAVING      (dbo.LG_114_01_INVOICE.DATE_ >= CONVERT(DATETIME, '2013-09-01 00:00:00', 102))
ORDER BY dbo.LG_114_01_INVOICE.DATE_, dbo.LG_114_01_INVOICE.CAPIBLOCK_CREATEDHOUR,dbo.LG_114_01_INVOICE.CAPIBLOCK_CREATEDMIN,dbo.LG_114_01_INVOICE.CAPIBLOCK_CREATEDSEC

PHPBOT DOVIZ KURLARI – NOBETCI ECZANE KKTC

(<?php echo date("d/m/Y")
?>
) DOVİZ KURLARI





<?php

$link = “http://www.kktcmerkezbankasi.org/&#8221;;
$parcala = ‘@

(.*?)a href=”/veriler/doviz_kurlari/kur_sorgulama”@si’;
$botara = str_replace(array(“\n”,”\r”,”\t”), NULL, file_get_contents($link));
preg_match_all($parcala, $botara, $baslik);

echo $baslik[0][0];

?>

—————————————————–

doviz kurları2

<?php
$xml = simplexml_load_file(“http://www.kktcmerkezbankasi.org/kur/gunluk.xml&#8221;);
        echo ‘

‘;
        echo ‘

         

           

           

           

         

       

‘;
        echo ‘

‘;
        foreach ($xml->Resmi_Kurlar->Resmi_Kur as $resmi_kur) {

            echo ‘

           

           

           

         
         

‘;
        }
        echo ‘

# Alış Satış
‘ . $resmi_kur->Sembol . ‘ ‘ . number_format((float) $resmi_kur->Doviz_Alis, 2, ‘.’, ‘,’) . ‘ TL ‘ . number_format((float) $resmi_kur->Doviz_Satis, 2, ‘.’, ‘,’) . ‘ TL

‘;

?>

——————————————————————————







(<?php echo date("d/m/Y")
?>
) NÖBETÇİ ECZANELER





<?php

$link = “http://www.kteb.org/&#8221;;
$parcala = ‘@

(.*?)

@si’;
$botara = str_replace(array(“\n”,”\r”,”\t”), NULL, file_get_contents($link));
preg_match_all($parcala, $botara, $baslik);

echo $baslik[0][0];

?>

Flash CS3 play button

Once karemizi ekleyip üstüne sağ tıklayıp sembole dönüştür düğme ve ok

daha sonra düğmeye çift tıklayıp üstündeyken basarken gibi aylarını aylarıyoruz 
daha sonra katman ekliyoruz oynanacak videomuz için ve karelerini oluşturruyoruz.
ve düğmenin keyframine sağ tıklıyoruz
ve oraya stop();
yazıyoruz.
ve daha sonra düğmemize sağ tıklayıp eylemlere giriyoruz
orayada : 
on (release){
gotoAndPlay(2);
}

CXGRID AUTOGETCOLUMNS VE FOOTER

        cxGrid1DBTableView1.BeginUpdate;
         cxGrid1DBTableView1.ClearItems;
          cxGrid1DBTableView1.DataController.CreateAllItems;
          cxGrid1DBTableView1.EndUpdate;

FOOTER
ÖNCE CXGRIDIN USTUNDEN CUSTOMIZE VE ADDA BAS
SONRA VIEWSDEN SOLDAKINE TIKLA VE EDIT VIEW LAYOUT YAP VE COLUMNA SAG TIKLA FOOTERA TIKLA OK DE VE SAGDAKI CXGRID1DBTABLEVIEW1COLUMNA TIKLA VE DELETE BAS

 cxGrid1DBTableView1.Columns[0].Summary.FooterKind:=skCount;

cxGrid1DBTableView1.ApplyBestFit();

DELPHIDE DBF VERITABANI DOSYASIYLA ISLEM YAPMA

ADOCONNECTION ADODATASET VE DATASOURCE EKLE
DATASOURCA TIKLA VE DATASET AYARINI ADODATASET1 YAP
ADODATASET1IN CONNECTIONINIDA ADOCONNECTION1 YAP
BUTTON VE GRID EKLE 
KODLAR BU :

 

 
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData, cxDataStorage,
  cxEdit, DB, cxDBData, Menus, cxLookAndFeelPainters, StdCtrls, cxButtons,
  cxGridLevel, cxClasses, cxControls, cxGridCustomView, cxGridCustomTableView,
  cxGridTableView, cxGridDBTableView, cxGrid, ADODB, Grids, DBGrids;

type
  TForm1 = class(TForm)
    ADODataSet1: TADODataSet;
    ADOConnection1: TADOConnection;
    DataSource1: TDataSource;
    cxGrid1DBTableView1: TcxGridDBTableView;
    cxGrid1Level1: TcxGridLevel;
    cxGrid1: TcxGrid;
    cxButton1: TcxButton;
    procedure cxButton1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.cxButton1Click(Sender: TObject);
var
dbf_folder : string;
begin
 dbf_folder:='C:\Users\JJJ\Downloads\Compressed';//set your dbf folder location here
  ADOConnection1.LoginPrompt:=false;
  ADOConnection1.ConnectionString:=Format('Provider=Microsoft.JET.OLEDB.4.0;Data Source=%s;Extended Properties=dBase IV;',[dbf_folder]);
  try
  ADOConnection1.Connected:=True;
  ADODataSet1.CommandText:='Select * from SSS.dbf'; //make your SQL query using the name of the dbf file
  ADODataSet1.Open;
   while not ADODataSet1.eof do
   begin
   //do your stuff here
   //ADODataSet1.FieldByName('').AsString
   ADODataSet1.Next;
   end;
  except
    on E : Exception do
      ShowMessage(E.Message);
  end;
   cxGrid1DBTableView1.BeginUpdate;
         cxGrid1DBTableView1.ClearItems;
          cxGrid1DBTableView1.DataController.CreateAllItems;
          cxGrid1DBTableView1.EndUpdate;

           cxGrid1DBTableView1.Columns[0].Summary.FooterKind:=skCount;

cxGrid1DBTableView1.ApplyBestFit();
end;

end.