• الإعلانات

    • فيصل الحربي

      تسجيل عضوية جديدة في المنتدى   01/31/2016

      السلام عليكم ورحمة الله وبركاته  عزيزي العضو الجديد :  حاليا رسالة الإيميل لتأكيد صحة إيميلكم تذهب للبريد العشوائي ( جاري حل المشكلة )  فإذا لم تجد رسالة التحقق من إيميلكم في صندوق الوارد لديكم إتجه للبريد العشوائي ( JUNK)  وقم بتفعيل إشتراككم من هناك   

xghostx

اعضاء جدد
  • عدد المشاركات

    4
  • تاريخ الانضمام

  • تاريخ اخر زياره

كل شيء نشر بواسطة xghostx

  1. و ش صار معكم يا فشلين
  2. شباب عندي table فيها  column في ارقام  متسلسلة وبدي طريقة طلع فيها الارقام الناقصة بدون عمل مقارنة مع table تانية لانه عدد ال records فوق ال 2 مليون بستخدام PL ارجو المساعدة وشكرا
  3. شباب علمت داتا بيز صغيرة فيها شوية معلومات عن الطلاب  بجامعة الاسم واسم الاب والام  الخ الخ  وبدي الادارة تدخل رقم الجامعي للطالب متضغط زر بحب وتطلعلها كل المعلومات عن هل طالب  عملت هل كود بس عم واجه رسالة هل خطاء التالية حدا  يساعدني على حلها     Error 1 Overload resolution failed because no accessible 'New' can be called with these arguments: 'Public Sub New(selectCommandText As String, selectConnection As System.Data.SqlClient.SqlConnection)': Value of type 'System.Data.OleDb.OleDbConnection' cannot be converted to 'System.Data.SqlClient.SqlConnection'. 'Public Sub New(selectCommandText As String, selectConnectionString As String)': Value of type 'System.Data.OleDb.OleDbConnection' cannot be converted to 'String'. C:\Users\user\Documents\Visual Studio 2008\Projects\app v1.2\app v1.2\Form1.vb 30 19 app v1.2            Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.ClickDim constr as new OleDb.OleDbConnectionconstr.ConnectionString = "Provider=localhost;data source=C:\USERS\USER\DOCUMENTS\VISUAL STUDIO 2008\PROJECTS\APP V1.2\APP V1.2\DATABASE1.MDF"Dim sqlstr as string=""sqlstr="select * from Table1 where StudentID=" & Textbox1.text  Try Dim ds As New DataSet Dim apt As New SqlDataAdapter apt.Dispose() ds.Dispose() apt = New SqlDataAdapter(sqlstr, constr) apt.Fill(ds) Datagridview1.DataSource = ds.Tables(0) Catch ex As Exception MsgBox(ex.Message.ToString) End Try End Sub   
  4.  مشكور صديقي بس أجوك كيف بغير المسارت وبفتح هل مشروع بالفيجول ستديو؟؟؟   ارجوووك تساعدني اي شرح بالغة الانكليزية او العربية اذا ما بدك تكتب بايدك مشكور سلف  وهي كود انا متاكد انه صح بس مشكلتي ما عم اعرف شلون بدي اتصل بالسيرفر تبع الديتا بيز  المشكلة عندي بهل تعليمة هي تحديدا    ارجوك شرحلي خطائي وانت من وين جبت اسم السيرفر يلي حاطه بكودك                  constr.ConnectionString = "Provider=Microsoft.jet.oledb.4.0;Server=localhost;data source=C:\USERS\USER\DOCUMENTS\VISUAL STUDIO 2008\PROJECTS\APP V1.2\APP V1.2\DATABASE1.MDF"المعلومات هي من وين جبتها ؟؟؟         Dim ConStr As New SqlConnection("Server=.\SQLInstanceName;Database=YourDB;user id=sa;Password=******")          Imports System.Data.SqlClientImports System.Data.OleDbPublic Class Form1    Dim cnn As OleDb.OleDbConnection    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load    End Sub    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click        Dim constr As New System.Data.SqlClient.SqlConnection        constr.ConnectionString = "Provider=Microsoft.jet.oledb.4.0;Server=localhost;data source=C:\USERS\USER\DOCUMENTS\VISUAL STUDIO 2008\PROJECTS\APP V1.2\APP V1.2\DATABASE1.MDF"        Dim sqlstr As String = "select * from Table1 where StudentID=" & TextBox1.Text        Dim ds As New DataSet        Dim apt As New SqlDataAdapter        Try            apt = New SqlDataAdapter(sqlstr, constr)            apt.Fill(ds)            DataGridView1.DataSource = ds.Tables(0)        Catch ex As Exception            MsgBox(ex.Message.ToString)        Finally            constr.Dispose()            apt.Dispose()        End Try    End SubEnd Class