Yeni Kayıt
Konudaki Resimler
< Bu mesaj bu kişi tarafından değiştirildi oralunal -- 29 Ağustos 2007; 15:40:51 > |
Hızlı 
Bildirim
Hazır Script/Kod >> Hazır Forum ve Portal >> İnternet >> HerŞey
Sıcak Fırsatlarda Tıklananlar
Editörün Seçtiği Fırsatlar
Bu Konudaki Kullanıcılar:
2 Misafir (1 Mobil) - 1 Masaüstü, 
1 Mobil
1 Mobil
Giriş
Mesaj
-
-
#PHP
##İki tarih arasındaki farkı gün olarak bulma
<?
function tarihfarki($tarih_gir){
///girilecek olan tarihimizin arasındaki "-" işaretinin olması lazım.Örnek olara 02-12-2006 gibi
///eğer başka bir kesme kullanacaksanız aşağıda explode satırında bulunan "-" değiştirmeniz yeterli
///explode komutu ile tarihimizi parçalara ayırıp değişkenlere aktarıyoruz
$yeni_tarih=explode("-",$tarih_gir);
$ilk_gun=$yeni_tarih[0];
$ilk_ay=$yeni_tarih[1];
$ilk_yil=$yeni_tarih[2];
$son_gun=date("d");
$son_ay=date("m");
$son_yil=date("Y");
///burada aylarımızın kaç gün çektiğini değişkenlere aktarıyoruz
$ek[1]=31;
$ek[2]=28;
$ek[3]=31;
$ek[4]=30;
$ek[5]=31;
$ek[6]=30;
$ek[7]=31;
$ek[8]=31;
$ek[9]=30;
$ek[10]=31;
$ek[11]=30;
$ek[12]=31;
///önce yıl farkı varsa bundan doğan farkı GÜN olarak hesaplayalım
$yil_fark=($son_yil-$ilk_yil) * 365 ;
////for döngüsüyle ayları topluyorum
for($i=1;$i<$son_ay;$i++){
$son_ay_toplam=$son_ay_toplam+$ek[$i];
}
///şimdiki gün ve ay toplamımız
$toplam_son_gun=$son_ay_toplam+$son_gun;
////girilen ay'ı hesaplayalım
for($m=1;$m<$ilk_ay;$m++){
$ilk_ay_toplam=$ilk_ay_toplam+$ek[$m];
}
////girilen ay ve günü hesaplayalım
$toplam_ilk_gun=$ilk_ay_toplam+$ilk_gun;
$sonuc=$toplam_son_gun-$toplam_ilk_gun+$yil_fark;
/////burada sonuc değişkenine sonucumuzu yükledik.
///artık kullanacağınız yere göredeğişiklik yapabilirsiniz
/////ben burada basit bir if deyimi ile eğer tarih bugünün tarihi ise bugün sisteme girmiş
////eğer tarih daha önce ise kaç gün fark varsa onu yazıdırıyorum
if($sonuc==0){
echo "bugün girmis";
}else{
echo $sonuc." gün önce girmis";
}
}
?>
<?
///////yukarıdaki tarihfarki(); fonksiyonumuzu sayfanıza import edip
//////aşağıdaki gibi kullanabilirsiniz...
$tarih_gir="01-02-2007";
tarihfarki($tarih_gir);
?>
-
#PHPquote:
Orijinalden alıntı: oralunal
#PHP
##İki tarih arasındaki farkı gün olarak bulma
<?
function tarihfarki($tarih_gir){
///girilecek olan tarihimizin arasındaki "-" işaretinin olması lazım.Örnek olara 02-12-2006 gibi
///eğer başka bir kesme kullanacaksanız aşağıda explode satırında bulunan "-" değiştirmeniz yeterli
///explode komutu ile tarihimizi parçalara ayırıp değişkenlere aktarıyoruz
$yeni_tarih=explode("-",$tarih_gir);
$ilk_gun=$yeni_tarih[0];
$ilk_ay=$yeni_tarih[1];
$ilk_yil=$yeni_tarih[2];
$son_gun=date("d");
$son_ay=date("m");
$son_yil=date("Y");
///burada aylarımızın kaç gün çektiğini değişkenlere aktarıyoruz
$ek[1]=31;
$ek[2]=28;
$ek[3]=31;
$ek[4]=30;
$ek[5]=31;
$ek[6]=30;
$ek[7]=31;
$ek[8]=31;
$ek[9]=30;
$ek[10]=31;
$ek[11]=30;
$ek[12]=31;
///önce yıl farkı varsa bundan doğan farkı GÜN olarak hesaplayalım
$yil_fark=($son_yil-$ilk_yil) * 365 ;
////for döngüsüyle ayları topluyorum
for($i=1;$i<$son_ay;$i++){
$son_ay_toplam=$son_ay_toplam+$ek[$i];
}
///şimdiki gün ve ay toplamımız
$toplam_son_gun=$son_ay_toplam+$son_gun;
////girilen ay'ı hesaplayalım
for($m=1;$m<$ilk_ay;$m++){
$ilk_ay_toplam=$ilk_ay_toplam+$ek[$m];
}
////girilen ay ve günü hesaplayalım
$toplam_ilk_gun=$ilk_ay_toplam+$ilk_gun;
$sonuc=$toplam_son_gun-$toplam_ilk_gun+$yil_fark;
/////burada sonuc değişkenine sonucumuzu yükledik.
///artık kullanacağınız yere göredeğişiklik yapabilirsiniz
/////ben burada basit bir if deyimi ile eğer tarih bugünün tarihi ise bugün sisteme girmiş
////eğer tarih daha önce ise kaç gün fark varsa onu yazıdırıyorum
if($sonuc==0){
echo "bugün girmis";
}else{
echo $sonuc." gün önce girmis";
}
}
?>
<?
///////yukarıdaki tarihfarki(); fonksiyonumuzu sayfanıza import edip
//////aşağıdaki gibi kullanabilirsiniz...
$tarih_gir="01-02-2007";
tarihfarki($tarih_gir);
?>
##Döviz Kurları
<?
echo'<table width="100%" border="0" cellpadding="0" cellspacing="0"><tr><td>';
$currency = array(
"USD" => "",
"EUR" => "",
);
$convert = array(
"isim" => "İsim",
"forexbuying" => "Alış",
"forexselling" => "Satış",
);
$content = file_get_contents("http://www.tcmb.gov.tr/kurlar/today.xml");
foreach($currency as $code => $arr){
preg_match("'<currency Kod=\"(".$code.")\".*>(.*)</currency>'Uis",$content,$crst);
foreach($convert as $field => $value){
preg_match("'<".$field.">(.*)</".$field.">'Uis",$crst[2],$frst);
$currency[$code][$value] = $frst[1];
}
}
$sen="<pre>".print_r($currency,true)."</pre>";
$sen1=str_replace('(','',$sen);
$sen2=str_replace(')','',$sen1);
$sen3=str_replace('Array','',$sen2);
$sen4=str_replace('[USD] =>','',$sen3);
$sen5=str_replace('[EUR] =>','',$sen4);
$sen6=str_replace(' ','',$sen5);
$sen7=str_replace('<pre>','',$sen6);
$sen8=str_replace('</pre>','',$sen7);
$sen9=str_replace('[İsim]=>','',$sen8);
$sen10=str_replace('AMERİKANDOLARI','<tr><td rowspan=2 bgcolor=f0f0f0><font size=2>USD</font></td><td bgcolor=f0f0f0>',$sen9);
$sen11=str_replace('[Alış]=>','<font size=2>Alış</font></td><td bgcolor=f0f0f0><font size=2>',$sen10);
$sen12=str_replace('[Satış]=>','</font></td></tr><tr><td bgcolor=f0f0f0><font size=2>Satış</font></td><td bgcolor=f0f0f0><font size=2>',$sen11);
$sen13=str_replace('EURO','</td><tr><td rowspan=2 bgcolor=f0f0f0><font size=2>EURO</font></td><td bgcolor=f0f0f0>',$sen12);
echo"<table width='100%' border='0' cellspacing='1' cellpadding='1'>
<tr bgcolor='c0c0c0'>
<td colspan='2'><div align='center'><b>TCMB Döviz Kuru</b> </div></td>
</tr>
<tr>
<td width='80%' rowspan='4'>
<table width='100%' border='0' cellpadding='1' cellspacing='1'>
$sen13";
echo"</td></tr></table></td>
<td width='20%' bgcolor=f0f0f0><font size=2>YTL</font></td>
</tr>
<tr>
<td bgcolor=f0f0f0><font size=2>YTL</font></td>
</tr>
<tr>
<td bgcolor=f0f0f0><font size=2>YTL</font></td>
</tr>
<tr>
<td bgcolor=f0f0f0><font size=2>YTL</font></td>
</tr>
</table></td></tr></table>";
?>
< Bu mesaj bu kişi tarafından değiştirildi oralunal -- 25 Ağustos 2007; 13:13:45 >
-
#PHPquote:
Orijinalden alıntı: oralunal
#PHP
##Döviz Kurları
<?
echo'<table width="100%" border="0" cellpadding="0" cellspacing="0"><tr><td>';
$currency = array(
"USD" => "",
"EUR" => "",
);
$convert = array(
"isim" => "İsim",
"forexbuying" => "Alış",
"forexselling" => "Satış",
);
$content = file_get_contents("http://www.tcmb.gov.tr/kurlar/today.xml");
foreach($currency as $code => $arr){
preg_match("'<currency Kod=\"(".$code.")\".*>(.*)</currency>'Uis",$content,$crst);
foreach($convert as $field => $value){
preg_match("'<".$field.">(.*)</".$field.">'Uis",$crst[2],$frst);
$currency[$code][$value] = $frst[1];
}
}
$sen="<pre>".print_r($currency,true)."</pre>";
$sen1=str_replace('(','',$sen);
$sen2=str_replace(')','',$sen1);
$sen3=str_replace('Array','',$sen2);
$sen4=str_replace('[USD] =>','',$sen3);
$sen5=str_replace('[EUR] =>','',$sen4);
$sen6=str_replace(' ','',$sen5);
$sen7=str_replace('<pre>','',$sen6);
$sen8=str_replace('</pre>','',$sen7);
$sen9=str_replace('[İsim]=>','',$sen8);
$sen10=str_replace('AMERİKANDOLARI','<tr><td rowspan=2 bgcolor=f0f0f0><font size=2>USD</font></td><td bgcolor=f0f0f0>',$sen9);
$sen11=str_replace('[Alış]=>','<font size=2>Alış</font></td><td bgcolor=f0f0f0><font size=2>',$sen10);
$sen12=str_replace('[Satış]=>','</font></td></tr><tr><td bgcolor=f0f0f0><font size=2>Satış</font></td><td bgcolor=f0f0f0><font size=2>',$sen11);
$sen13=str_replace('EURO','</td><tr><td rowspan=2 bgcolor=f0f0f0><font size=2>EURO</font></td><td bgcolor=f0f0f0>',$sen12);
echo"<table width='100%' border='0' cellspacing='1' cellpadding='1'>
<tr bgcolor='c0c0c0'>
<td colspan='2'><div align='center'><b>TCMB Döviz Kuru</b> </div></td>
</tr>
<tr>
<td width='80%' rowspan='4'>
<table width='100%' border='0' cellpadding='1' cellspacing='1'>
$sen13";
echo"</td></tr></table></td>
<td width='20%' bgcolor=f0f0f0><font size=2>YTL</font></td>
</tr>
<tr>
<td bgcolor=f0f0f0><font size=2>YTL</font></td>
</tr>
<tr>
<td bgcolor=f0f0f0><font size=2>YTL</font></td>
</tr>
<tr>
<td bgcolor=f0f0f0><font size=2>YTL</font></td>
</tr>
</table></td></tr></table>";
?>
Alıntıları Göster
##Resmi Bozmadan Croplama
<?php
$imgfile = "img.jpg";
$cropStartX = 300;
$cropStartY = 250;
$cropW = 200;
$cropH = 200;
$origimg = imagecreatefromjpeg($imgfile);
$cropimg = imagecreatetruecolor($cropW,$cropH);
list($width, $height) = getimagesize($imgfile);
imagecopyresized($cropimg, $origimg, 0, 0, $cropStartX, $cropStartY, $width, $height, $width, $height);
header("Content-type: image/jpeg");
imagejpeg($cropimg);
imagedestroy($cropimg);
imagedestroy($origimg);
?>
-
#ADO.NET - ADOquote:
Orijinalden alıntı: oralunal
#PHP
##Resmi Bozmadan Croplama
<?php
$imgfile = "img.jpg";
$cropStartX = 300;
$cropStartY = 250;
$cropW = 200;
$cropH = 200;
$origimg = imagecreatefromjpeg($imgfile);
$cropimg = imagecreatetruecolor($cropW,$cropH);
list($width, $height) = getimagesize($imgfile);
imagecopyresized($cropimg, $origimg, 0, 0, $cropStartX, $cropStartY, $width, $height, $width, $height);
header("Content-type: image/jpeg");
imagejpeg($cropimg);
imagedestroy($cropimg);
imagedestroy($origimg);
?>
Alıntıları Göster
##Titretme
<html><HEAD>
<SCRIPT LANGUAGE="JavaScript1.2">
<!-- Begin
function shake(n) {
if (self.moveBy) {
for (i = 10; i > 0; i--) {
for (j = n; j > 0; j--) {
self.moveBy(0,i);
self.moveBy(i,0);
self.moveBy(0,-i);
self.moveBy(-i,0);
}
}
}
}
// End -->
</script>
</HEAD>
<BODY bgcolor="red">
<center><font color="white">
<h1>DÜĞMEYE BASIN VE OLANLARI GÖRÜN</h1>
<br>
<h3>dilerseniz seri bi şekilde space'e basmayı deneyin</h3>
<center>
<form>
<input type=button onClick="shake(2)" value="BAŞLA">
</form>
-
#ASPquote:
Orijinalden alıntı: oralunal
#ADO.NET - ADO
##Titretme
<html><HEAD>
<SCRIPT LANGUAGE="JavaScript1.2">
<!-- Begin
function shake(n) {
if (self.moveBy) {
for (i = 10; i > 0; i--) {
for (j = n; j > 0; j--) {
self.moveBy(0,i);
self.moveBy(i,0);
self.moveBy(0,-i);
self.moveBy(-i,0);
}
}
}
}
// End -->
</script>
</HEAD>
<BODY bgcolor="red">
<center><font color="white">
<h1>DÜĞMEYE BASIN VE OLANLARI GÖRÜN</h1>
<br>
<h3>dilerseniz seri bi şekilde space'e basmayı deneyin</h3>
<center>
<form>
<input type=button onClick="shake(2)" value="BAŞLA">
</form>
Alıntıları Göster
##Mail Yollama
<%
'dosya isimi..gonder_email.asp **
'Farkli formlar dan gelen bilgilerin farkli email adresine
'gelmesini sagliyor. formdan gelen formtercihi degerine göre
'ilgili Case içine girer . Case leri ve email tercihlerini
'çogaltmak mümkün
dim FormTercihi, strTo, strSubject, strBody
'formdan gelen deger alinir
FormTercihi=Request("HangiForm" )
Select Case FormTercihi
'alinan deger select içine alinir.
Case 1
'formdan gelen bilgiler alinir
adi="ADI SOYADI.." &Request.Form("ADI" )+"," & Request.Form("SOYADI" )+"," & vbCrLf
adi=adi&"ADRES......." &Request.Form("ADRES" )+"," & vbCrLf&"ILCE/IL....." &Request.Form("IL" )+"," & vbCrLf
adi=adi&"E-MAIL......" &Request.Form("EMAIL" )& vbCrLf& vbCrLf& vbCrLf
kimden=Request.Form("ADI" )+" " +Request.Form("SOYADI" )
'asagidaki kisim olmasada olur biz resmi bir kurum oldugumuz için mail olayini dilekçe boyutuna çevirdik.
dilekce="Yukarida Bilgilerini Yazdigim Parsele Ait " & vbCrLf
dilekce=dilekce&"IMAR DURUMU Belgesinin Tarafima Gönderilmesini " & vbCrLf
dilekce=dilekce&" Saygilarimla Arz Ederim." & vbCrLf& vbCrLf
dilekce=dilekce& kimden
adi=adi&dilekce
'kisi formu gönderdikten sonra asagidaki mesaji okur
bilgilendirme=" Adresimize Gönderdiginiz Bilgilere Göre" & vbCrLf
bilgilendirme=bilgilendirme+"Verdiginiz " &EMAIL&" Adresine Imar Durumu Belgesi En Kisa Zamanda Gönderilecektir. "
'bu Case 1 deki formun konusudur
strSubject = "IMAR DURUMU ISTEGI"
email=Request.Form("EMAIL" )
Case 2
adi="ADI SOYADI.." &Request.Form("ADI" )+"," & Request.Form("SOYADI" )+"," & vbCrLf
adi=adi&"ISTEK/ÖNERI;......." &vbCrLf&Request.Form("ADRES" )+"," & vbCrLf
adi=adi&"E-MAIL......" &Request.Form("EMAIL" )& vbCrLf& vbCrLf& vbCrLf
kimden=Request.Form("ADI" )+" " +Request.Form("SOYADI" )
dilekce=dilekce& kimden
adi=adi&dilekce
bilgilendirme=" Öneri ve İsteklerinizi Bizimle Paylaştığınız İçin Teşekkür Ederiz." & vbCrLf
strSubject = "ONERI/ISTEK"
email=Request.Form("EMAIL" )
End Select
%>
<%
strTo = "MAIL ADRES1-1"
'adresi degistir....
strBody = adi
strBody = strBody & vbCrLf & vbCrLf
If Len(request("email" ))<5 or InStr(request("email" ),"@" )=0 Then
%>
<a href="asp-animation/email.asp">
Lütfen E-MAIL Adres Bilgilerini Dogru Olarak Giriniz<br>
</a>
<%
Else
'Persits.mail ile baglanti saglanir.
Set Mail = Server.CreateObject("Persits.MailSender" )
'site adini degistir.
Mail.Host="yildirim-bld.gov.tr"
'bunlari degistirmeyin
Mail.From = email
Mail.FromName = kimden
Response.Write "from name"
'asagida bir Select Case daha kullanilmistir. her formun konusuna göre mailin gidecegi adreslerdir.
Select Case FormTercihi
Case 1
Mail.AddAddress "MAIL ADRESI-1"
Mail.AddAddress "MAIL ADRESI-2"
Case 2
Mail.AddAddress "MAIL ADRESI-1"
Mail.AddAddress "MAIL ADRESI-3"
End Select
'bunlarida degistirmeyin
Mail.Subject = strSubject
Mail.Body = strBody
Mail.SEnd
Response.Write bilgilendirme
End If
%>
<%
Function IsValidEmail(strEmail)
Dim bIsValid
bIsValid = True
If Len(strEmail) < 5 Then
bIsValid = False
Else
If InStr(1, strEmail, " " ) <> 0 Then
bIsValid = False
Else
If InStr(1, strEmail, "@" , 1) < 2 Then
bIsValid = False
Else
If InStrRev(strEmail, "." ) < InStr(1, strEmail, "@" , 1) + 2 Then
bIsValid = False
End If
End If
End If
End If
IsValidEmail = bIsValid
End Function
'<-- bitti -->
%>
-
veri eklerken seçici olman daha iyi olur kanımca. örneğin titretme gereksiz bir kod, hangi profesyonel sitede var ki? anca ilk yaptığımız o kötü çalışmalara şekil(!) katsın diye koymuşuzdur. mesela resim croplama gibi daha çok amaca hizmet eden kodlar koysan daha iyi olur, kolay gelsin.quote:
Orijinalden alıntı: oralunal
#ADO.NET - ADO
##Titretme
<html><HEAD>
<SCRIPT LANGUAGE="JavaScript1.2">
<!-- Begin
function shake(n) {
if (self.moveBy) {
for (i = 10; i > 0; i--) {
for (j = n; j > 0; j--) {
self.moveBy(0,i);
self.moveBy(i,0);
self.moveBy(0,-i);
self.moveBy(-i,0);
}
}
}
}
// End -->
</script>
</HEAD>
<BODY bgcolor="red">
<center><font color="white">
<h1>DÜĞMEYE BASIN VE OLANLARI GÖRÜN</h1>
<br>
<h3>dilerseniz seri bi şekilde space'e basmayı deneyin</h3>
<center>
<form>
<input type=button onClick="shake(2)" value="BAŞLA">
</form>
Alıntıları Göster
-
#ASPquote:
Orijinalden alıntı: aspci
veri eklerken seçici olman daha iyi olur kanımca. örneğin titretme gereksiz bir kod, hangi profesyonel sitede var ki? anca ilk yaptığımız o kötü çalışmalara şekil(!) katsın diye koymuşuzdur. mesela resim croplama gibi daha çok amaca hizmet eden kodlar koysan daha iyi olur, kolay gelsin.
Alıntıları Göster
##Hard-Diskteki Boş Alan
Const HARD_DISK = 3
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colDisks = objWMIService.ExecQuery _
("Select * from Win32_LogicalDisk Where DriveType = " & HARD_DISK & "")
For Each objDisk in colDisks
Wscript.Echo "DeviceID: "& vbTab & objDisk.DeviceID
Wscript.Echo "Free Disk Space: "& vbTab & objDisk.FreeSpace
Next
-
quote:
Orijinalden alıntı: aspci
veri eklerken seçici olman daha iyi olur kanımca. örneğin titretme gereksiz bir kod, hangi profesyonel sitede var ki? anca ilk yaptığımız o kötü çalışmalara şekil(!) katsın diye koymuşuzdur. mesela resim croplama gibi daha çok amaca hizmet eden kodlar koysan daha iyi olur, kolay gelsin.
Alıntıları Gösterquote:
Orjinalden alıntı: aspci
veri eklerken seçici olman daha iyi olur kanımca. örneğin titretme gereksiz bir kod, hangi profesyonel sitede var ki? anca ilk yaptığımız o kötü çalışmalara şekil(!) katsın diye koymuşuzdur. mesela resim croplama gibi daha çok amaca hizmet eden kodlar koysan daha iyi olur, kolay gelsin.
Her türlü görüşe açığım fakat zaten üç mesaj üstünde resim croplama yı verdim
-
#ASPquote:
Orijinalden alıntı: oralunalquote:
Orjinalden alıntı: aspci
veri eklerken seçici olman daha iyi olur kanımca. örneğin titretme gereksiz bir kod, hangi profesyonel sitede var ki? anca ilk yaptığımız o kötü çalışmalara şekil(!) katsın diye koymuşuzdur. mesela resim croplama gibi daha çok amaca hizmet eden kodlar koysan daha iyi olur, kolay gelsin.
Her türlü görüşe açığım fakat zaten üç mesaj üstünde resim croplama yı verdim
Alıntıları Göster
##Veri Şifreleme
<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<%
plainText = cstr(request.Form("ad"))
cipherKey = "parolaparolaparola"
For Counter = 1 To Len(plainText)
Char = Asc(Mid(plainText, Counter, 1))
keyChar = Asc(Mid(cipherKey, Counter, 1))
cipherText = cipherText & Chr(Char Xor keyChar)
Next
response.Write("Sifrelenmemis Metin: " & cipherText & "<br>")
For Counter = 1 To Len(cipherText)
Char = Asc(Mid(cipherText, Counter, 1))
keyChar = Asc(Mid(cipherKey, Counter, 1))
plainText = plainText & Chr(Char Xor keyChar)
Next
uzunluk = len(ciphertext)
yazdir = left(plaintext,uzunluk)
response.Write("<br>Sifresi Çözülmüs Metin: " & yazdir)
cipherText = ""
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
<title>Untitled Document</title>
</head>
<body>
<label></label>
<form id="form1" name="form1" method="post" action="sifrele.asp">
<label>
<input name="ad" type="text" id="ad" />
</label>
<label>
<input type="submit" name="Submit" value="Submit" />
</label>
</form>
</body>
</html>
-
#ASPquote:
Orijinalden alıntı: oralunal
#ASP
##Veri Şifreleme
<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<%
plainText = cstr(request.Form("ad"))
cipherKey = "parolaparolaparola"
For Counter = 1 To Len(plainText)
Char = Asc(Mid(plainText, Counter, 1))
keyChar = Asc(Mid(cipherKey, Counter, 1))
cipherText = cipherText & Chr(Char Xor keyChar)
Next
response.Write("Sifrelenmemis Metin: " & cipherText & "<br>")
For Counter = 1 To Len(cipherText)
Char = Asc(Mid(cipherText, Counter, 1))
keyChar = Asc(Mid(cipherKey, Counter, 1))
plainText = plainText & Chr(Char Xor keyChar)
Next
uzunluk = len(ciphertext)
yazdir = left(plaintext,uzunluk)
response.Write("<br>Sifresi Çözülmüs Metin: " & yazdir)
cipherText = ""
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
<title>Untitled Document</title>
</head>
<body>
<label></label>
<form id="form1" name="form1" method="post" action="sifrele.asp">
<label>
<input name="ad" type="text" id="ad" />
</label>
<label>
<input type="submit" name="Submit" value="Submit" />
</label>
</form>
</body>
</html>
Alıntıları Göster
##Accsess+MsqSQL Bağlantı Kodu
Kullanmak istediğinz db connection kodundaki tırnağı kaldırınız dikkat edin ayni anda iki tırnagı olmayan connection kodu olursa hata alırsıız
<%
'serverismi="mssqlserver" Serverimiz ismi
'dbgiris="usr_db5061" db login ismidir
parola="deneme" 'parola
dbname="db/vt1.mdb" 'db ismi
Set vt = Server.CreateObject("ADODB.Connection")
vt.open= "provider=microsoft.jet.oledb.4.0;jet oledb:database password="&parola&";data source=" & server.mappath(""&dbname&"") & ";"
'vt.open = "driver={SQL Server};server="&serverismi&";uid="&dbgiris&";pwd="&parola&";database="&dbname&""
'vt.open= "provider=microsoft.jet.oledb.4.0;jet oledb;data source=" & server.mappath(""&dbname&"") & ";"
%>
-
#ASPquote:
Orijinalden alıntı: oralunal
#ASP
##Accsess+MsqSQL Bağlantı Kodu
Kullanmak istediğinz db connection kodundaki tırnağı kaldırınız dikkat edin ayni anda iki tırnagı olmayan connection kodu olursa hata alırsıız
<%
'serverismi="mssqlserver" Serverimiz ismi
'dbgiris="usr_db5061" db login ismidir
parola="deneme" 'parola
dbname="db/vt1.mdb" 'db ismi
Set vt = Server.CreateObject("ADODB.Connection")
vt.open= "provider=microsoft.jet.oledb.4.0;jet oledb:database password="&parola&";data source=" & server.mappath(""&dbname&"") & ";"
'vt.open = "driver={SQL Server};server="&serverismi&";uid="&dbgiris&";pwd="&parola&";database="&dbname&""
'vt.open= "provider=microsoft.jet.oledb.4.0;jet oledb;data source=" & server.mappath(""&dbname&"") & ";"
%>
Alıntıları Göster
##Formdaki Elemanları Almak
<%
For Each objitem in Request.Form
İf request.form(objitem).count > 0 then
For intLoop = 1 to Request.Form(objitem).count
Objitem = request.form(objitem)
End if
Next
%>
-
anlamadın sen beni, ben zaten croplamayı ver demedim, onu örnek olarak verdim( mesajında gördüğüm için o örneği verdim )quote:
Orijinalden alıntı: oralunal
#ASP
##Accsess+MsqSQL Bağlantı Kodu
Kullanmak istediğinz db connection kodundaki tırnağı kaldırınız dikkat edin ayni anda iki tırnagı olmayan connection kodu olursa hata alırsıız
<%
'serverismi="mssqlserver" Serverimiz ismi
'dbgiris="usr_db5061" db login ismidir
parola="deneme" 'parola
dbname="db/vt1.mdb" 'db ismi
Set vt = Server.CreateObject("ADODB.Connection")
vt.open= "provider=microsoft.jet.oledb.4.0;jet oledb:database password="&parola&";data source=" & server.mappath(""&dbname&"") & ";"
'vt.open = "driver={SQL Server};server="&serverismi&";uid="&dbgiris&";pwd="&parola&";database="&dbname&""
'vt.open= "provider=microsoft.jet.oledb.4.0;jet oledb;data source=" & server.mappath(""&dbname&"") & ";"
%>
Alıntıları Göster
-
#FLASHquote:
Orijinalden alıntı: oralunal
#ASP
##Formdaki Elemanları Almak
<%
For Each objitem in Request.Form
İf request.form(objitem).count > 0 then
For intLoop = 1 to Request.Form(objitem).count
Objitem = request.form(objitem)
End if
Next
%>
Alıntıları Göster
##SQL Bağlantısı
var bag = new LoadVars();
bag.onLoad = yazdir;
function yazdir() {
// buraya istenen kod gelecek
// ve php dosyasındaki verileri " this.degisken " olara kulancaz
// örneğin :
// yazi.text = this.phpyazi
}
bag.sendAndLoad("baglanti.php",bag,"POST");
/*
bu kodlar size php dosyanızdan veri alma ve veri gönderme konusunda kulanılcak. */
-
quote:
Orijinalden alıntı: aspci
anlamadın sen beni, ben zaten croplamayı ver demedim, onu örnek olarak verdim( mesajında gördüğüm için o örneği verdim )
Alıntıları Gösterquote:
Orjinalden alıntı: aspci
anlamadın sen beni, ben zaten croplamayı ver demedim, onu örnek olarak verdim( mesajında gördüğüm için o örneği verdim )
Evet anladım ben onu hatta uygulamaya bile aldım
-
#FireFox Video Download Eklentisiquote:
Orijinalden alıntı: oralunalquote:
Orjinalden alıntı: aspci
anlamadın sen beni, ben zaten croplamayı ver demedim, onu örnek olarak verdim( mesajında gördüğüm için o örneği verdim )
Evet anladım ben onu hatta uygulamaya bile aldım
Alıntıları Göster
##DH'deki video dosyalarını download etme
Öncelikle eklentimizi aşağıdaki adresten indiriyoruz:
https://addons.mozilla.org/en-US/firefox/addon/2390
Ve sonra kuruyoruz işte...http://www.donanimhaber.com/videolar.asp sayfasına gidiyoruz ve videoyaları yüklüyoruz bu eklenti ile
-
#Kurulumquote:
Orijinalden alıntı: oralunal
#FireFox Video Download Eklentisi
##DH'deki video dosyalarını download etme
Öncelikle eklentimizi aşağıdaki adresten indiriyoruz:
https://addons.mozilla.org/en-US/firefox/addon/2390
Ve sonra kuruyoruz işte...http://www.donanimhaber.com/videolar.asp sayfasına gidiyoruz ve videoyaları yüklüyoruz bu eklenti ile
Alıntıları Göster
##XPI Uzantılı FireFox Eklentilerinin Kurulumu
Eklentiler aşağıdaki açıklanan yollarla kurulabilir. Bunun dışında JAR uzantılı dosyaları kullanarak da eklenti ve tema kurulumu yapabilirsiniz
1-XPI Uzantılı Eklentilerin Kurulumu
XPI uzantılı dosyaların kurulumu için 2 farklı yöntem vardır:
1-1 Çevrim içi kurulum
Burada eklenti doğrudan sayfadan kurulur. Yapmanız gereken tek şey eklenti kurma bağlantısına tıklayıp açılacak penceredeki Kur düğmesine basmaktır. Dikkat etmeniz gereken nokta kurulumun gerçekleşeceği konuma gerekli izni (çerez-cookies)vermiş olmanızdır. Bu izni Firefox > Seçenekler (Preference) > İçerik > İzin verilen siteler bölümündeki yazılım kurulumuna ilişkin ayarlardan verebilirsiniz. Ferekli izinler verilmediğig taktirde kurulum gerçekleşmez.
1-2 Çevrim dışı kurulum
Aslında en kolay ve karmaşık olmayan yöntemdir. Eklenti indirme bağlantısına sağ tıklanarak [ktrl + mouse > Farklı kaydet ya da alt + mouse)XPI dosyası bilgisayara kaydedilir. İstediğiniz eklentiyi ilgili siteden alarak kurulumu gerçekleştirebilirsiniz.
Diyelim ki herhangi bir XPI dosyasını bilgisayarınıza kaydettiniz. Aşağıdaki yöntemlerle kurulumu gerçekleştirebilirsiniz:
Firefox ve Mozilla altında kurulum
i) Dosya > Aç yolunu takip edin.rn
ii) Açılan menüden bilgisayarınıza indirdiğiniz XPI dosyasını seçin.
iii) Tamam düğmesine basarak devam edin.
Kurulum sonunda hata uyarısı almazsanız kurulum başarıyla tamamlanmış demektir.
Thunderbird altında kurulum
i) Eklenti dosyasının bağlantısına sağ tıklayarak tarayıcınızla eklentiyi bilgisayarınıza indirin.
ii) Araçlar > Eklentiler yolunu izleyin.
iii) Açılan ufak menüden Kur düğmesine basın.
iv) İndirdiğiniz XPI dosyasını seçin ve Tamam\'a basarak işlemi tamamlayın. rnrnKurulum sonunda hata uyarısı almazsanız kurulum başarıyla tamamlanmış demektir.
Her eklenti kurulumundan sonra eklentinin etkin olabilmesi için kullandığınız programı (Mozilla, Firefox, Thunderbird) yeniden başlatmanız gerekmektedir. Yeniden başlatmadan önce programa ait tüm pencereleri kapatmayı da unutmayın.
JAR uzantılı dosyalarla kurulum
Bilgisayarınızda JAR uzantısına sahip olan dosyaları kullanarak eklenti ve tema kurabilirsiniz.
Sürükle-bırak yöntemi
i) Kurmak istediğiniz öğeye bağlı olarak Araçlar > Eklentiler ya da Araçlar > Temalar yolunu izleyerek eklenti ya da tema yöneticisini açın.
ii) Kullanmak istediğiniz eklentiyi (temayı) eklenti (tema) yöneticisinin üzerine taşıyıp bırakın.
iii) Uygulamayı kapatın ve yeniden açın. Böylece eklenti (tema) kurulmuş olacak. Eklenti ya da tema çalışmıyorsa doğru sürümü kullanıp kullanmadığınıza dikkat edin.
XPI'ye dönüştürme
i) Elinizdeki JAR dosyasının adını, uzantısı XPI olacak biçimde değiştirin. (Ör. tema.jar -> tema.jar.xpi)
ii) Elde ettiğiniz XPI dosyasını programın boş bir penceresi üzerine taşıyıp bırakın ve kurulumu onaylayın.
iii) Uygulamayı kapatıp yeniden açın.
* Bu yöntem içinde kurulum betiği bulunan temalar için geçerlidir. Her JAR uzantılı tema bu yolla kurulamayabilir.
-
#Downloadquote:
Orijinalden alıntı: oralunal
#Kurulum
##XPI Uzantılı FireFox Eklentilerinin Kurulumu
Eklentiler aşağıdaki açıklanan yollarla kurulabilir. Bunun dışında JAR uzantılı dosyaları kullanarak da eklenti ve tema kurulumu yapabilirsiniz
1-XPI Uzantılı Eklentilerin Kurulumu
XPI uzantılı dosyaların kurulumu için 2 farklı yöntem vardır:
1-1 Çevrim içi kurulum
Burada eklenti doğrudan sayfadan kurulur. Yapmanız gereken tek şey eklenti kurma bağlantısına tıklayıp açılacak penceredeki Kur düğmesine basmaktır. Dikkat etmeniz gereken nokta kurulumun gerçekleşeceği konuma gerekli izni (çerez-cookies)vermiş olmanızdır. Bu izni Firefox > Seçenekler (Preference) > İçerik > İzin verilen siteler bölümündeki yazılım kurulumuna ilişkin ayarlardan verebilirsiniz. Ferekli izinler verilmediğig taktirde kurulum gerçekleşmez.
1-2 Çevrim dışı kurulum
Aslında en kolay ve karmaşık olmayan yöntemdir. Eklenti indirme bağlantısına sağ tıklanarak [ktrl + mouse > Farklı kaydet ya da alt + mouse)XPI dosyası bilgisayara kaydedilir. İstediğiniz eklentiyi ilgili siteden alarak kurulumu gerçekleştirebilirsiniz.
Diyelim ki herhangi bir XPI dosyasını bilgisayarınıza kaydettiniz. Aşağıdaki yöntemlerle kurulumu gerçekleştirebilirsiniz:
Firefox ve Mozilla altında kurulum
i) Dosya > Aç yolunu takip edin.rn
ii) Açılan menüden bilgisayarınıza indirdiğiniz XPI dosyasını seçin.
iii) Tamam düğmesine basarak devam edin.
Kurulum sonunda hata uyarısı almazsanız kurulum başarıyla tamamlanmış demektir.
Thunderbird altında kurulum
i) Eklenti dosyasının bağlantısına sağ tıklayarak tarayıcınızla eklentiyi bilgisayarınıza indirin.
ii) Araçlar > Eklentiler yolunu izleyin.
iii) Açılan ufak menüden Kur düğmesine basın.
iv) İndirdiğiniz XPI dosyasını seçin ve Tamam\'a basarak işlemi tamamlayın. rnrnKurulum sonunda hata uyarısı almazsanız kurulum başarıyla tamamlanmış demektir.
Her eklenti kurulumundan sonra eklentinin etkin olabilmesi için kullandığınız programı (Mozilla, Firefox, Thunderbird) yeniden başlatmanız gerekmektedir. Yeniden başlatmadan önce programa ait tüm pencereleri kapatmayı da unutmayın.
JAR uzantılı dosyalarla kurulum
Bilgisayarınızda JAR uzantısına sahip olan dosyaları kullanarak eklenti ve tema kurabilirsiniz.
Sürükle-bırak yöntemi
i) Kurmak istediğiniz öğeye bağlı olarak Araçlar > Eklentiler ya da Araçlar > Temalar yolunu izleyerek eklenti ya da tema yöneticisini açın.
ii) Kullanmak istediğiniz eklentiyi (temayı) eklenti (tema) yöneticisinin üzerine taşıyıp bırakın.
iii) Uygulamayı kapatın ve yeniden açın. Böylece eklenti (tema) kurulmuş olacak. Eklenti ya da tema çalışmıyorsa doğru sürümü kullanıp kullanmadığınıza dikkat edin.
XPI'ye dönüştürme
i) Elinizdeki JAR dosyasının adını, uzantısı XPI olacak biçimde değiştirin. (Ör. tema.jar -> tema.jar.xpi)
ii) Elde ettiğiniz XPI dosyasını programın boş bir penceresi üzerine taşıyıp bırakın ve kurulumu onaylayın.
iii) Uygulamayı kapatıp yeniden açın.
* Bu yöntem içinde kurulum betiği bulunan temalar için geçerlidir. Her JAR uzantılı tema bu yolla kurulamayabilir.
Alıntıları Göster
##IPB v2.3.1
İşte linkimiz:
@Husay teşekkürler, bu download linklerini araştırdım ve bunların warez olduğuna kannat getirdim ve forumdaki otemiz referansımı korumak için kaldırıyorum...
Edit: Linkteki "-" işaretini kaldırmayı unutmayın...
< Bu mesaj bu kişi tarafından değiştirildi oralunal -- 29 Ağustos 2007; 11:51:19 >
-
Tek mesajda birleştirseniz bu şekilde flood a girer.quote:
Orijinalden alıntı: oralunal
#Download
##IPB v2.3.1
İşte linkimiz:
@Husay teşekkürler, bu download linklerini araştırdım ve bunların warez olduğuna kannat getirdim ve forumdaki otemiz referansımı korumak için kaldırıyorum...
Edit: Linkteki "-" işaretini kaldırmayı unutmayın...
Alıntıları Göster -
#Downloadquote:
Orijinalden alıntı: oralunal
#Download
##IPB v2.3.1
İşte linkimiz:
@Husay teşekkürler, bu download linklerini araştırdım ve bunların warez olduğuna kannat getirdim ve forumdaki otemiz referansımı korumak için kaldırıyorum...
Edit: Linkteki "-" işaretini kaldırmayı unutmayın...
Alıntıları Göster
##Flash Website Design
İşte linkimiz:
@Husay teşekkürler, bu download linklerini araştırdım ve bunların warez olduğuna kannat getirdim ve forumdaki otemiz referansımı korumak için kaldırıyorum...
Herkes artık flash yapabilecek... Bu free versionudur ama merak etmeyin PATCH dosyası da içindedir.
Not: Linkteki "-" işaretini kaldırmayı unutmayın...
< Bu mesaj bu kişi tarafından değiştirildi oralunal -- 29 Ağustos 2007; 11:52:03 >
Benzer içerikler
Ip işlemleri
Bu mesaj IP'si ile atılan mesajları ara Bu kullanıcının son IP'si ile atılan mesajları ara Bu mesaj IP'si ile kullanıcı ara Bu kullanıcının son IP'si ile kullanıcı ara
KAPAT X
Bu mesaj IP'si ile atılan mesajları ara Bu kullanıcının son IP'si ile atılan mesajları ara Bu mesaj IP'si ile kullanıcı ara Bu kullanıcının son IP'si ile kullanıcı ara
KAPAT X
