نمایش نتایج 1 تا 18 از 18

نام تاپیک: CrosTab Query در اکسس پروجکت

Threaded View

پست قبلی پست قبلی   پست بعدی پست بعدی
  1. #14
    CREATE PROCEDURE sp_crosstab 
    @select varchar(8000),
    @sumfunc varchar(100),
    @pivot varchar(100),
    @table varchar(100)
    AS

    DECLARE @sql varchar(8000), @delim varchar(1)
    SET NOCOUNT ON
    SET ANSI_WARNINGS OFF

    EXEC ('SELECT ' + @pivot + ' AS pivot INTO ##pivot FROM ' + @table + ' WHERE 1=2')
    EXEC ('INSERT INTO ##pivot SELECT DISTINCT ' + @pivot + ' FROM ' + @table + ' WHERE '
    + @pivot + ' Is Not Null')

    SELECT @sql='', @sumfunc=stuff(@sumfunc, len(@sumfunc), 1, ' END)' )

    SELECT @delim=CASE Sign( CharIndex('char', data_type)+CharIndex('date', data_type) )
    WHEN 0 THEN '' ELSE '''' END
    FROM tempdb.information_schema.columns
    WHERE table_name='##pivot' AND column_name='pivot'

    SELECT @sql=@sql + '''' + convert(varchar(100), pivot) + ''' = ' +
    stuff(@sumfunc,charindex( '(', @sumfunc )+1, 0, ' CASE ' + @pivot + ' WHEN '
    + @delim + convert(varchar(100), pivot) + @delim + ' THEN ' ) + ', ' FROM ##pivot

    DROP TABLE ##pivot

    SELECT @sql=left(@sql, len(@sql)-1)
    SELECT @select=stuff(@select, charindex(' FROM ', @select)+1, 0, ', ' + @sql + ' ')

    EXEC (@select)
    SET ANSI_WARNINGS ON


    GO
    آخرین ویرایش به وسیله sarami : دوشنبه 20 شهریور 1385 در 20:39 عصر
    منی که نام شراب از کتاب می شستم
    زمانه کاتب دکان می فروشم کرد.

تاپیک های مشابه

  1. the query must be an updateable query
    نوشته شده توسط hamed_bostan در بخش VB.NET
    پاسخ: 2
    آخرین پست: چهارشنبه 08 فروردین 1386, 16:02 عصر
  2. فیلترکردن پرس وجوهای براساس sqlوcrostab
    نوشته شده توسط fanavar در بخش Access
    پاسخ: 4
    آخرین پست: یک شنبه 17 دی 1385, 14:22 عصر
  3. ایجادشرط کوئری درcrostab
    نوشته شده توسط fanavar در بخش Access
    پاسخ: 1
    آخرین پست: دوشنبه 20 آذر 1385, 11:37 صبح
  4. Query
    نوشته شده توسط حمیدرضاصادقیان در بخش برنامه نویسی در Delphi
    پاسخ: 3
    آخرین پست: پنج شنبه 30 شهریور 1385, 03:09 صبح
  5. در مورد SQL و Query لطفاٌ کمک کنید.
    نوشته شده توسط Abbasgholami در بخش بانک های اطلاعاتی در Delphi
    پاسخ: 6
    آخرین پست: دوشنبه 20 شهریور 1385, 13:54 عصر

قوانین ایجاد تاپیک در تالار

  • شما نمی توانید تاپیک جدید ایجاد کنید
  • شما نمی توانید به تاپیک ها پاسخ دهید
  • شما نمی توانید ضمیمه ارسال کنید
  • شما نمی توانید پاسخ هایتان را ویرایش کنید
  •