تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] ماهي المشكلة في مشروعي . ربط قاعدة بيانات mysql
#1
السلام عليكم
اخواني انا عندي مشروع بسيط وهناك مشكلة في جلب بيانات من القاعدة نوعها mysql
عندما اضيف بيانات في قاعدة البيانات لا توجد مشكلة في الاضافه ولكن عندما اجلب البيانات يظهر هناك خطأ

المشروع مرفق
واتمنى احصل حل للمشكلة
شكرا لكم


الملفات المرفقة
.rar   VBMYSQL.rar (الحجم : 89.64 ك ب / التحميلات : 42)
الرد }}}}
تم الشكر بواسطة:
#2
ماهي رسالة الخطا؟
حملت المثال ولا يتوفر عندي الكونكتور ..اكتب رسالة الخطا او صورها
أستودعكم الله الذي لا تضيع ودائعه أرجو ان تجدوا بمشاركاتي ما يجعلكم تدعون لي بخير ان تحتم غيابي.
رحمك الله أبا الليث
الرد }}}}
تم الشكر بواسطة:
#3
هذا الكود المستخدم في زر جلب البيانات من القاعدة



PHP كود :
Private Sub btnload_Click(ByVal sender As System.ObjectByVal e As System.EventArgsHandles btnload.Click
        
'again we do this because we do not yet declare this as global, but we do it for now beacause in later tutorial
        '
we will do the moduling and more on refactoring of codes
        con
.ConnectionString = ("server=localhost;user id=root;password=;database=androidhive")
        Try
            
con.Open()
            
With cmd
                
.Connection con
                
'in this query it does simply selecting or getting all the user found in the database.
                .CommandText = "Select * from products"
            End With

        Catch ex As Exception
            MsgBox(ex.Message)


        End Try
        con.Close()
        da.Dispose()
        filltable(dtguser)

    End Sub 


هذا كود الخطأ

unable to convert mysql date/time value to system.datetime


وهذا الكود كامل المستخدم في الفورم





PHP كود :
'Description: This program can able to insert and read user form the MySQL Database using Visual Basic.
'
Author:      Joken Villanueva
'Date Created: 
Imports System.Data
Imports MySql.Data.MySqlClient
Public Class Manage_user
    Dim con As New MySqlConnection
    Dim result As Integer
    '
MySqlCommand It represents a SQL statement to execute against a MySQL Database
    Dim cmd 
As New MySqlCommand
    
'Represents a set of data commands and a database connection that 
    '
are used to fill a dataset and update a MySQL databaseThis class cannot be inherited.
    
Dim da As New MySqlDataAdapter

    
Private Sub btncreate_Click(ByVal sender As System.ObjectByVal e As System.EventArgsHandles btncreate.Click
        
'this line of is simply we copy this one from our form 
        con.ConnectionString = ("server=localhost;user id=root;password=;database=androidhive")

        Try
            '
we open Connection
            con
.Open()

            
With cmd
                
.Connection con
                
.CommandText "INSERT INTO `androidhive`.`products` (`pid`, `name`, `price`, `description`) " _
                                
"VALUES (NULL, '" txtfullname.Text "', '" txtusername.Text "', '" txtpassword.Text "');"
                'in this line it Executes a transact-SQL statements against the connection and returns the number of rows affected 
                result = cmd.ExecuteNonQuery
                '
if the result is equal to zero it means that no rows is inserted or somethings wrong during the execution
                
If result 0 Then
                    MsgBox
("Data has been Inserted!")
                Else
                    
MsgBox("Successfully saved!")

                
End If
            
End With
        
Catch ex As Exception
            MsgBox
(ex.Message)
        
End Try
        
con.Close()
    
End Sub

    
Private Sub btnload_Click(ByVal sender As System.ObjectByVal e As System.EventArgsHandles btnload.Click
        
'again we do this because we do not yet declare this as global, but we do it for now beacause in later tutorial
        '
we will do the moduling and more on refactoring of codes
        con
.ConnectionString = ("server=localhost;user id=root;password=;database=androidhive")
        Try
            
con.Open()
            
With cmd
                
.Connection con
                
'in this query it does simply selecting or getting all the user found in the database.
                .CommandText = "Select * from products"
            End With

        Catch ex As Exception
            MsgBox(ex.Message)


        End Try
        con.Close()
        da.Dispose()
        filltable(dtguser)

    End Sub
    ' 
this our sub procedure that well always used 
    
'this beacause it always catch all the result query 
    '
and it will display to any kind of visual basic containers like datagridview,listbox,listviewetc...
    Public 
Sub filltable(ByVal dtgrd As Object)
        
'declare a variable as new datatable
        Dim publictable As New DataTable
        Try
            '
Gets or sets an SQL statement or stored procedure used to select records in the database.
            
da.SelectCommand cmd
            da
.Fill(publictable)
            
dtgrd.DataSource publictable
            dtgrd
.Columns(0).Visible False

            da
.Dispose()

        Catch 
ex As Exception
            MsgBox
(ex.Message)

        
End Try

    
End Sub

    
Private Sub Manage_user_Load(ByVal sender As System.ObjectByVal e As System.EventArgsHandles MyBase.Load

    End Sub
End 
Class 
الرد }}}}
تم الشكر بواسطة:
#4
معني الرسالة (غير قادر علي تحويل تاريخ من نوع Mysql إلي نوع تاريخ دوت نت)

