27 lipca 2007

Zmiana adresu na statyczny

@echo off
rem zmiana adresu ip
netsh interface ip set address name="nazwa_sieciowki" source=static addr=192.168.0.250 mask=255.255.255.0 gateway=192.168.0.2 1
rem zmaina adresu dns
netsh interface ip set dns name="nazwa_sieciowki" static addr=212.2.96.51 primary

Zamiana adresu IP na DHCP

@echo off
rem zmiana adresu ip na dhcp
netsh interface ip set address name="Nazwa_sieciowki" source=dhcp
rem zmiana dns na dhcp servera
netsh interface ip set dns name="Nazwa_sieciowki" source=dhcp

24 lipca 2007

Inny sposób zapisu do pliku[JAVA]

Istnieje również inny sposób zapisu do pliku taki jak:

RandomAccessFile save1;
save1 = new RandomAccessFile("test.txt","rw");
save1.writeBytes(line);


Zapis z koncem linii:
l = save1.length();
save1.seek(l);
RandomAccessFile save1;
save1 = new RandomAccessFile("test.txt","rw");
save1.writeBytes(line);

21 lipca 2007

Wyświetlanie obrazka w jLabel, jButton[JAVA]

w jaki sposób wyświetlić obrazek na jButtonie?
Oto przykład:
ImageIcon img = new ImageIcon("Grafika\\test.jpg");
jLabel1.setIcon(img);

20 lipca 2007

Jak wyświetlić jednorazowo daną formę [JAVA]

W jaki sposób można wyświetlić daną formę tworzoną dynamicznie przy naciśnięciu przycisku by nie tworzyło form więcej?
A oto przykład:
LokatorzyForm LokF = new LokatorzyForm();
if (!LokatorzyFormState) {
jDesktopPane1.add(LokF);
LokF.show();
LokatorzyFormState = true;
} else {
LokF.show();
}
jDesktopPane1.getDesktopManager().maximizeFrame(LokF);

19 lipca 2007

jInternalFrame maksymalizacja [JAVA]

A oto jak zmaksymalizować okno dla MDI w Javie

LokatorzyForm LokF = new LokatorzyForm();
jDesktopPane1.getDesktopManager().maximizeFrame(LokF);

09 lipca 2007

Kodowanie stringa [PHP]

function code($tekst,$password,$flag_code) {

$len_pass = strlen($password); // dlugosc klucza


for ($i = 0; $i < strlen($tekst); $i++) { //petla obiegajaca kodowany text

$byte_in = ord($tekst[$i]); //pobranie kolejnych liter textu


$byte_pass = ord($password[$i % $len_pass]); //pobranie kolejnej litert klucza


// funkcja kodujaca / dekodujaca

if ($flag_code == 1) { //sprawdzenie flagi (1 ma być kodowanie: 2 dekodowanie)

$byte_out = ($byte_in + $byte_pass) % 256;
//zakodowanie bajtu tekstu bajtem klucza i podzielenie tego modulo przez 256


} else {

$byte_out = (256 + ($byte_in - $byte_pass)) % 256;
//rozkodowanie bajtu tekstu zakodowanego bajtem klucza...

}

$tmp_str .= chr($byte_out);
//doklejenie roz/zakodowanego bajtu do zmiennej tymczasowej
//tmp_str (z zamianą zmiennej byte na char)


}

return($tmp_str); //wyprowadzenie rezultatu funkcji


}

Funkcja do usuwania tagów HTML

KOD:

function DelHTML(s: string): string; { Usuwanie tagów HTML }

var

i: Word;

tag: Shortint;

begin

Result:='';

tag := 0;

for i := 1 to length(s) do

begin

if s[i] = '<' then Inc(tag); if tag = 0 then Result := Result + s[i]; if s[i] = '>' then Dec(tag);

end;

end;

Kodowanie ciągu znaków [DELPHI]

Funkcja:
function koduj(tekst: string; password: string; flag_code: boolean):string; // funkcja z trzema parametrami zwracająca string
var i, len_pass: integer;
tmp_str: string;
byte_in, byte_out, byte_pass: byte; //deklaracja zmiennych
begin
len_pass := Length(password); //długość klucza
for i:=1 to Length(tekst) do //pętla "obiegająca" kodowany tekst
begin
byte_in := Ord(tekst[i]); //pobranie kolejnej litery kodowanego tekstu i zamiana na bajt
byte_pass := Ord(password[i mod len_pass]); //pobranie kolejnej litery klucza i zamiana na bajt
if flag_code then //sprawdzenie flagi (czy ma być kodowanie czy dekodowanie)
byte_out := (byte_in + byte_pass) mod 256 //zakodowanie bajtu tekstu bajtem klucza i podzielenie tego modulo przez 256
else
byte_out := (256 + (byte_in - byte_pass)) mod 256; //rozkodowanie bajtu tekstu zakodowanego bajtem klucza...
tmp_str:= tmp_str + Chr(byte_out); //doklejenie roz/zakodowanego bajtu do zmiennej tymczasowej tmp_str (z zamianą zmiennej byte na char)
end;
result := tmp_str; //wyprowadzenie rezultatu funkcji
end;

Użycie funkcji:

Dekoduj:

edit1.Text:=koduj(edit2.Text,'haslo_do_szyfrowania',false);


Koduj:

edit2.Text:=koduj(edit1.Text,'haslo_do_szyfrowania',true);

04 lipca 2007

Zapis do pliku PDF[DELPHI]

Jeśli chodzi o raport w rave reports to można to zrobić tak:

1.Umieść na formularzu komponenty RvProject1, RvSystem1, RvRenderPDF1, przycisk (Button).
2. Zmień właściwość Caption przycisku na:
Zapisz raport jako PDF
3. Ustaw właściwość Engine komponentu RvProject1 na RvSystem1.
4. Ustaw właściwość ProjectFile komponentu RvProject1 na plik raportu Raport.rav. (trzeba sobie wcześniej zrobic raport np w rave vusual designerze)
5. Oprogramuj zdarzenie onClick dla przycisku zapisującego raport do pliku *.pdf.

procedure TForm1.Button1Click(Sender: TObject);
begin
//przeznaczeniem raportu ma być plik
RvSystem1.DefaultDest := rdFile;
RvSystem1.DoNativeOutput := false;
//obiektem renderującym będzie komponent RvRenderPDF1
RvSystem1.RenderObject := RvRenderPDF1;
//plik zostanie zapisany pod nazwą plikpdf.pdf w katalogu projektu
RvSystem1.OutputFileName := 'plikpdf.pdf';
RvSystem1.SystemSetups := RvSystem1.SystemSetups - [ssAllowSetup];
//wywołanie metody Execute zapisze raport do pliku plikpdf.pdf
RvProject1.Execute;
end;

Zabicie procesu

Zabicie procesu

kod C#
Process[] ps = Process.GetProcesses();
foreach (Process p in ps)
if (p.StartInfo.FileName == znana_sciezka) {
//procedury wykonania
}

Jak pobrać zmienną systemową?

A w taki oto sposób:

IDictionary env = Environment.GetEnvironmentVariables();


A użytkownika:

String uname = Environment.UserName;