تور لحظه آخری
امروز : یکشنبه ، 4 آذر 1403    احادیث و روایات:  امام جواد (ع):مؤمن نيازمند سه چيز است: توفيقى از پروردگار، پند دهنده اى از درون خويش و پذيرش از نصيح...
سرگرمی سبک زندگی سینما و تلویزیون فرهنگ و هنر پزشکی و سلامت اجتماع و خانواده تصویری دین و اندیشه ورزش اقتصادی سیاسی حوادث علم و فناوری سایتهای دانلود گوناگون شرکت ها

تبلیغات

تبلیغات متنی

صرافی ارکی چنج

صرافی rkchange

سایبان ماشین

دزدگیر منزل

تشریفات روناک

اجاره سند در شیراز

قیمت فنس

armanekasbokar

armanetejarat

صندوق تضمین

Future Innovate Tech

پی جو مشاغل برتر شیراز

لوله بازکنی تهران

آراد برندینگ

خرید یخچال خارجی

موسسه خیریه

واردات از چین

حمية السكري النوع الثاني

ناب مووی

دانلود فیلم

بانک کتاب

دریافت دیه موتورسیکلت از بیمه

طراحی سایت تهران سایت

irspeedy

درج اگهی ویژه

تعمیرات مک بوک

دانلود فیلم هندی

قیمت فرش

درب فریم لس

زانوبند زاپیامکس

روغن بهران بردبار ۳۲۰

قیمت سرور اچ پی

خرید بلیط هواپیما

بلیط اتوبوس پایانه

قیمت سرور dl380 g10

تعمیرات پکیج کرج

لیست قیمت گوشی شیائومی

خرید فالوور

بهترین وکیل کرج

بهترین وکیل تهران

خرید اکانت تریدینگ ویو

خرید از چین

خرید از چین

تجهیزات کافی شاپ

بی متال زیمنس

ساختمان پزشکان

ویزای چک

محصولات فوراور

خرید سرور اچ پی ماهان شبکه

دوربین سیمکارتی چرخشی

همکاری آی نو و گزینه دو

کاشت ابرو طبیعی و‌ سریع

الک آزمایشگاهی

الک آزمایشگاهی

خرید سرور مجازی

قیمت بالابر هیدرولیکی

قیمت بالابر هیدرولیکی

قیمت بالابر هیدرولیکی

لوله و اتصالات آذین

قرص گلوریا

نمایندگی دوو در کرج

خرید نهال سیب

وکیل ایرانی در استانبول

وکیل ایرانی در استانبول

وکیل ایرانی در استانبول

 






آمار وبسایت

 تعداد کل بازدیدها : 1833399492




هواشناسی

نرخ طلا سکه و  ارز

قیمت خودرو

فال حافظ

تعبیر خواب

فال انبیاء

متن قرآن



اضافه به علاقمنديها ارسال اين مطلب به دوستان آرشيو تمام مطالب
archive  refresh

ارتباط VB با mySql از طريق نت -


