23-07-16, 03:06 PM
(23-07-16, 02:25 PM)الوادي كتب : هل نفذت اللي قال عليه محمد كريّم.
ممكن تضع الكود.
نعم نفذته و لما يكون الادخال يدوي عن طريق php myadmin اللغة العربية تمام
لكن عن طريق برنامجي لا تطلعلي البيانات باللغة العربية في شكل نقاط استفهام ؟؟؟؟؟
هذه كود insert
كود :
Dim db_informatique As New class1
db_informatique.Myreq = "Insert Into factureachat (codep,nomp,nbrecarton,nbrepiece,nbregpiece,prixc,prixp,prixvente,val,datf,numfac,gangne,prixg) values('" & Me.t1.Text & "','" & Me.t2.Text & "','" & Me.t3.Text & "','" & Me.t4.Text & "','" & Me.t5.Text & "','" & Me.t6.Text & "','" & Me.t7.Text & "','" & Me.t8.Text & "','" & Me.d1.Text & "','" & Me.d2.Text & "','" & Me.t9.Text & "','" & Me.t8.Text - Me.t7.Text & "','" & Me.t3.Text * Me.t6.Text & "')"
db_informatique.Connecting_in_informatique()
db_informatique.Disconnecting_in_informatique()كود :
Imports MySql.Data.Types
Imports MySql.Data.MySqlClient
Imports System.Windows.Forms
Public Class class1
Private mycon As mysqlconnection
Private strcon As String
Public rdr As MySqlDataReader
Public Myreq, a, b As String
Private cmd As MySqlCommand
Public Sub Connecting_in_informatique()
strcon = "server=localhost;user id=root;database=achat"
mycon = New MySqlConnection(strcon)
mycon.Open()
cmd = New MySqlCommand(Myreq, mycon)
rdr = cmd.ExecuteReader
End Sub
Public Sub Disconnecting_in_informatique()
rdr.Close()
mycon.Close()
End Sub
End Classالسُّعُودِيَّةُ عَبَقٌ يَتَدَفَّقُ فِي ذَاكِرَةِ التَّارِيخِ ، وَحَنِينٌ يَجْرِي فِي أَوْصَالِ الرَّغْبَةِ ، وَعَرَقُ رَجَالٍ يَمْلَأُ أَنْفَاسَ الحَيَاةِ ، وَشَوْقٌ يَغْمُرُ جَنَبَاتِ الفُؤَادِ ، وَغُصْنُ زَيْتُونٍ تَطِيرُ إِلَيْهِ بَلَابِلُ الرُّوحِ.
