تبليغاتX
برنامه نویسی کامپیوتر مبتدی و پیشرفته


آشنایی کامل با برنامه نویسی شبکه و پایگاه داده .
آموزش مفاهیم برنامه نویسی به صورت مبتدی و پیشرفته .
قرار دادن پروژه های کامل پیشرفته برای کمک به برنامه نویسی شما .
هر گونه سوال را با ایمیل مطرح کنید .
اگر در خبرنامه ی وبلاگ عضو بشید هنگام فرستادن مطلب جدید به شما ایمیل خواهد شد .
کپی برداری از این وبلاگ آزاد است ، ولی برای حفظ ارزش کار نام منبع را درج نمایید .



خبرنامه وبلاگ





Powered by WebGozar


نظرسنجی

 RSS 


لیست نام های ایرانی در موبایل
1247 تا نام ایرانی با معنی برای مشاهده در موبایل .

تهیه شده با برنامه FBook .

برای گوشی هایی که جاوا را پشتیبانی می کند .

حجم فایل 167 KB

گرفتن

+ نوشته شده در  پنجشنبه بیست و ششم شهریور 1388ساعت 4:16  توسط آراز 

سورس برنامه کنترل باشگاه بدن سازی ویرایش 3.0 در ویژوال بیسیک

ویرایش دوم این برنامه را می توانید اینجا ببینید .

تغییرات در این ویرایش :

1 - عملیات بر روی عکس ها برای پایین آوردن حجم فایل اجرایی .

2 - افزودن سیستم مالی .

3 - تغییر مدل منو ها .

4 - تصحیح روش نقش های مدیریتی ( Role ) .

5 - تعویض اکتیوکس DatePicker ( مشکل داشت ) .

6 - جستجوی های پیشرفته .

7 - چاپ گزارشات با Crystal Report 10.5

8 - تویض MeShamsiDate با ویرایش جدید .

9 - استفاده از MsgBox سفارشی فارسی .

هر گونه مشکل رو نظر بزارید .

پسورد برای ورود به برنامه : 123456

پسورد پایگاه داده : 123456Jafaripur

از این دو کامپونت کریستال ریپورت استفاده شده :


حجم سورس برنامه : 382 کیلوبایت

گرفتن سورس

+ نوشته شده در  شنبه هفتم شهریور 1388ساعت 4:18  توسط آراز 

کار با ماتریکس ها در VB
جمع ماتریکس .

تفریق ماترکیس .

ضرب ماتریکس .

معکوس ماتریکس .

دترمینال ماتریکس .

برای مشاهده جزئیات بیشتر بر رویه ادامه مطلب کلیک کنید .


ادامه مطلب
+ نوشته شده در  چهارشنبه بیست و هشتم مرداد 1388ساعت 4:14  توسط آراز 

سورس بازی حافظه در VB6

یه بازی جالب برنامه نویسی شده در ویژوال بیسیک 6 .

به این شکل هستش که شما عکس ها را می بینید بعد دیده نمیشه شما باید حدس بزنید کدام عکس با دیگری مساوی هستش .

شما می توانید تعداد سطر و ستون های عکس را انتخاب کنید یا اون قالب بازی که می شه عکس ها .

گرفتن سورس بازی 289 کیلوبایت

به طور پیش فرض قالب بازی حیوانات هستش شما می توانید از لینک های زیر عکس های زیادی برای بازی بگیرید به این صورت که باید مثلاً فایلی که می گیرید Flower.Zip هستش تویه این فایل فشرده یک پوشه قرار دارد که آن پروشه را باید در قسمت اصلی بازی در فولدر Images کپی کنید .

عکس های بیشتر برای بازی :

پرنده 180 کیلوبایت

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

ماهی 179 کیلوبایت

پرچم کشورها 210 کیلوبایت

گل 233 کیلوبایت

شماره 119 کیلوبایت

اشکال 1 152 کیلوبایت

اشکال 2 184 کیلوبایت

ساعت 206 کیلوبایت

+ نوشته شده در  شنبه سوم مرداد 1388ساعت 17:30  توسط آراز 

تغییر مشخصات تولید کننده در System Properties
تا حالا ممکن هست به در کامپیوترهایی با صفحه زیر مواجه بشید .

تغییر تولید کننده در System Properties

اینجا  System Properties هستش و در پایین بعضی اطلاعات را می بینید که مشخصات سازنده  درج  شده مثلاً در ویندوز MRT این مشخصات فرق می کند و ماله MRT دیده می شه .

حالا ما چطور می تونیم این مشخصات را تغییر بدیم ؟

