H

Çavuş
10 Ocak 2006
Tarihinde Katıldı
Takip Ettikleri
0 üye
Görüntülenme (?)
3 (Bu ay: 0)
Gönderiler Hakkında
H
10 yıl
Asp üye kayıt kısmında aldığım güvenlik önlemleri..
Bir proje üzerinde çalışma yapıyorum, üye kayıt formunda aldığım güvenlik önlemleri yeterli mi, gereksiz veya yanlış yerler var mı görüşlerinize ihtiyacım var. Yardımcı olursanız sevinirim.

Function kontrol(bilgi)
bilgi = Replace (bilgi ,"`","",1,-1,1)
bilgi = Replace (bilgi ,"=","",1,-1,1)
bilgi = Replace (bilgi ,"%","",1,-1,1)
bilgi = Replace (bilgi ,"!","",1,-1,1)
bilgi = Replace (bilgi ,"&","",1,-1,1)
bilgi = Replace (bilgi ,"#","",1,-1,1)
bilgi = Replace (bilgi ,"<","[",1,-1,1)
bilgi = Replace (bilgi ,">","]",1,-1,1)
bilgi = Replace (bilgi ,"*","",1,-1,1)
bilgi = Replace (bilgi ,"'","",1,-1,1)
bilgi = Replace (bilgi ,"Chr(34)","",1,-1,1)
bilgi = Replace (bilgi ,"Chr(39)","",1,-1,1)
kontrol=bilgi
End Function


tc=trim(request.form("tc"))
IF Not IsNumeric(tc) THEN
response.redirect("uyeol.asp")
response.end
END IF

adsoyad=cevir(trim(request.Form("adsoyad")))
adsoyad=Server.HTMLEncode(adsoyad)
adsoyad=kontrol(adsoyad)

**Açılır liste de iki seçenek var, böyle bir koruma koydum**
cinsiyet=request.form("cinsiyet")
If not cinsiyet="e" and not cinsiyet="k" THEN
response.redirect("uyeol.asp")
response.end
END IF

**Açılır liste de iki seçenek var, böyle bir koruma koydum**
egitim=request.form("egitim")
If not egitim="o" and not egitim="d" THEN
response.redirect("uyeol.asp")
response.end
END IF

**E-Posta ve parola alanlarına da böyle bir koruma koydum, doğru mu?
eposta=Server.HTMLEncode(request.form("eposta"))
eposta=kontrol(eposta)

parola=Server.HTMLEncode(trim(request.form("parola")))
parola=kontrol(parola)
H
13 yıl
Lenovo mu? 10 Kere Düşünün!!!
Lenovo ürününü seviyorum ama bu iş bilmez, yasa bilmez, müşteri haklarını hiçe sayan müşteri hizmetlerinden uzak durun. Ürünümün tamir süresi 20 günü aştığı halde 20 gün dolmadı diyen, tamir süresinin arıza kaydı oluşturduğum gün başladığı halde bize ulaştığında başlar diyen, cumartesi günlerinin iş günü sayıldığı halde cumartesi günleri çalışmıyoruz iş günü değil diyen ve bütün müşterilere böyle uyguluyoruz size de böyle uygulayacaz diyen ve tamir ettiğiniz ürünü istemiyorum, 20 gün tamir süresini aştınız ben ürünün değişimini istiyorum dediğim halde ürünü kargolayan bir müşteri hizmetleri var. Ürünü teslim almayacağım, hemen tüketici mahkemesine gidip hakkımı arayacağım. Adamlar göz göre usülsüzlük yapmaya çalışıyor, bu kadar olmaz.. Bence uzak durun, ürün kaliteli olduğu kadar arkasındaki müşteri hizmetlerinin de kaliteli olması lazım bence... İyi niyet kesinlikle yok, baktı yalanları kandırmacası tutmuyor, biz gönderiyoruz siz naparsanız yapın, yasal haklarınızı kullanın diyerek rest çeken bir müşteri hizmetleri yetkilisi.
H
17 yıl
şu programı lütfen inceleyin
Ya arkadaşlar kafayı yedim şu programı lütfen bir inceleyin, sadece M harfini kaydırmak istiyorum, ama bir türlü beceremedim. Proteus Isısta devreyi oluşturdum, harfleri tek tek görebiliyorum, 16f628A pic kullanıyorum çünkü 16f628 yok programda. bir türlü kaydıramadım. Bu arada bu program mehmet isimli bir arkadaştan alıntıdır, değişkenlerdeki 0 lar led'in yandığını 1 ler ise söndüğünü ifade ediyor, arkadaşın yaptığın programda tam tersiydi neden böyle oldu anlamadım. sanırım 16f628 değil de 16f628A pic i kullandığım için diye düşündüm.

P1 VAR BYTE
i VAR BYTE
i1 VAR BYTE

d0 VAR BYTE
d1 VAR BYTE
d2 VAR BYTE
d3 VAR BYTE
d4 VAR BYTE
d5 VAR BYTE


TRISA=%00000000
TRISB=%00000000

P1=5
i=0
i1=1000


d0=%11111111
d1=%10000000
d2=%11111101
d3=%11111011
d4=%11111101
d5=%10000000



