17-08-23, 03:09 PM
PHP كود :
Imports System.Data.SqlClient
Imports System.Data
Public Class Form1
Private Sub SearchButton_Click(sender As Object, e As EventArgs) Handles SearchButton.Click
Dim serverName As String = "YourServerName"
Dim databases As String() = {"Database1", "Database2"} ' قواعد البيانات المراد البحث فيها
Dim searchName As String = SearchTextBox.Text.Trim()
Dim dataTable As New DataTable()
For Each dbName In databases
Using connection As New SqlConnection($"Data Source={serverName};Initial Catalog={dbName};Integrated Security=True")
connection.Open()
Dim query As String = $"SELECT * FROM YourTableName WHERE Name LIKE '%{searchName}%'"
Using adapter As New SqlDataAdapter(query, connection)
adapter.Fill(dataTable)
End Using
End Using
Next
DataGridView1.DataSource = dataTable
End Sub
End Class