برای درج این اطلاعات شما باید دو فایل جدید ایجاد کنید در پوشه ویندوز به طور پیش فرض این مسیر می باشد : C:\Windows\System برای ویندوزهای 9x و C:\Windows\System32 برای  XP و C:\Winnt\System32 برای ویندوز NT,2000 .

فایل اول یک فایل متنی به نام OEMINFO.INI هستش برای ایجاد فایل Notepad را اجرا کنید و الگوی زیر را در آنجا Paste کنید . و بعد از ذخیره با پسوند INI آن را در سیستم فولدر کپی کنید .

[General]
Manufacturer=Araz Jafaripur
Model=Araz
[Support Information]
Line1=Email : Mjafaripur@Yahoo.Com
Line2= WebPages : Http://Jafaripur@Yahoo.Com
Line3=For Extra Lines Just Type Line4= Line5= . . .

شما می توانید خط های زیادی بنویسید .

فایل دیگر که نیاز هستش برای ایجاد عکس یک فایل BMP در فولدر ویندوز با نام OEMLOGO.BMP باید کپی کنید .

بعد از درست کردن این دو فایل می توانید اطلاعات که داده اید در System Properties ببینید .

برنامه این کار را با ویژوال بیسیک نوشتم می توانید بگیرید .

حجم سورس 4 کیلوبایت

گرفتن

+ نوشته شده در  سه شنبه بیست و سوم تیر 1388ساعت 14:23  توسط آراز 

برنامه چرتکه در VB6
نشسته بودم به سرم زد چرتکه رو بنویسم تا حد امکان حجم کد نویسی رو آوردم پایین تو این برنامه .

چرتکه در VB6

قبلاً یکی نوشته بودم که طولانی بود و هضمش سخت ولی رو این کار کردم تا حد امکان طول کد نویسی رو آوردم پایین .

راحت هستش با دیدنش یاد می گیرین مشکلی بود یا نظر یا میل بزنید .

حجم برنامه هم ۴ کیلوبایت هستش .

گرفتن سورس چرتکه در VB6

+ نوشته شده در  چهارشنبه هفدهم تیر 1388ساعت 4:13  توسط آراز 

گرفتن فیلتر شک× FreeGate
کار با این فیلتر شک* هم راحت هستش و فقط لازم هستش که اجراش کنید .

حجم این برنامه ۴۰۰ کیلوبایت هستش .

گرفتن فیلتر شک* FreeGate

+ نوشته شده در  یکشنبه چهاردهم تیر 1388ساعت 0:19  توسط آراز 

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

یه چند تا راه فرعی هستش که می تونید وارد بشید .

۱ - چت کردن از خود سایت یاهو http://webmessenger.yahoo.com فقط برای چت در اینجا باید آخرین فلش پلیر رو نصب کنید در حال حاضر آخریش ۱۰ هستش . در ضمن اگه از یاهو میل جدید استفاده می کنید از میل خودتون هم می تونید چت کنید .

۲ - استفاده از کلاینت های دیگه مثل :

http://www.meebo.com

http://www.ebuddy.com

+ نوشته شده در  یکشنبه چهاردهم تیر 1388ساعت 0:13  توسط آراز 

گرفتن فیلتر شک× Ultra Search 9.5
یه فیلتر شک* خوب و راحت که فقط باید اجراش کنید تا از فیلتر رد بشید .

حجم برنامه هم ۴۲۰ کیلوبایت هستش .

گرفتن برنامه فیلتر شک* Ultra Search

+ نوشته شده در  یکشنبه چهاردهم تیر 1388ساعت 0:9  توسط آراز 

استفاده از رویه های ذخیره شده ( Stored Procedure ) در دات نت - قسمت سوم

اجرای رویه های ذخیره شده پیچیده

یکی از فواید با ارزش رویه های ذخیره شدهدر این است کهاین امکان را به ما می دهند که چند دستور SQL را در کنار همدیگر جمع کرده و به صورت گروهی به اجرا در آوریم . در این قسمت قصد داریم با مطالعه دو کد نمونه ASP.NET این موضوع را مورد بررسی قرار دهیم .

مثال اول طرز استفاده از رویه ذخیره شده ای را نشان می دهد که ID رکورد جدید وارد شده در یک جدول را به دست می آورد . رویه ذخیره شده ی زیر محصول جدیدی را به جدول Products افزوده و محتوای ستون Identity آن رکورد را بر می گرداند .

Create Procedure AddProduct
(

@ProductName
NVarchar(80), @UnitPrice Money
)

AS
INSERT
Products (ProductName,UnitPrice) VALUES (@ProductName,@UnitPrice)
RETURN
@@Identity

متغییر سراسری @Identity حاوی آخرین مقدار درج شده در ستون Identity جدول است . رویه ذخیره شده AddProduct رکورد جدیدی را به جدول Product افزوده و مقدار متغییر @@Identity را برمیگرداند .

