03-06-24, 08:25 PM
(03-06-24, 05:42 PM)salamandal كتب :(24-05-24, 10:03 PM)غزة العزة كتب : هذه الأمثلة تستخدم مكتبات محددة لكل قاعدة بيانات. تأكد من تثبيت المكتبة المناسبة لقاعدة البيانات التي ترغب في الاتصال بها قبل استخدام هذه الأمثلة.
وهذا كود للاتصال بقواعد بيانات الفاير بيرد وكود اخر لانشاء قاعدة البيانات (للاسف الكود بالفجوال بيسك فقط)
كود :
Imports FirebirdSql.Data.FirebirdClient
Public Class Form1
Dim con As New FbConnection("Server=localhost;User=SYSDBA;Password=masterkey;Database= " & Application.StartupPath & "\NEW_DB.fdb")
'انشاء قاعدة بيانات
Dim dt As New DataTable
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
If con.State = ConnectionState.Open Then con.Close()
con.Open()
FbConnection.CreateDatabase("Server=localhost;User=SYSDBA;Password=masterkey;DEFAULT CHARACTER SET NONE;PAGE_SIZE 16384;Database= " & Application.StartupPath & "\NEW_DB.fdb")
con.Close()
End Sub
End Class
الكود بسي شارب
PHP كود :
using System;
using System.Data;
using System.Windows.Forms;
using FirebirdSql.Data.FirebirdClient;
public class Form1 : Form
{
private FbConnection con = new FbConnection("Server=localhost;User=SYSDBA;Password=masterkey;Database=" + Application.StartupPath + "\\NEW_DB.fdb");
private DataTable dt = new DataTable();
private Button button1;
public Form1()
{
button1 = new Button();
button1.Text = "Create Database";
button1.Click += new EventHandler(Button1_Click);
Controls.Add(button1);
}
private void Button1_Click(object sender, EventArgs e)
{
if (con.State == ConnectionState.Open)
con.Close();
con.Open();
FbConnection.CreateDatabase("Server=localhost;User=SYSDBA;Password=masterkey;DEFAULT CHARACTER SET NONE;PAGE_SIZE 16384;Database=" + Application.StartupPath + "\\NEW_DB.fdb");
con.Close();
}
[STAThread]
static void Main()
{
Application.EnableVisualStyles();
Application.Run(new Form1());
}
}
لو كل مسلم رمى دلو ماء لغرقت إسرائيل
