السلام عليكم هنالك مشكلة في هذين السطرين
Dim server As New Server(New ServerConnection(Con))
server.ConnectionContext.ExecuteNonQuery(st)
السطر الأول يعطي خطأ(()too many arguments to puplic sub new)
السطر الثاني يعطي خطأ (connection contex is not a member of E_PHARMA.server)
كود :
Con = New SqlConnection("Data source=" & ComboBox1.Text & ";Initial Catalog=master;Integrated Security=True;MultipleActiveResultSets=True")
Con.Open()
Dim cb3 As String = "Create Database drug"
cmd = New SqlCommand(cb3)
cmd.Connection = Con
cmd.ExecuteNonQuery()
Con.Close()
Using sr As StreamReader = New StreamReader(Application.StartupPath & "\DATABASESCRIPT.sql")
st = sr.ReadToEnd()
Dim server As New Server(New ServerConnection(Con))
server.ConnectionContext.ExecuteNonQuery(st)
End Using
يجب ان تتأكد بالبداية بان قاعدة البيانات موجودة اة غير موجودة
على كل حال هذا الكود
PHP كود :
Con = New SqlConnection("Data source=" & ComboBox1.Text & ";Initial Catalog=master;Integrated Security=True;MultipleActiveResultSets=True")
Con.Open()
Dim cb2 As String = "Select * from sysdatabases where name='drug'"
Dim cmd As New SqlCommand(cb2)
cmd.Connection = Con
Dim rdr As SqlDataReader
rdr = cmd.ExecuteReader()
If rdr.Read() Then
Con = New SqlConnection("Data source=" & ComboBox1.Text & ";Initial Catalog=master;Integrated Security=True;MultipleActiveResultSets=True")
Con.Open()
Dim cb1 As String = "Drop Database drug"
cmd = New SqlCommand(cb1)
cmd.Connection = Con
cmd.ExecuteNonQuery()
Con.Close()
Con = New SqlConnection("Data source=" & ComboBox1.Text & ";Initial Catalog=master;Integrated Security=True;MultipleActiveResultSets=True")
Con.Open()
Dim cb As String = "Create Database drug"
cmd = New SqlCommand(cb)
cmd.Connection = Con
cmd.ExecuteNonQuery()
Con.Close()
Using sr As StreamReader = New StreamReader(Application.StartupPath & "\DATABASESCRIPT.sql")
st = sr.ReadToEnd()
Dim server As New Server(New ServerConnection(Con))
server.ConnectionContext.ExecuteNonQuery(st)
End Using
شكرا لك أخي الكريم
لكن في الحقيقة مشكلتي ليست في القاعدة بل قبل اجراء عملية Build
يظهر هذا الخطأ عند السطر : {Dim server As New Server(New ServerConnection(Con))}
عنوان الخطأ {()too many arguments to puplic sub new) }
و الخطأ الآحر عند السطر : { server.ConnectionContext.ExecuteNonQuery(st)}
عنوان الخطأ : {connection contex is not a member of E_PHARMA.server}
هل هنالك مكتبة معينة مطلوب تواجدها غير التالي :
Imports Microsoft.Win32
Imports System.Data.SqlClient
Imports Microsoft.SqlServer.Management.Smo
Imports Microsoft.SqlServer.Server
Imports Microsoft.SqlServer.Management.Smo.ServerProxyAccount
Imports Microsoft.SqlServer.Management.Common
Imports System.IO
عزيزي aliabdullah
قبل المسارعة في النشر يجب عليك التاكد من بعض الامور
اولا : قم بترجمة الرسالة الى العربية
()too many arguments to puplic sub new
معناها ان هناك بارامترات زائدة
لذا احذف اما الCon او New ServerConnection(Con) بالكامل
ويمكنك معرفة ما تحتاجه من بارامترات بالاستفادة من مساعدة الاستوديو
