درخواست سورس فروشگاه موبايل و تعميرات به زبان ويژوال بيسيک 6

[gorg313]

به نام خدا

با عرض سلام من سورس برنامه (درخواست سورس فروشگاه موبايل و تعميرات به زبان ويژوال بيسيک 6) را ميخوام

اگه کسي داره ممنون ميشم

:ناراحت:

[matrix-program]

قصد شما از این درخواست چیست؟ اگر می خواهید بگیرید کامپایل کنید و بفروشید مطمئنا کسی سورس در اختیار شما قرار نخواهد داد.

[gorg313]

من خودم برنامه نويسي بلدم سورس اگه نشد

منو راهنمايي کن در مورد بخش هاش مثلآ بخش خريد شامل چه قسمت هايي ميشه

بخش فروش شامل چه قسمت هايي ميشه

بخش تعميرات همچنين

و ديگر قسمت ها

من اطلاع جامع در مورد حسابداريش ندارم ممنون ميشم راهنمايي کنيد اگه سورسي هم بود بهتر :قلب:

[matrix-program]

دو راه دارید
1- با یک فرد وارد در حسابداری مشورت کنید
2- به یک موبایل فروشی مراجعه کنید و اطلا عات لازم را بگیرید

[gorg313]

سلام ماتريکس جان من شروع کردم و برنامه را نوشتم ولي در يک قسمت با مشکل مواجه شدم

در مديريت يک موبايل فروشي نياز هست که عکس گوشي هم باشه

من براي لود کردن از کامند ديالوگ استفاده کردم و عکس لود شد و براي ذخيره عکس هم از اين کد استفاده کردم

Dim ImageName As String
ImageName = Fix((Rnd() * 999999))
SavePicture Image1.Picture, App.Path & "\Pic\" & ImageName & ".jpg"
Adodc1.Recordset!عکس = ImageName & ".jpg"
Adodc1.Recordset.Update

اين کد براي به روز رساني هستش اسم عکس را در پايگاه داده ها ذخيره ميکنه ولي متاسفانه موقع لود کردن فرم عکس لود نميشه ولي اطلاعات فيلدها لود ميشه ؟ مشکل بارگذاري عکس چيست؟ آيا کد ذخيره عکس در بانک اطلاعاتي درست است؟
نوع فرمت عکس را در بانک اطلاعاتي تکست گذاشتم مشکلي که نداره؟
بعد يه سوال وقتي بانک اطلاعاتي داخلش فيلدي نيست؟ چرا امکان ثبت اطلاعات وجود نداره؟ يعني در تکست 1 متني ميزني بعد ميري تکست دو .تکست اولي فيلدش خالي ميشه !!! مشکلش کجاست؟

:لبخند:واقعآ معذرت ميخوام انگاري سوالام زياد شدن ممنون ميشم راهنمايي کني منم برم بخش انبار داري را بزنم

[m.4.r.m]

از کامپوننت DBimage.ocx استفاده کن مشکل شما حل میشه

[m.4.r.m]

من یک برنامه مدیریت سوپر مارکت به زبان انگلیسی دارم خواستی ازش استفاده کن
http://s4.picofile.com/file/7811444729/SuperMarket.zip.html