Warning: Illegal string offset 'status' in /home2/icentarb/public_html/icentar/print.php on line 190

Warning: Illegal string offset 'status' in /home2/icentarb/public_html/icentar/print.php on line 190
iCentar » Racunari i oprema » Programirannje i baze podataka » Access » Zabrana Slova Å ,Ć,Č,Đ,Ž
MOZEBITIPONOVO 02.01.2015 12:01
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?

zxz 02.01.2015 18:03
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.

zxz 02.01.2015 18:04
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

MOZEBITIPONOVO 02.01.2015 22:58
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!

zxz 03.01.2015 02:07
Predmet:Re: Zabrana Slova Å ,Ć,Č,Đ,Ž

Zakaci primjer

zxz 03.01.2015 09:46
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

MOZEBITIPONOVO 03.01.2015 18:52
Predmet:Re: Zabrana Slova Å ,Ć,Č,Đ,Ž

To je to, hvala i pozdrav!

MOZEBITIPONOVO 03.01.2015 06:01
Predmet:Re: Zabrana Slova Å ,Ć,Č,Đ,Ž

Evo primer!
Prilozi:
db4.rar (Velicina datoteke:25.58 KB)

MOZEBITIPONOVO 04.01.2015 13:41
Predmet:Re: Zabrana Slova Å ,Ć,Č,Đ,Ž

Može li se zabraniti i znak "?

MOZEBITIPONOVO 04.01.2015 13:47
Predmet:Re: Zabrana Slova Å ,Ć,Č,Đ,Ž

Rešio, pozdrav!

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