منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
التعامل مع قاعدة بينات علي الانترنت - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (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=1604)

الصفحات: 1 2 3 4 5 6

RE: التعامل مع قاعدة بينات علي الانترنت - سعود - 19-01-14

اخي الكريم جرب الاتصال عن بعد اولا .. لاضرورة لوجود جداول فقط اكتب جملة الاتصال ثم اكتب
كود :
try
conn.open
msgbox("متصل")
conn.close
msgbox("غير متصل")
catch ex as exception
msgbox(err.description)
end try
ملاحظة كتبت الكود من دماغيSmile يعني مكن فيه خطا املائي فقط


RE: التعامل مع قاعدة بينات علي الانترنت - ابوهديل - 19-01-14

سوف اجرب الان
الان هذا كود الاتصال من الموقع:


workstation id=moohameed.mssql.somee.com;packet size=4096;user id=0000;pwd=0000;data source=moohameed.mssql.somee.com;persist security info=False;initial catalog=moohameed

اضعه بدل كود الاتصال في الفيجول عندي
سعود هذا نص الاتصال الاساسي في المشروع


Try
SqlConn.ConnectionString = "Data Source=ALJEEL-PC\SQLEXPRESS;Initial Catalog=dbM;Integrated Security=True"
SqlConn.Open()
If SqlConn.State = ConnectionState.Open Then
MsgBox("تم الاتصال بنجاح", MsgBoxStyle.Information)
Else
MsgBox("Not Connected")
End If
Catch ex As Exception
MsgBox(ex.Message)

End Try

RE: التعامل مع قاعدة بينات علي الانترنت - سعود - 20-01-14

سويت مثال بسيط
كود :
Imports System.Data.SqlClient

Public Class Form1
    Dim str As String = "workstation id=moohameed.mssql.somee.com;packet size=4096;user id=0000000;pwd=0000000;data source=moohameed.mssql.somee.com;persist security info=False;initial catalog=moohameed"
    Dim conn As New SqlConnection(str)

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Try
            conn.Open()
            MsgBox(conn.State.ToString)
            conn.Close()
            MsgBox(conn.State.ToString)

        Catch ex As Exception
            MsgBox(Err.Description, MsgBoxStyle.Critical)

        End Try
    End Sub
End Class


RE: التعامل مع قاعدة بينات علي الانترنت - ابوهديل - 20-01-14

ممتاز نجح الاتصال جزاك الله خير

RE: التعامل مع قاعدة بينات علي الانترنت - سعود - 20-01-14

(20-01-14, 12:06 AM)ابوهديل كتب : ممتاز نجح الاتصال جزاك الله خير

ممتاز
الان انت اما خيارين:
1- زرع الجداول بالكود
2- تثبيت ملف القاعدة
الاول بسيط ولا يحتاج تعليق فقط ابحث بقوقل بالانجليزي عن create table by code
الاخر لو كنت تستخدم برنامج ادارة قواعد بيانات قم بعمل deattach للقاعدة من دون حذفها تاكد ان خيار drop ملغي بعد ذلك اذهب لمسار القاعدة وانسخ الملفين :
mdf & ldf
واذهب لصفحة ادارة قواعد البيانات بحسابك وانقر ارتباط Attach

RE: التعامل مع قاعدة بينات علي الانترنت - ابوهديل - 20-01-14

الله يوفقك ياسعود سوف ابداء تجربة هذه المرحلة

RE: التعامل مع قاعدة بينات علي الانترنت - سعود - 20-01-14

بالانتظار

RE: التعامل مع قاعدة بينات علي الانترنت - ابوهديل - 20-01-14

سعود :

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

RE: التعامل مع قاعدة بينات علي الانترنت - سعود - 20-01-14

(20-01-14, 01:13 AM)ابوهديل كتب : سعود :

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

يبدو انك لم تلغي خيار dropSad
هل يمكن الحصول عليها من سلة المهملات؟

RE: التعامل مع قاعدة بينات علي الانترنت - ابوهديل - 20-01-14

بالعكس الغيت خيار drop
طيب في حال عدم نقل البيانات على موقع http://somee.com/
هل يوجد طريقه اخرى لعمل مشروعي على باقي الاجهزة