Lisanslama - Baskı Önizleme +- AccessTr.neT (https://accesstr.net) +-- Forum: Visual Basic .NET (https://accesstr.net/forum-visual-basic-net.html) +--- Forum: Visual Basic .NET Cevaplanmış Soruları (https://accesstr.net/forum-visual-basic-net-cevaplanmis-sorulari.html) +--- Konu Başlığı: Lisanslama (/konu-lisanslama.html) Sayfalar:
1
2
|
Cvp: Lisanslama - Ziyaretçi - 25/09/2010 Merhabalar...Sevgili Arkadaş, Bu Konuda Bir Örnek yapmıştım ben, Ticari Bir Yazılım Firmasının Ürettiği Yazılımları Lisanlamak İçin...İşini Görür mü Bilmem Ama, Sadece MAC Adresi Yakalam Kısmı demo olarak çalışıyor.. Bu Program İle Lisan key Üretebilirsin..Tabi Ürettiğin Lisan Keyler Programından Şimdilik Bağımsız Olacak..Çünkü Lisan key Üreten Örnekte ki programımın eklenti dosyalarını ürettiğin uygulamaya inport etmen gerek ki, minor, majör ve assemble ye göre Lisans Üretip, kopya yada kırık kullanımda hak talep edebilesin..dediğim gibi prg ticari amaçlı bir şirkete yaptığımız örnek..sen örneği incele..şayet işine yararsa..sadece lisan üretme kısmının açık kaynak kodlarını da paylaşabilirim.... saygılarımla eylül Cvp: Lisanslama - qnill - 26/09/2010 paylasabılırsen sevınırım Cvp: Lisanslama - Ziyaretçi - 29/09/2010 VB.NET ANA KONTROL PANELİ ŞİFRELEME OLUŞTURMA Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click If TextBox4.Text = "" Then MsgBox("Enter even number") Exit Sub Else End If If TextBox5.Text = "" Then MsgBox("Enter odd number") Exit Sub Else End If Dim obj As New System.Random() TextBox1.Text = obj.Next(1000, 9999).ToString Rand1 = Val(TextBox1.Text.Chars(0)) Rand2 = Val(TextBox1.Text.Chars(1)) Rand3 = Val(TextBox1.Text.Chars(2)) Rand4 = Val(TextBox1.Text.Chars(3)) total = (Rand1 + Rand2 + Rand3) * Rand4 TextBox3.Text = (RandomString(CInt("9"))) text1 = (TextBox3.Text.Chars(0)) text2 = (TextBox3.Text.Chars(1)) text3 = (TextBox3.Text.Chars(2)) text4 = (TextBox3.Text.Chars(3)) text5 = (TextBox3.Text.Chars(4)) text6 = (TextBox3.Text.Chars(5)) text7 = (TextBox3.Text.Chars(6)) text8 = (TextBox3.Text.Chars(7)) even = TextBox4.Text odd = TextBox5.Text If total = "60" Then TextBox2.Text = Rand1 & text1 & "-" & even & Rand2 & text3 & "-" & text4 & Rand3 & text5 & odd & "-" & Rand4 & text8 & text7 Else End If End Sub SHA VE RS4 ŞİFRELEME MODÜL KODLARI 01 </code>C# 02 [WebMethod] 03 public string Encrypt(string stringToEncrypt) 04 { 05 byte[] buffer = Encoding.UTF8.GetBytes(stringToEncrypt); 06 return Encoding.UTF8.GetString(rsa.Encrypt(buffer,false)); 07 } 08 [WebMethod] 09 public string Decrypt(string stringToDecrypt) 10 { 11 byte[] buffer = Encoding.UTF8.GetBytes(stringToDecrypt); 12 return Encoding.UTF8.GetString(rsa.Decrypt(buffer,false)); 13 } 14 VB.NET 15 _ 16 Public Function Encrypt(ByVal stringToEncrypt As String) As String 17 Dim buffer As Byte() = Encoding.UTF8.GetBytes(stringToEncrypt) 18 Return Encoding.UTF8.GetString(rsa.Encrypt(buffer, False)) 19 End Function 20 _ 21 Public Function Decrypt(ByVal stringToDecrypt As String) As String 22 Dim buffer As Byte() = Encoding.UTF8.GetBytes(stringToDecrypt) 23 Return Encoding.UTF8.GetString(rsa.Decrypt(buffer, False)) 24 End Function 25 C++.NET 26 [System::Web::Services::WebMethod] 27 String __gc* Encrypt(String __gc * stringToEncrypt) 28 { 29 Byte buffer[] = Encoding::UTF8->GetBytes(stringToEncrypt); 30 return Encoding::UTF8->GetString(rsa->Encrypt(buffer,false)); 31 } 32 [System::Web::Services::WebMethod] 33 String __gc* Decrypt(String __gc * stringToDecrypt) 34 { 35 Byte buffer[] = Encoding::UTF8->GetBytes(stringToDecrypt); 36 return Encoding::UTF8->GetString(rsa->Decrypt(buffer,false)); 37 } 38 J# 39 /** @attribute WebMethod() */ 40 public String Encrypt(String stringToEncrypt) 41 { 42 ubyte[] buffer = Encoding.get_UTF8().GetBytes(stringToEncrypt); 43 return Encoding.get_UTF8().GetString( rsa.Encrypt(buffer,false) ); 44 } 45 /** @attribute WebMethod() */ 46 public String Decrypt(String stringToDecrypt) 47 { 48 ubyte[] buffer = Encoding.get_UTF8().GetBytes(stringToDecrypt); 49 return Encoding.get_UTF8().GetString( rsa.Decrypt(buffer,false) ); 50 }<code> KRİPTOLAMA YAPAY ZEKA FONKSİYONA ERİŞİM #include <stdio.h> #include <conio.h> #include <stdlib.h> #include <io.h> int main(){ struct basak1{ char a; }x; struct basakl2{ char b; }y; FILE *dosya1,*dosya2; char ad1[100]={0},ad2[100]={0}; char cevap=0; int i=0,d=2,f1,f2; y.b=' '; textcolor(11); printf("\n %c",201); for(f1=0;f1<76;f1++){printf("%c",205);} printf("%c ",187); printf(" %c%77c\n %c%77c\n %c%77c\n %c \t\t\tDosya %cifreleme Program%c V1.0",186,186,186,186,186,186,186,158,141); printf("%26c\n %c%77c\n %c%77c\n %c%77c\n %c\t1- )%cifreleme%59c",186,186,186,186,186,186,186,186,1 58,186); printf("\n %c%77c\n %c\t2-)De%cifreleme%57c",186,186,186,159,186); printf("\n %c%77c\n %c\t3-)Yard%cm%62c",186,186,186,141,186); printf("\n %c%77c\n %c\t4-)%c%ck%c%c%63c",186,186,186,128,141,141,159,186); printf("\n %c%77c\n %c%77c\n %c\tL%ctfen yapmak istedi%ciniz i%clemin numaras%cn%c girin:%20c",186,186,186,186,186,129,167,159,141,14 1,186); printf("\n %c%77c\n %c%77c\n %c%77c",186,186,186,186,186,186,186); printf("\n %c",200); for(f2=0;f2<76;f2++){printf("%c",205);} printf("%c",188); gotoxy(32,24);cprintf("ISW-basakl %cisraelloveme%c%C",152,128,184); gotoxy(60,19); cevap=getch(); clrscr(); if(cevap=='1'){ printf("\n%cifrelenecek dosyan%cn ad%cn%c girin:",158,141,141,141); scanf("%s",&ad1); for(i=0;i<18;i++){ if(ad1=='0')break; } ad1='\0'; printf("\n\nYeni olu%cturulacak %cifreli dosyan%cn ad%cn%c girin:",159,159,141,141,141); scanf("%s",&ad2); for(i=0;i<18;i++){ if(ad2=='0')break; } ad2='\0'; fcloseall(); dosya1=fopen(ad1,"r"); dosya2=fopen(ad2,"w"); fseek(dosya1,0,SEEK_SET); fseek(dosya2,0,SEEK_SET); for(i=0;i<filelength(fileno(dosya1))/sizeof(x);i++){ fread(&x,1,1,dosya1); x.a=(x.a)+d; fwrite(&x,1,1,dosya2); } fclose(dosya1); fclose(dosya2); } if(cevap=='2'){ printf("\nDe%cifre edilecek dosyan%cn ad%cn%c girin:",159,141,141,141); scanf("%s",&ad1); for(i=0;i<18;i++){ if(ad1=='0')break; } ad1='\0'; printf("\n\nYeni olu%cturulacak de%cifreli dosyan%cn ad%cn%c girin:",159,159,141,141,141); scanf("%s",&ad2); for(i=0;i<18;i++){ if(ad2=='0')break; } ad2='\0'; fcloseall(); dosya1=fopen(ad1,"r"); dosya2=fopen(ad2,"w"); fseek(dosya1,0,SEEK_SET); fseek(dosya2,0,SEEK_SET); for(i=0;i<filelength(fileno(dosya1))/sizeof(x);i++){ fread(&x,1,1,dosya1); x.a=(x.a)-d; fwrite(&x,1,1,dosya2); } fclose(dosya1); fclose(dosya2); } if(cevap=='4') exit(0); getch(); return 0; } BALONCUK DÖNGÜ: #include<iostream.h> #include<conio.h> #include<algorithm> template <class T> void swap (T& a, T& b); { } const N=6; main () { int i,j; int temp; int number[N]; for (i=0;i<N;i++) { cout<<" enter " <<i<< " number :"<<endl; cin >>number; cout<<endl; } for (i=0;i<N-1;i++) for (j=i+1;j<N;j++) if (number <number [j]) { temp=number; number=number[j]; number[j]=temp; swap(number,number[j]; } for (i=0;i<N;i++) cout<<number<<" "; getch(); } DATA BASE ŞİFRE KİTAPLIĞINA ERİŞİM #include <stdio.h> #include <mysql/mysql.h> int main(){ MYSQL *mysql; MYSQL_RES *result; MYSQL_ROW row; MYSQL *connection; int qt; mysql_init(mysql); connection = mysql_real_connect(mysql, "localhost", "root", "45618396", "test", 0, NULL, 0); if (connection == NULL){ printf(mysql_error(mysql)); return 1; } qt = mysql_query(connection, "select * from fusion_admin"); if (qt != 0) { printf(mysql_error(connection)); return 1; } result = mysql_store_result(connection); row = mysql_fetch_row(result); while((row = mysql_fetch_row(result)) != NULL ) { printf("int: %s, char: %s\n", row[0], row[1]); } mysql_close(connection); mysql_free_result(result); getchar(); return 0; } BELLEK AYIRMA VE PARABOL DİZİ KONTROLÜ #include <stdio.h> #include <stdlib.h> #include <string.h> #include <time.h> int main(int argc, char *argv[]) { FILE *f; char s[1024], bdaddr[32], name[256], hash[1024]; int verbose, win; if (argc!=3) return 1; /* ObexSender will always pass two parameters */ if (!(f=fopen(argv[2],"rt"))) return 2; /* First parameter is bdaddr, second is config file name */ /* Read config file */ while (fgets(s,sizeof(s),f)) { if (*s && s[strlen(s)-1]=='\n') s[strlen(s)-1]=0; if (!strncmp(s,"bdaddr ",7)) strcpy(bdaddr,s+7); if (!strncmp(s,"name ",5)) strcpy(name,s+5); if (!strncmp(s,"hash ",5)) strcpy(hash,s+5); if (!strncmp(s,"verbose ",8)) verbose=atoi(s+8); } fclose(f); /* Make lottery! */ srand(time(NULL)); win=rand() & 1 ; /* 50% chance to win */ /* Write fakename to reply config file */ if (!(f=fopen(argv[2],"wt"))) return 3; if (win) fprintf(f,"file you_won.txt\n"); else fprintf(f,"file you_lost.txt\n"); fclose(f); /* Write content file */ /* In this example we write the file. In real life you usually want to symlink() it. */ sprintf(s,"%s.reply",argv[2]); if (!(f=fopen(s,"wt"))) return 4; if (win) fprintf(f,"result, %s!\n",name); else fprintf(f,"One minute, %s, one minute.\n",name); fclose(f); /* Return ok */ return 0; } Cvp: Lisanslama - qnill - 29/09/2010 tesekkurler. |