هنا في هذا الموقع توجد حلول

وهي بإضافة جملة لنص الاتصال (Convert Zero Datetime=True)

ادخل علي الموقع وجرب.

ملحوظة: فين أجد الكنكتور؟؟؟
(وَقُل رَّبِّ زِدْنِي عِلْمًا)

الرد }}}}
تم الشكر بواسطة:
#5
لماذا تستعمل mysql على الlocalhost !!

في العادة استعمل هذا النوع للقواعد على الانترنت ولكن على الlocalhost استعمل sql conpact او access
الرد }}}}
تم الشكر بواسطة:
#6
انا حذفت من الجدول خانة التاريخ والان يعمل
لدي سؤال اخر

حاليا استخدم السيرفر الشخصي
ولكن عندما اريد استخدام سيرفر اخر لا يمكن الاتصال بقاعدة البيانات

هل هناك كود معين بدلا من هذا

PHP كود :
con.ConnectionString = ("server=localhost;user id=root;password=;database=androidhive"

اعني في ذلك موقع انترنت
الرد }}}}
تم الشكر بواسطة:
#7
تم عمل الشرح :-

انشاء قاعدة MySQL على الانترنت والتعامل معها من برنامجك بواسطة EF5
الرد }}}}
تم الشكر بواسطة:
#8
اشكرك اخي الشاكي لله على هذا الدرس وتواصلك معنا

طلب بسيط
ممكن ترسل المشروع وتحطه في وصله خارج من المنتدى
لان المشكله الملفات المرفقة منالمنتدى بصيغة رار او وينزيب ماقدر احملها

شكرا لك
الرد }}}}
تم الشكر بواسطة:
#9
http://www.gulfup.com/?v94mrz
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] كيفية حفظ ملف pdf في قاعدة بيانات sql abid 5 4,575 10-05-17, 03:13 PM
آخر رد: safalo
  مل نسخة احتياطية لقاعدة بيانات sql server djelloul 2 52 10-05-17, 12:49 PM
آخر رد: djelloul
  المساعدة في عمل استعلام قاعدة بيانات sqlserver djelloul 0 66 17-04-17, 07:13 PM
آخر رد: djelloul
  [VB.NET] مشكله عند الحفظ على قاعدة بيانات باستخدام Data Source وقاعدة بيانات اكسس2007 coderarab 8 848 03-04-17, 02:48 AM
آخر رد: ابو إياد
  [سؤال] طلب صيغة عامة أو وظيفة لأضافة بيانات لقاعدة البيانات ؟ عبد الله 2 150 10-03-17, 09:36 AM
آخر رد: عبد الله
  استعادة قاعدة البيانات من ملف النسخة الإحتياطية djelloul 2 165 28-02-17, 03:27 PM
آخر رد: djelloul
  كيفية الاتصال بقاعدة بيانات Access على الشبكة المحلية warda saeed 9 9,225 28-02-17, 10:21 AM
آخر رد: وائل القطاوي
  نسخ جدول من قاعدة الي اخري مع الوصف atefkhalf2004 2 148 18-02-17, 01:34 AM
آخر رد: atefkhalf2004
  فتح قاعدة البيانات محفوظة ب باسس ورد في جملة الاتصال ahmed_elwerfalli 2 153 13-02-17, 05:27 PM
آخر رد: ahmed_elwerfalli
  قاعدة بيانات xml djelloul 2 166 06-02-17, 11:06 PM
آخر رد: djelloul

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم