+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [مشروع] ارجو تصحيح الخطا فى المشروع (/showthread.php?tid=2549)
ارجو تصحيح الخطا فى المشروع - ابراهيم مراد - 12-04-14
السلام عليكم اخوانى عندى مشكله فى ذالك المشروع عند ادخال اليوزر والباس المسجل فى الداتا يظهر الخطا هذا
an attempt to attach an auto-named database for file failed. A database with the same name exists, or specified file cannot be opened, or it is located on UNC share.
المشروع مرفق
وهذا الاكواد
Imports System.Data.SqlClient
Imports System.Data.OleDb
Public Class Form1
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles Me.Load
Try
Class1.sqlcon.ConnectionString = "Data Source=A-PC\SQLEXPRESS;;AttachDbFilename=|DataDirectory|test.mdf;integrated security=true;Connect Timeout=30;"
MsgBox("Done", MsgBoxStyle.Exclamation)
Catch ex As Exception
MsgBox(ex.Message)
End Try
End Sub
Private Sub txtNumber_KeyPress(sender As Object, e As KeyPressEventArgs) Handles txtNumber.KeyPress
If Char.IsControl(e.KeyChar) = False Then
If Char.IsDigit(e.KeyChar) Then
Else
e.Handled = True
End If
End If
End Sub
Private Sub BtnLogin_Click(sender As Object, e As EventArgs) Handles BtnLogin.Click
If txtNumber.Text = "" Then
MsgBox("enter number acc", MsgBoxStyle.Exclamation, "try")
txtNumber.Focus()
Exit Sub
End If
If txtPassword.Text = "" Then
MsgBox("enter password", MsgBoxStyle.Exclamation, "error")
txtPassword.Focus()
Exit Sub
End If
Try
Dim str As String = "select userid,userpassword from users where userid=" & txtNumber.Text & "and userpassword='" & txtPassword.Text & "'"
Dim sd As New SqlDataAdapter(str, Class1.sqlcon)
Dim ds As New DataSet
sd.Fill(ds)
If ds.Tables(0).Rows.Count > 0 Then
Me.Hide()
frmmain.Show()
Else
MsgBox("Error data", MsgBoxStyle.Exclamation, "error")
End If
Catch ex As Exception
MsgBox(ex.Message)
End Try
End Sub
End Class
RE: ارجو تصحيح الخطا فى المشروع - سعود - 12-04-14
إقتباس :a database with the same name exists
RE: ارجو تصحيح الخطا فى المشروع - ابراهيم مراد - 13-04-14
(12-04-14, 11:49 PM)سعود كتب :معناها توجد قاعدة بنفس الاسمإقتباس :a database with the same name exists
اعلم ذالك ولكن لا يوجود اخى االفاضل ولذالك رفعت المشروع وحطيت الكود ارجوك ساعدنى
الله يسعدك يا اخى الكريم التطبيق دا مهم جدا فى دراستى انا اريد عند ادخال اليوزر والباس المسجل فى الداتا يفتح البرنامج ذالك اللكودد يقوم بتنفيذ ذالك ولكن لا اعلم اين الخطا ارجو منك ومن الاخوه المحترفين زيك تصحيح الخطا
RE: ارجو تصحيح الخطا فى المشروع - سعود - 13-04-14
اخي الكريم لدي نصيحة وكنت دوم اقولها وهي:
انشيء قاعدة بيانات بالكود
وكذلك الجداول والاعمدة والقيم الافتراضية
هذا يريحك من كثير من مشاكل اختلاف الاصدارات الخاصة بملفات mdf
----------
المثال لم يعمل لدي لكن ساحاول سحب الملفات منه (باذن الله)
RE: ارجو تصحيح الخطا فى المشروع - سعود - 13-04-14
معلش مافهمت شي من المثال
اخي الكريم ممكن تطلع على المثال اللي انا سويت
هنا
اي شي تريد اضيفه للمثال خبرني به وباذن الله ان قدرت عليه اضفته.
RE: ارجو تصحيح الخطا فى المشروع - ابراهيم مراد - 13-04-14
(13-04-14, 01:10 AM)سعود كتب : معلش مافهمت شي من المثال
اخي الكريم ممكن تطلع على المثال اللي انا سويت
هنا
اي شي تريد اضيفه للمثال خبرني به وباذن الله ان قدرت عليه اضفته.
اشكرك ع ردك يا طيب انا الى يهمنى اعمل اتصال بقعدة بيانات وعند ادخال المعلومات الصحيحه ينفذ ذاالك الكود
)
If ds.Tables(0).Rows.Count > 0 Then
Me.Hide()
frmmain.Show()
Else
MsgBox("Error data", MsgBoxStyle.Exclamation, "error")
End If
Catch ex As Exception
MsgBox(ex.Message)
End Try
يعنى لو البيانات الذى ادخلها صح سوف يقوم بفتح الفورم الاساسى فهمت عليا اخى انا ملف القاعدة البيانات هذا هربطه بموقعى يعنى بقدر اتحكم ببرنامجى يعنى نوع من انواع الحمايه يا اخى الكريم يعنى نفس فكرة الويب سيرفس بس بطريقه مختلفه اتمنى تكون وصلتلك السؤال بشكل صحيح واالكود والمثال الذى تركته يعمل الكود بشكل جيد ولكن لا يقوم بتنفيذ الامر وبيظهر تلك الرساله
an attempt to attach an auto-named database for file failed. A database with the same name exists, or specified file cannot be opened, or it is located on UNC share.
ولله عمال اببحث ع حل رجاء خاص مساعدتتك انت والاخوة االله يوفقك يا طيب
RE: ارجو تصحيح الخطا فى المشروع - سعود - 13-04-14
طيب اخي الكريم حتى افهم عليك او بالاصح نحدد مهمة واحدة لتطبيقها.
هل تريد استعلام ونتيجته؟
ام هل تريد تثبيت ملف القاعدة mdf
بانتظارك
RE: ارجو تصحيح الخطا فى المشروع - ابراهيم مراد - 13-04-14
(13-04-14, 02:20 AM)سعود كتب : طيب اخي الكريم حتى افهم عليك او بالاصح نحدد مهمة واحدة لتطبيقها.
هل تريد استعلام ونتيجته؟
ام هل تريد تثبيت ملف القاعدة mdf
بانتظارك
اريد يا اخى الفاضل عمل mdf
والاستعلام من الفورم يعنى مثلا هضيف tables
وهضيف فى الجدول
serial
السريال = مثلا 123456
وننقوم باضافة بوتن وتكست بوكس فى فورم 1 ونشغل البرنامج هنحط السريال 123456
يفتح فورم 2
لو حط رقم غلط لا يقوم بفتح فورم 2 ممش عايز اظهر الجدول فى الفورم نهائى فهمت اخى الكريم الله يسعددك ويوفقك بالنجاح دايما
طبعا الملفف المعتمد عليه database.mdf
يعنى لو مفيش اتصال الفورم مش هينفذ اى شئ ولا اكنه له لازمه فلازم الاتصال والاستعلام من الملف الاساسى الذى هو database.mdf
RE: ارجو تصحيح الخطا فى المشروع - سعود - 13-04-14
صدقني انا ماتطلبه موجود بالمثال الذي كتبت رابطه لك.
يوجد كود انشاء قاعدة بيانات + كود انشاء جدول باعمدة وقيم افتراضية
كود استعلام عن رقم الصورة او اسمها وهذا شبيه بتسجيل الدخول
RE: ارجو تصحيح الخطا فى المشروع - ابراهيم مراد - 13-04-14
(13-04-14, 02:42 AM)سعود كتب : صدقني انا ماتطلبه موجود بالمثال الذي كتبت رابطه لك.
يوجد كود انشاء قاعدة بيانات + كود انشاء جدول باعمدة وقيم افتراضية
كود استعلام عن رقم الصورة او اسمها وهذا شبيه بتسجيل الدخول
انا شوفته فعلا ومشابه للكود طيب ممكن تعمله تسجيل الدخول بيورز وباسورد ويكون اليوزر مثلا ادمن والباس 123456
ولو كتب 1234 ما يفتح لازم يحط كلمة السر المسجله بقاعدة البيانات
وتعطينى المثال انا اسف ان تقلت عليك الله يسعدك يارب ويجعلك من اهل الجنه