ارتباط با بانک اطلاعاتی در هر فرم

[shahab2025]

سلام
من این مورد را زیاد جستجو کردم ولی چیز به درد بخوری نصیبم نشد
میخواستم بدونم چطوری میشه یه dll یا یه class یا هر روش دیگه ای داشت که من نیاز نداشته باشم در ابتدای تمام فرمهام کدهای مربوط به ارتباط با بانک رو بنویسم

مرسی از اینکه به همراه جوابتان نمونه کد هم میگذارید

[shahab2025]

سلام
يعني واقعاً كسي نيست منو راهنمايي كنه؟؟؟؟:گریه:
ببينم شما جماعت برنامه نويس همه كدهاي ارتباط با بانك را در اول هر فرم مينويسيد؟؟؟:متعجب:
خوب اگر اينطوريه لطفا بگيد كه منم دنبال كار بيهوده نباشم...:گیج:

[smgraphic]

داداش اطلاعات مربوط به آدرس بانک اطلاعاتی و یا هر متغیری که میخوای بصورت مشترک از اون تو تمام فرم ها استفاده کنی رو میتونی بصورت Public تو یه Module تعریف کنی

[shahab2025]

داداش اطلاعات مربوط به آدرس بانک اطلاعاتی و یا هر متغیری که میخوای بصورت مشترک از اون تو تمام فرم ها استفاده کنی رو میتونی بصورت Public تو یه Module تعریف کنی


خدا رو شکر یکی ما رو دید ....:بامزه:
میشه یه کم بیشتر توضیح بدی یا یه نمونه مثال بزنی

[mohammad-gh]

سلام روشي كه مي گم خودم در يك پروژه بزرگ استفاده كردم
ابتدا يك كلاس تعريف كن و در آن كانكشن استرينگت رو معرفي كن

Public Class clsconnection
Public Shared Function GetConnection()
FileOpen(1, Application.StartupPath & "\appnet.txt", OpenMode.Input, OpenAccess.Default, OpenShare.Shared)
Dim ips As String
Input(1, ips)
FileClose(1)
'-----------------
Dim objConnection As New SqlConnection _
("Server='" & ips & "';database=fardabank;user id=sa;password=123")
Return objConnection
End Function
End Class

اين فايلي كه مي بيني من گذاشتم به خاطر اين هست كه از يك فايل متني است كه تو اون يا لوكال نوشته ميشه و يا IP‌ كامپيوتر سرور كه بانك رو اون هست

حالا تو لود تمام فرمهات اين رو بنويس و ازش استفاده كن


Dim objConnection As SqlConnection = clsconnection.GetConnection

موفق باشي