در تکه کد زیر طرز استفاده از این رویه ذخیره شده نشان داده شده .

Dim SqlCon As New SqlConnection("Server=JAFARIPUR\SQLEXPRESS;Database=Jafaripur;Integrated Security=SSPI") Dim SqlCom As SqlCommand Dim SqlReturnParm As SqlParameter Dim IntProductID As Integer
SqlCom =
New SqlCommand("AddProduct", SqlCon)
SqlCom.CommandType = Data.CommandType.StoredProcedure
SqlCom.Parameters.AddWithValue(
"@ProductName", "Biscuits")
SqlCom.Parameters.AddWithValue(
"@UnitPrice", 23.5)
SqlReturnParm = SqlCom.Parameters.Add(
"@ReturnValue", SqlDbType.Int)
SqlReturnParm.Direction = ParameterDirection.ReturnValue
SqlCon.Open()
SqlCom.ExecuteNonQuery()
IntProductID = SqlCom.Parameters(
"ReturnValue").Value
SqlCon.Close()

کد فوق از سه پارامتر استفاده کرده است : دو پارامتر ورودی و یک پارامتر بازگشتی. این دو پارامتر ورودی نماینده اسم و قسمت محصول جدید هستند . مقدار بازگشتی هم محتوای ستون Identity را بعد از درج رکورد جدید در جدول بر می گرداند .

یکی دیگر از مواقعی که استفاده از رویه ذخیره شده را برای اجرای چند دستور SQL ازشمند می کند زمانی است که بخواهیم رکورد هایی غیر تکراری به جدول خود اضافه کنیم . فرض کنید بخواهیم فقط در صورتی محصولی را به جدول Products اضافه کنیم که رکورد مربوط به آن محصول از قبل در جدول موجود نباشد .

رویه ذخیره شده زیر با استفاده از کلمه کلیدی Exists وجود محصول را قبل از درج رکورد بررسی می کند .

Create Procedure AddUniqueProduct
(

@ProductName
NVarchar(80),
@UnitPrice
Money
)

AS
IF
EXISTS ( SELECT ProductName FROM Products WHERE ProductName = @ProductName )
RETURN
1
ELSE
INSERT
Products (ProductName,UnitPrice) VALUES (@ProductName,@UnitPrice)

قسمت شرطی این رویه ذخیره شده را به صورت زیر هم می توان نوشت :

IF (SELECT COUNT(*) FROM Products WHERE ProductName = @ProductName ) > 0

رویه ذخیره شده فوق با استفاده از کلمه کلیدی Exists نگاه می کند ببیند محصولی با این اسم قبلاً در جدول Products ثبت شده است یا نه . اگر Exists به True منتهی شود رویه مقدار 1 را برمیگرداند ولی اگر چنین محصولی در جدول وجود نداشته باشد بخش Else اجرا شده و رکورد جدیدی به جدول افزوده خواهد شد و در این حالت رویه ذخیره شده با مقدار پیش فرض 0 پایان می یابد .

طرز استفاده از این رویه ذخیره شده :

Dim SqlCon As New SqlConnection("Server=JAFARIPUR\SQLEXPRESS;Database=Jafaripur;Integrated Security=SSPI") Dim SqlCom As SqlCommand Dim SqlReturnParm As SqlParameter
SqlCom =
New SqlCommand("AddUniqueProduct", SqlCon)
SqlCom.CommandType = Data.CommandType.StoredProcedure
SqlCom.Parameters.AddWithValue(
"@ProductName", "Milk")
SqlCom.Parameters.AddWithValue(
"@UnitPrice", 43.5)
SqlReturnParm = SqlCom.Parameters.Add(
"@ReturnValue", SqlDbType.Int)
SqlReturnParm.Direction = ParameterDirection.ReturnValue
SqlCon.Open()
SqlCom.ExecuteNonQuery()
If SqlCom.Parameters("ReturnValue").Value = 0 Then
Response.Write(
"New Product Added !") Else
Response.Write(
"Product Already Exists !") End If
SqlCon.Close()

کد فوق دو پارامتر ورودی را به رویه ذخیره شده AddUniqueProduct پاس کرده و مقدار بازگشتی را می گیرد . اگر این مقدار بازگشتی 0 باشد پیام  New Product Added !  ظاهر می شود در غیر این صورت پیام  Procut Already Exists !روی صفحه به نمایش در می آید .

قسمت اول

قسمت دوم

+ نوشته شده در  چهارشنبه سی ام اردیبهشت 1388ساعت 20:25  توسط آراز 

کپی برداری از این وبلاگ آزاد است ، ولی برای حفظ ارزش کار نام منبع را درج نمایید .