Centar za edukaciju-BiH



#1 02.01.2015 11:01
Registrovan od:22.03.2012
Postovi:139


Predmet:Zabrana Slova Å ,Ć,Č,Đ,Ž
Pozdrav svima na forumu i svima sretna nova 2015. godina. Iskopirao sam kod koji nedozvoljava koriÅ¡tenje određenih znakova.

Const Strg = "#@%$#!/*?&+.,;:-<>\|[]{}§"

Da li je moguće i kako dodati da se i slova Å  Đ Č Ć Å½ Å¡ đ č ć ž zabrane?
↑  ↓

#2 02.01.2015 17:03
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,642


Predmet:Re: Zabrana Slova Å ,Ć,Č,Đ,Ž
Pa samo dodas u knstantu:
Const Strg = "#@%$#!/*?&+.,;:-<>\|[]{}§Å Å¡ĐđČčĆ掞"

Mozda je problem nesto drugo tj. gdje si postavio kod i jeli treba samo na jednom polju da se ne upisuje ili na citavoj formi.
Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

#3 02.01.2015 17:04
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,642


Predmet:Re: Zabrana Slova Å ,Ć,Č,Đ,Ž
PreuzmiIzvorni kôd (Visual Basic):
  1. Private Sub Text0_KeyPress(KeyAscii As Integer)
  2. Const Strg = "#@%$#!/*?&+.,;:-<>\|[]{}§Å Å¡
  3. Žž"
  4. Dim Slovo As String
  5. Dim Poz As Integer
  6.  
  7. Slovo = Chr(KeyAscii)
  8.  
  9. Poz = InStr(1, Strg, Slovo)
  10.  
  11. If Poz > 0 Then
  12. KeyAscii = 0
  13. End If
  14. End Sub

Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

#4 02.01.2015 21:58
Registrovan od:22.03.2012
Postovi:139


Predmet:Re: Zabrana Slova Å ,Ć,Č,Đ,Ž
Nažalost, to sam i ja probao ali ne ide, iskoči na
Slovo = Chr(KeyAscii), kada koristim slova Å¡đč枊ĐČĆŽ.
Treba mi za upis u samo jedno polje. Pozdrav!
↑  ↓

#5 03.01.2015 01:07
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,642


Predmet:Re: Zabrana Slova Å ,Ć,Č,Đ,Ž
Zakaci primjer
Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

#6 03.01.2015 05:01
Registrovan od:22.03.2012
Postovi:139


Predmet:Re: Zabrana Slova Å ,Ć,Č,Đ,Ž
Evo primer!

Prilozi:
Informacije o tipu datoteke za:rar  db4.rar
Preuzimanja:298
Velicina datoteke:25.58 KB

↑  ↓

#7 03.01.2015 08:46
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,642


Predmet:Re: Zabrana Slova Å ,Ć,Č,Đ,Ž
Interesantno a nema ni u helpu.
Za vece asc 0d 256 koristi se chrw naredba i to od verzije 2000,
Stare verzije rade sa chr.

PreuzmiIzvorni kôd (Visual Basic):
  1. Private Sub NAZIV_KeyPress(KeyAscii As Integer)
  2. Const Strg = "#@%$#!/*?&+.,;:-<>\|[]{}§Å Å¡Å½Å¾
  3. "
  4. Dim Slovo As String
  5. Dim Poz As Integer
  6.  
  7. Slovo = ChrW(KeyAscii)
  8. Poz = InStr(1, Strg, Slovo)
  9. If Poz > 0 Then
  10. KeyAscii = 0
  11. End If
  12. End Sub

Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

#8 03.01.2015 17:52
Registrovan od:22.03.2012
Postovi:139


Predmet:Re: Zabrana Slova Å ,Ć,Č,Đ,Ž
To je to, hvala i pozdrav!
↑  ↓

#9 04.01.2015 12:41
Registrovan od:22.03.2012
Postovi:139


Predmet:Re: Zabrana Slova Å ,Ć,Č,Đ,Ž
Može li se zabraniti i znak "?
↑  ↓

#10 04.01.2015 12:47
Registrovan od:22.03.2012
Postovi:139


Predmet:Re: Zabrana Slova Å ,Ć,Č,Đ,Ž
Rešio, pozdrav!

Const Strg = "#@%$#!_:‚()?*/&%$~""/*?&+.=,;:-<>\|[]{}§Å Å¡Å½Å¾ĐđČčĆć"
↑  ↓

Stranice (3):1,2,3


Sva vremena su GMT +01:00. Trenutno vrijeme: 12: 39 am.