واضح آرشیو وب فارسی:سایت ریسک: ارتباط VB با mySql از طريق نت Babak-Magic 31 ارديبهشت 1389, 12:01سلام من یک برنامه توسط vb 6 نوشتم و یک الگوریتم خاص دارم برای پیدا کردن سریال هر کامپیوتر که این سریال مختص هر کامیوتر می باشد و سریال هر کامپیوتر با دیگری متفاوت است. یک هاست لینوکس دارم که دارای دیتابیس Mysql می باشد حال می خواهم شرطی در ابتدای برنامم بزارم که برای باز شدن ابتدا دیتابیس mysql موجود روی هاستم را چک کند سپس اگر سریال اون کامپیوتر در دیتابیس موجود بود برنامه باز شود این توضیحات را دادم تا هدفم را کامل متوجه شوید من فقط آن قسمت نحوه ارتباط vb 6 و دیتابیس mysql بر روی شبکه اینترنت را می خواهم بدانم. بسیار ممنون میشم بگین آیا sql server هم مشابه mysql است و یا تفاوت دارد اگر هست که لطف کنید نحوه جستجو در آن را هم آموزش دهید اگر هم نیست لطف کنید نحوه ارتباط vb 6 با دیتابیس mysql بر روی شبکه اینترنت را آمورش دهید the_king 31 ارديبهشت 1389, 22:17سلام من یک برنامه توسط vb 6 نوشتم و یک الگوریتم خاص دارم برای پیدا کردن سریال هر کامپیوتر که این سریال مختص هر کامیوتر می باشد و سریال هر کامپیوتر با دیگری متفاوت است. یک هاست لینوکس دارم که دارای دیتابیس Mysql می باشد حال می خواهم شرطی در ابتدای برنامم بزارم که برای باز شدن ابتدا دیتابیس mysql موجود روی هاستم را چک کند سپس اگر سریال اون کامپیوتر در دیتابیس موجود بود برنامه باز شود این توضیحات را دادم تا هدفم را کامل متوجه شوید من فقط آن قسمت نحوه ارتباط vb 6 و دیتابیس mysql بر روی شبکه اینترنت را می خواهم بدانم. بسیار ممنون میشم بگین آیا sql server هم مشابه mysql است و یا تفاوت دارد اگر هست که لطف کنید نحوه جستجو در آن را هم آموزش دهید اگر هم نیست لطف کنید نحوه ارتباط vb 6 با دیتابیس mysql بر روی شبکه اینترنت را آمورش دهید SQL Server و MySQL با هم تفاوت های زیادی دارند، اما ارتباط ویژوال بیسیک با هر دوی آنها بطور یکسان و از طریق Microsoft Remote Data Object که به اختصار RDO خوانده می شود صورت می پذیرد. ابتدا درایور MySQL ODBC را از سایت mysql.com داونلود کنید که بدون آن RDO نمی تواند با MySQL ارتباطی برقرار کند. Download Connector - ODBC () همچنین در تنظیمات MySQL بایستی Username و Password ای را تعریف کنید که اجازه دسترسی به بانک اطلاعاتی را بدهد، برای اینکار گویا از دستور grant استفاده می شود. در منوی Project ویژوال بیسیک گزینه References را انتخاب کرده و در لیست ای که نمایش داده می شود، Microsoft Remote Data Object را پیدا کرده و تیک بزنید و OK نمایید. در کد زیر YourUserName نام کاربری و YourPassword رمز عبور و YourServerName آدرس سرور و YourDataBase نام بانک اطلاعاتی خواهد بود. در بین حلقه Do Loop رکورد ها را می توانید بخوانید. کد زیر نمونه ای از خواندن رکورد های یک جدول user است. Dim cnMySql As New rdoConnection Dim rdoQry As New rdoQuery Dim rdoRS As rdoResultset cnMySql.CursorDriver = rdUseOdbc cnMySql.Connect = "uid=YourUserName;pwd=YourPassword;server=YourServe rName;driver={MySQL ODBC 3.51 Driver};database=YourDataBase;dsn=;" cnMySql.EstablishConnection With rdoQry .Name = "selectUsers" .SQL = "select * from user" .RowsetSize = 1 Set .ActiveConnection = cnMySql Set rdoRS = .OpenResultset(rdOpenKeyset, rdConcurRowVer) End With Do Until rdoRS.EOF With rdoRS . . . rdoRS.MoveNext End With Loop rdoRS.Close cnMySql.Close سایت ما را در گوگل محبوب کنید با کلیک روی دکمه ای که در سمت چپ این منو با عنوان +1 قرار داده شده شما به این سایت مهر تأیید میزنید و به دوستانتان در صفحه جستجوی گوگل دیدن این سایت را پیشنهاد میکنید که این امر خود باعث افزایش رتبه سایت در گوگل میشود




این صفحه را در گوگل محبوب کنید

[ارسال شده از: سایت ریسک]
[مشاهده در: www.ri3k.eu]
[تعداد بازديد از اين مطلب: 2107]

bt

اضافه شدن مطلب/حذف مطلب







-


گوناگون

پربازدیدترینها
طراحی وب>


صفحه اول | تمام مطالب | RSS | ارتباط با ما
1390© تمامی حقوق این سایت متعلق به سایت واضح می باشد.
این سایت در ستاد ساماندهی وزارت فرهنگ و ارشاد اسلامی ثبت شده است و پیرو قوانین جمهوری اسلامی ایران می باشد. لطفا در صورت برخورد با مطالب و صفحات خلاف قوانین در سایت آن را به ما اطلاع دهید
پایگاه خبری واضح کاری از شرکت طراحی سایت اینتن