แสดงบทความที่มีป้ายกำกับ SQL Server แสดงบทความทั้งหมด
แสดงบทความที่มีป้ายกำกับ SQL Server แสดงบทความทั้งหมด

วันพฤหัสบดีที่ 26 มีนาคม พ.ศ. 2569

Search Table Name of all database [ ค้นหาชือ Table ใน Database server ทั้งหมด ]

 --------------

-- Search Table Name inside database server
-- 1.
--------------
DECLARE @SearchTerm NVARCHAR(100) = '%TableName%';

EXEC sp_MSforeachdb '
USE [?];
SELECT 
    DB_NAME() AS DatabaseName,
    s.name AS SchemaName,
    t.name AS TableName,
    t.create_date AS CreateDate
FROM sys.tables t
JOIN sys.schemas s ON t.schema_id = s.schema_id
WHERE t.name LIKE @SearchTerm';
--------------
-- Search Table Name inside database server
--2.
--------------
DECLARE @TableName NVARCHAR(256) = 'TableName'; -- Table to find
DECLARE @Query NVARCHAR(MAX) = '';

SELECT @Query = @Query + 'SELECT ''' + name + ''' AS DatabaseName, s.name COLLATE Latin1_General_CI_AS, t.name COLLATE Latin1_General_CI_AS 
FROM [' + name + '].sys.tables t 
JOIN [' + name + '].sys.schemas s ON t.schema_id = s.schema_id 
WHERE t.name = ''' + @TableName + ''' UNION ALL '
FROM sys.databases 
WHERE state = 0; -- Only online databases

-- Remove the last 'UNION ALL'
IF LEN(@Query) > 0
BEGIN
    SET @Query = LEFT(@Query, LEN(@Query) - 10);
    EXEC sp_executesql @Query;
END
--------------

วันอาทิตย์ที่ 29 มิถุนายน พ.ศ. 2568

SQL script delete all table of database


 SELECT 

'TRUNCATE TABLE ' + quotename(S.name) + '.' + quotename(T.name) + char(13) + char(10) + ' ' + char(13) + char(10) 

FROM sys.tables T 

JOIN sys.schemas S ON T.schema_id = S.schema_id

AND T.name NOT LIKE '%SomeWordOfTableName%'


** Copy output script to running for delete


SQL count row all table of database

 SELECT       

QUOTENAME(SCHEMA_NAME(sOBJ.schema_id)) + '.' + QUOTENAME(sOBJ.name) AS [TableName]       

, SUM(sPTN.Rows) AS [RowCount] 

FROM        sys.objects AS sOBJ       

INNER JOIN sys.partitions AS sPTN             

ON sOBJ.object_id = sPTN.object_id WHERE       sOBJ.type = 'U'       

AND sOBJ.is_ms_shipped = 0x0       

AND index_id < 2 -- 0:Heap, 1:Clustered 

GROUP BY        sOBJ.schema_id       , sOBJ.name 

ORDER BY SUM(sPTN.Rows) desc

วันพฤหัสบดีที่ 21 มีนาคม พ.ศ. 2562

SQL Server Skill Table Query

💛ต้องการแก้ไขและแทนค่าบางค่าใน Column💛

UPDATE dbo._YourTable_
SET _ColumnName_ = REPLACE(_ColumnName_, '_OldValue_', '_NewValue_')
WHERE FilterSQL LIKE '%_SomeValue_%' //บรรทัดนี้มีหรือไม่มีก็ได้
------------------------------------------------------------------
💙[Add column Table]💙 ALTER TABLE dbo._YourTable_ ADD _ColumnName1_ VARCHAR(20) NULL ,_ColumnName2_ INT NULL ; ------------------------------------------------------------------ 💚[Modify type column of table ]💚 ALTER TABLE _YourTable_ ALTER COLUMN _ColumnName_ VARCHAR(MAX); ------------------------------------------------------------------ 💗[Select ALL Table and Stored on DB]💗 SELECT * FROM SYSOBJECTS --WHERE -- xtype = 'U' ORDER BY crdate desc; GO ------------------------------------------------------------------

วันพฤหัสบดีที่ 14 กุมภาพันธ์ พ.ศ. 2562

SQL Server Cannot Drop Column


ลบ Column ของ Table แล้ว Error

Msg 5074, Level 16, State 1, Line 27
The object 'DF__TableName__ColumnName__04DCFCE9' is dependent on column 'ColumnName'.
Msg 4922, Level 16, State 9, Line 27
ALTER TABLE DROP COLUMN ColumnName failed because one or more objects access this column.


เนื่องจากมีเป็น Field Default Contraint  สามารถ drop column ได้ด้วย script นี้

DECLARE @ConstraintName nvarchar(200)
SELECT @ConstraintName = Name FROM SYS.DEFAULT_CONSTRAINTS WHERE PARENT_OBJECT_ID = OBJECT_ID('__TableName__') AND PARENT_COLUMN_ID = (SELECT column_id FROM sys.columns WHERE NAME = N'__ColumnName__' AND object_id = OBJECT_ID(N'__TableName__'))
IF @ConstraintName IS NOT NULL
EXEC('ALTER TABLE __TableName__ DROP CONSTRAINT ' + @ConstraintName)
IF EXISTS (SELECT * FROM syscolumns WHERE id=object_id('__TableName__') AND name='__ColumnName__')
EXEC('ALTER TABLE __TableName__ DROP COLUMN __ColumnName__')


โดยแทนชื่อTableที่ต้องการลบที่ __TableName__ และแทนชื่อColumnที่ต้องการลบที่ __ColumnName__

วันจันทร์ที่ 26 พฤศจิกายน พ.ศ. 2561

SQL Server 2017 Cannot find one or more components. Please re install the application

เปิดใช้ SQL SERVER แล้วพบ Error Message box : Cannot find one or more components. Please re install the application

1.ถ้าติดตั้งโปรแกรม SQL SERVER อีกครั้งแล้วยังเปิดใช้โปรแกรมไม่ได้
If can not openning program after you re-install SQL SERVER.

2.ถ้าลบ instance name แล้วยังเปิดใช้งานโปรแกรมไม่ได้
If can not openning program after you remove instance name.

3.ถ้าลบ Following Folder ที่ Registry แล้วยังเปิดใช้งานโปรแกรมไม่ได้
If can not openning program after delete Following Folder of Registry.

ให้ดาวน์โหลด Visual Studio Shell 2015
( URL : http://www.visualstudioextensibility.com/downloads/vs-shells/ ) มา แล้วติดตั้งใหม่อีกครั้ง ซึ่งระยะเวลาในการติดตั้งขึ้นอยู่กับทรัพยากรเครื่องนั้นๆ
Download Visual Studio Shell 2015
( URL : http://www.visualstudioextensibility.com/downloads/vs-shells/ ) and Re-install again.

หากติดตั้งVisual Studio Shell 2015 ไม่ได้ให้ตรวจสอบ .Net Framework ของเครื่อง เอา .NetFramework 3.5 ออก ตามภาพด้านล่าง แล้วดับเบิ้ลคลิกเพื่อติดตั้งใหม่อีกรอบ
If can not re-install Visual Studio Shell 2015 make sure .Net Framework 3.5 was disable. Check see picture below.


SQL Server 2017 Remove Instance name

ลบ Instance Name ของ SQL Server 2017
ปล.ในเครื่องลบทั้ง sql server 2017 และ 2008 R2 ใช้วิธีการเดียวกันต่างกันที version ต่อท้าย และถ้าในเครื่องมี instance name มากกว่า 1 instance name ให้รันวิธีการนี้อีกรอบตามจำนวน instance name ที่ต้องการลบ ระยะเวลาที่ใช้ขึ้นอยู่กับทรัพยากรเครื่องนั้นๆ

1. ไปที่ control panel

2. เลือก Uninstall a program


3. choose microsoft sql server 2017 (64 bit)


4. Select Remove on message box


5. Show message and wating


6. Select instance name you want to remove and cilck Next button


7. Select Feature of Instance want to remove and cilck Next button


8. Waiting to preparing


9. Prepare success and click Remove button


10. Remove Processing 


11. Remove Successful !! 
If you have many instance name you must running process for choose your instance name again



วันพุธที่ 14 มีนาคม พ.ศ. 2561

SQL Server : Delete multiple Stored Procedures in One Database

SELECT 'DROP PROCEDURE [' + SCHEMA_NAME(p.schema_id) + '].[' + p.NAME + ']'
FROM sys.procedures p  WHERE p.name like 'SSIS%'
ORDER BY p.name

SQL Server : Delete all tables in a SQL Server database

DECLARE @Sql NVARCHAR(500) DECLARE @Cursor CURSOR

SET @Cursor = CURSOR FAST_FORWARD FOR
SELECT DISTINCT sql = 'ALTER TABLE [' + tc2.TABLE_NAME + '] DROP [' + rc1.CONSTRAINT_NAME + ']'
FROM INFORMATION_SCHEMA.REFERENTIAL_CONSTRAINTS rc1
LEFT JOIN INFORMATION_SCHEMA.TABLE_CONSTRAINTS tc2 ON tc2.CONSTRAINT_NAME =rc1.CONSTRAINT_NAME

OPEN @Cursor FETCH NEXT FROM @Cursor INTO @Sql

WHILE (@@FETCH_STATUS = 0)
BEGIN
Exec sp_executesql @Sql
FETCH NEXT FROM @Cursor INTO @Sql
END

CLOSE @Cursor DEALLOCATE @Cursor
GO

EXEC sp_MSforeachtable 'DROP TABLE ?'
GO

วันอังคารที่ 12 กุมภาพันธ์ พ.ศ. 2556

function send mail VB.net

function sent Mail >>> VB.net

----------------------------------------------------
Imports System.Net.Mail
Imports System.Net

Private Sub SendMail()
Dim myMail As New MailMessage
myMail.To.Add("mail@domainmail.com") 'ชื่อเมลล์ที่ต้องการส่งถึง
myMail.CC.Add("mail@domainmail.com") 'อ้างอิงถึงเมลล์ใด
myMail.From = New MailAddress("mail@domainmail.com") 'จากเมลล์ใด(ส่วนมากเป็นชื่อเมลล์อัตโนมัติ)
myMail.Subject = "หัวเรืองเมลลฺ์ : " & TextBox1.Text
myMail.Body = "ส่วนของเนื้อเรื่อง : " & TextBox1.Text & vbCrLf & _
" ส่วนของเนื้อเรื่อง: " & TextBox8.Text & " ลิตร " & vbCrLf & _
"ส่วนของเนื้อเรื่อง : " & TextBox9.Text & " กม./ลิตร " & vbCrLf & _
"Trip meter : " & TextBox10.Text & " ลิตร " & vbCrLf & _
"%GPS ส่วนของเนื้อเรื่อง : " & TextBox25.Text & " % " & vbCrLf & _
"ส่วนของเนื้อเรื่อง : " & TextBox7.Text & " กม. " & vbCrLf & _
"ส่วนของเนื้อเรื่องม : " & DropDownList8.Text & vbCrLf & _
"ส่วนของเนื้อเรื่อง : " & DropDownList5.Text & " " & DropDownList6.Text & " " & DropDownList7.Text & vbCrLf & _
"ส่วนของเนื้อเรื่อง : " & TextBox6.Text & ":" & TextBox21.Text & vbCrLf & vbCrLf & _
"=================================" & vbCrLf & _
"ชื่อระบบ (เมลล์อัตโนมัติ)"

'SMTP Authenticate
Dim Smtp As New SmtpClient("mail.DomainMail.com")
Smtp.DeliveryMethod = SmtpDeliveryMethod.Network
Smtp.Credentials = New NetworkCredential("mail@domainmail.com", "12345678")
Smtp.Send(myMail)

End Sub

Search Table Name of all database [ ค้นหาชือ Table ใน Database server ทั้งหมด ]

  -------------- -- Search Table Name inside database server -- 1. -------------- DECLARE @SearchTerm NVARCHAR ( 100 ) = '% TableN...