amir.mortezazadeh
شنبه 19 دی 1388, 14:14 عصر
سلام
من یک وب سرویس دارم که بانک داده (mdf) متصل شده حالا می خواهم در یک فرم جدا نام و نام خانوادگی هر دانش اموز رو از بانک داده بخونه و به عنوان User و Password قبول کنه و اگر اشتباه بود پیغام خطا بده
من این کد رو برای اتصال توی وب سرویس گذاشتم :
<WebMethod()> _
Public Function data() As DataSet
objDataAdapter.SelectCommand = New SqlCommand()
objDataAdapter.SelectCommand.Connection = objConnection
objDataAdapter.SelectCommand.CommandText = "SELECT * FROM Student "
objDataAdapter.SelectCommand.CommandType = CommandType.Text
'
Dim SqlCB As New SqlCommandBuilder(objDataAdapter)
objDataAdapter.UpdateCommand = SqlCB.GetUpdateCommand
objDataAdapter.DeleteCommand = SqlCB.GetDeleteCommand
objDataAdapter.InsertCommand = SqlCB.GetInsertCommand
'
objConnection.Open()
objDataAdapter.Fill(objDataSet, "Student")
objConnection.Close()
Return objDataSet.Tables("Student").DataSet
End Function
اگه ممکن کمکم کنید ممنون میشم
اینم خود دستورات وب سرویس
من یک وب سرویس دارم که بانک داده (mdf) متصل شده حالا می خواهم در یک فرم جدا نام و نام خانوادگی هر دانش اموز رو از بانک داده بخونه و به عنوان User و Password قبول کنه و اگر اشتباه بود پیغام خطا بده
من این کد رو برای اتصال توی وب سرویس گذاشتم :
<WebMethod()> _
Public Function data() As DataSet
objDataAdapter.SelectCommand = New SqlCommand()
objDataAdapter.SelectCommand.Connection = objConnection
objDataAdapter.SelectCommand.CommandText = "SELECT * FROM Student "
objDataAdapter.SelectCommand.CommandType = CommandType.Text
'
Dim SqlCB As New SqlCommandBuilder(objDataAdapter)
objDataAdapter.UpdateCommand = SqlCB.GetUpdateCommand
objDataAdapter.DeleteCommand = SqlCB.GetDeleteCommand
objDataAdapter.InsertCommand = SqlCB.GetInsertCommand
'
objConnection.Open()
objDataAdapter.Fill(objDataSet, "Student")
objConnection.Close()
Return objDataSet.Tables("Student").DataSet
End Function
اگه ممکن کمکم کنید ممنون میشم
اینم خود دستورات وب سرویس