使用FOR XML PATH將多筆資料組合成一個字串

 參考:使用FOR XML PATH將多筆資料組合成一個字串

--

在SQL 結尾加入  FOR XML PATH('')

SELECT  ',' + NAME  FROM TEAMLIST WHERE TEAMID = 1

FOR XML PATH('')

jquery-az

 jquery-az

----

很不錯的網站,很多程式語言的教學

應有盡有!!  

Blazor.WebForm.Components

Blazor.WebForm.Components

 ----

MS-SQL while

   declare @go_qty int

  set @go_qty=1

  while (@go_qty<=2)

  begin

     print @go_qty

set @go_qty+=1

 

  end

windows 11 基於安全性考量,使用者帳號已被封鎖

 參考引用來源

--

windows 11 基於安全性考量,使用者帳號已被封鎖

使用Windows 鍵+ R 開啟執行視窗，並輸入gpedit.msc。 依序點開，

電腦設定=＞Windows 設定=＞安全性設定=＞帳戶原則=＞帳戶鎖定原則，並點擊『帳戶鎖定閾值』。 將設定值調整為0 即可。

SQL 判斷小數點

 select 3.2%1

TrafficMonitor 開放原始碼的網路速度與硬體監控工具

 TrafficMonitor GitHub 官網

---

快速檢查Sql Server是否可以連線

 參考引用:[C#]快速檢查Sql Server是否可以連線

--

Imports System.Diagnostics

Imports System.Net.Sockets

Imports System.Threading

Public Class Form4

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

        Dim ip = "192.168.1.10" 'SQL Server主機的IP位址。

        Dim port = 1433 'SQL Server的port預設是1433。

        Dim sw As Stopwatch = New Stopwatch()

        sw.Start()

        Dim isConnection = TestConn(ip, port)

        sw.[Stop]()

        Dim message = String.Empty

        If isConnection Then

            message = "連線成功。 經過{0}秒。"

        Else

            message = "連線失敗了! 經過{0}秒!"

        End If

        Dim t = sw.ElapsedMilliseconds / 1000.0

        MessageBox.Show(String.Format(message, t))

    End Sub

    Public Function TestConn(ip As String, port As Integer) As Boolean

        Try

            Using tc As TcpClient = New TcpClient()

                Dim result As IAsyncResult = tc.BeginConnect(ip, port, Nothing, Nothing)

                Dim start = Date.Now

                Do

                    SpinWait.SpinUntil(Function() False, 100)

                    If result.IsCompleted Then Exit Do

                Loop While Date.Now.Subtract(start).TotalSeconds < 0.3

                If result.IsCompleted Then

                    tc.EndConnect(result)

                    Return True

                End If

                tc.Close()

                If Not result.IsCompleted Then

                    Return False

                End If

            End Using

        Catch ex As Exception

            Console.WriteLine(ex.Message)

            Throw

        End Try

        Return False

    End Function

End Class