Access ne guta '

Access ne "guta" ' 24.02.2005. u 19:18 · pre 263 meseca #1

Upisivanjem znaka apostrofa ' u txtbox i pokusajem ubacivanja istog u bazu pojavljuje se graske. Koji jos simboli ne prolaze kod upisivanja u bazu i kako ih elimirati prilikom upisivanja?

Ja sam pokusao zabraniti unosenje apostrofa u txtbox. Uspio sam ovim kodom zabraniti upisivanmje apostrofa ali dobivam kursor na pocetak txtboxa, sto mi nikako ne odgovara.
Pitanje 2. Kako postaviti kursor na kraj unosa?

Code:

Private Sub txtIme_Change()
If Right$(txtIme.Text, 1) = "'" Then
txtIme.Text = Left$(txtIme.Text, Len(txtIme.Text) - 1)
End If
End Sub

Re: Access ne "guta" ' 24.02.2005. u 19:26 · pre 263 meseca #2

Zabrana '

Code:

Private Sub txtIme_KeyPress(KeyAscii As Integer)
If KeyAscii = 39 Then KeyAscii = 0
End Sub

Kursor na kraj unetog texta

Code:

txtIme.SelStart = Len(txtIme.Text)

Potpis

Blue Man Group

Re: Access ne "guta" ' 24.02.2005. u 19:46 · pre 263 meseca #3

:) Hvala puno!

Ima li jos kakvih "znakova" koje treba banovati?

Re: Access ne "guta" ' 24.02.2005. u 20:15 · pre 263 meseca #4

Kako dodajes zapis u bazu? INSERT INTO ili Recordset.AddNew? Prvi nacin je komplikovaniji zbog ovih stvari. Ako radis sa recordsetom neces imati ovakvih problema.

Potpis

Blue Man Group

Re: Access ne "guta" ' 24.02.2005. u 23:13 · pre 263 meseca #5

Ja koristim ovaj prvi, tezi nacin.
Tako su me ucili odn. uputili da je to najbolji nacin pa je eto turpijam tako.

Mada nista nije neizvedivo, samo je pitanje na koji nacin.

Re: Access ne "guta" ' 25.02.2005. u 09:57 · pre 263 meseca #6

Nije da je taj nacin los, ali dosta je "database specific", odnosno sintaksa se razlikuje (ne drasticno) zavisno od baze sa kojom radis. Ako radis sa recordsetom, onda ne moras da vodis racuna o tim specificnostima, bar sto se tice unosa podataka.

Potpis

Blue Man Group

Re: Access ne "guta" ' 25.02.2005. u 10:23 · pre 263 meseca #7

Ako koristis prvi nacin i ADO konekciju onda koristi parametre za unos u bazu. Tako ces moci da unosis bilo sta i neces imati potrebe da se mucis sa filtriranjem.

Code:

            Set cmd = New ADODB.Command
            cmd.ActiveConnection = cnn 'ovde je neka tvoja konekcija
            cmd.CommandText = "INSERT INTO MojaTabela (mojePolje) VALUES (@mojaVrednost)" '

            Set param = New ADODB.Parameter
            param.Type = adWChar
            param.Size = len(txtIme.Text)
            param.Name = "@mojaVrednost"
            cmd.Parameters.Append param
            param.Value = txtIme.Text

            cmd.Execute

Forum kao aplikacija na telefonu

Srodne teme