BASLA:
i=i+1
IF i=i1 Then GoTo KAY
PORTA=%00000001
PORTB=d1
Pause P1

PORTA=%00000010
PORTB=d2
Pause P1

PORTA=%00000100
PORTB=d3
Pause P1

PORTA=%00001000
PORTB=d4
Pause P1

PORTA=%00010000
PORTB=d5
Pause P1

GoTo BASLA
KAY:
d0=d1
d1=d2
d2=d3
d3=d4
d4=d5
d5=d0
i=0
GoTo basla
End

kafama takılan bir yer var, eğer bu da basic gibi basamak basamak işliyorsa yukarıdan aşağı doğru, d0=d1 olan yerde biz d0'ın içeriğini direk d1'den alıp d5'e atıyoruz, burdaki boşluk sütunu komple aradan kaybolmuş oluyor, bunun için orayı şu şekilde değiştirdim yine olmadı

KAY:
k=d0
d0=d1
d1=d2
d2=d3
d3=d4
d4=d5
d5=k
i=0
GoTo basla
End

Bu şekilde d0'ın içindeki boşluk sütunu kaybolmamış oldu ve devamlılığı sağladım ama yine olmuyor ya ...
H
17 yıl
picbasic ile ilgili bir sorun (proteus)
merhaba;
forumlarda bir arkadaşın verdiği bir programı proteusta yapmak istiyorum, bütün bağlantıları yaptım (pic16f628). bütün portları çıkış olarak ayarladım, fakat ra04 bacağı çıkış vermiyor, sanırım pull-down mu pull-up direnci mi ne bağlamam gerekiyormuş, proteusta bu ayağı nasıl çalıştırabilirim
H
18 yıl
bilgisayarım çok yavaş çalışıyor? Neden...
Bağdaştırıcı Türü GeForce 6200 TurboCache(TM), Leadtek Research Inc. uyumlu

ses Realtek High Definition Audio

Model SAMSUNG SP0822N

intel pentium4 3.0 Ghz

512 mb ram

anakart asus 95gd1 pro

Bilgisayarım 3-4 dakikada açılıyor
Müzik dinlerken her hangi bir pencere açıldığında ses takılıyor daha sonra kesik kesik çıkıyor.
normal pencere içerikleri geç açılıyor.
Not: Windows yeni kurulduğunda bile aynı şeyi yapıyor.

Problem ne olabilir yardımcı olursanız sevinirim...
H
18 yıl
çıIRQL_NOT_LESS_OR_EQUAL şeklinde bir hata çıkıyor
bu şekilde bir hata alıyorum, bilgisayar açılışta onarma istiyor ve açılmıyor, format atmaya çalışıyorum yarıya kadar geliyor, F8 tuşuna basip sözleşmeyi kabul et dediğim zaman bir mavi ekran alıyorum ve ekranda öylece kalıyor, hata ise bu
IRQL_NOT_LESS_OR_EQUAL
nasıl çözebilirim biri yardımcı olabilir mi acaba
H
19 yıl
bu hata veriyor alanım niye acaba
Internal Server Error
The server encountered an internal error or misconfiguration and was unable to complete your request.
Please contact the server administrator to inform of the time the error occurred and of anything you might have done that may have caused the error.

More information about this error may be available in the server error log.
H
19 yıl
sql sorgusundan kayıt alamıyorum...
Set cevap = Server.CreateObject("ADODB.Recordset")
SQLcumle2 = "SELECT max(tarih) FROM cevaplar WHERE soruid = " & soru("soruid")
cevap.Open SQLcumle2, BAGLANTI, 1, 3

asp de böyle bir kod yazdım ama ordaki sorgu sonucunu bir değişkene alamıyorum, örneğin;

k=cevap.recordcount dediğimiz zaman sonucu alabiliyorum ama ordaki maksimum tarih değerini değişkene alamıyorum

bunu nasıl yapabilirim arkadaşlar
H
19 yıl
kullanıcının upload ettiği resmin adını değiştirme
arkadaşlar bir sistem yapıyorum üyeler resimlerini yollayabilecekler, fakat resimler 1 klasörde toplandığı için elimdeki sistem image adlı bir resim varsa ikinci gelen image adlı resmi onun üzerine kayıt ediyor önceki resim silinmiş oluyor, öncelikle resim alırken resmin adını kullanıcının ID numarası ile değiştirebilir miyim, veya buna nasıl bir çözüm bulabilirim, yani günde 10 kişi kayıt olsa siteye ve 3 tane resmin adı image olsa en son atılan resim kalıyor diğerleri siliniyor, lütfen yardım edin
H
19 yıl
global.asa ve application nesnesi hakkında acil yardıma ihtiyacım var
bu nesnelerin ne işe yaradığını biliyorum ama nasıl kullanacağım hakkında hiçbir fikrim yok, bana yardımcı olabilecek arkadaşlar var mı acaba, nereye yazılır, global.asa nın içine neler yazılır, nasıl kullanılır, yardımcı olacaklara şimdiden teşekkürler
DH Mobil uygulaması ile devam edin. Mobil tarayıcınız ile mümkün olanların yanı sıra, birçok yeni ve faydalı özelliğe erişin. Gizle ve güncelleme çıkana kadar tekrar gösterme.