Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

Pomoc u ado.net (if petlja)

[es] :: .NET :: Pomoc u ado.net (if petlja)

[ Pregleda: 2673 | Odgovora: 5 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

batika

Član broj: 72401
Poruke: 67
*.eunet.yu.



Profil

icon Pomoc u ado.net (if petlja)31.08.2008. u 18:18 - pre 190 meseci
Radim aplikaciju u ado.net-u. Problem je sledeci.
Treba da kazem sledece:
If TxtSifra.Text <> integer Then ...


E kako ovo da uradim. Znaci ako nije integer radi to i to.
Hvala na odgovorima.
Pozzzz
 
Odgovor na temu

dava
Banja Luka

Član broj: 27208
Poruke: 893



+384 Profil

icon Re: Pomoc u ado.net (if petlja)31.08.2008. u 22:03 - pre 190 meseci
Moze ovako:

Code:

        private void button1_Click(object sender, EventArgs e)
        {
            if (IsInteger(TxtSifra.Text) == true)
            {
                MessageBox.Show("Integer");
            }
            
        }

        public static bool IsInteger(string value)
        {
            try
            {
                int i = int.Parse(value);
                return true;
            }
            catch
            {
                return false;
            }

        }

SELECT * FROM หน่วยงานหลัก WHERE ยสันติ LIKE 'โดย%'
 
Odgovor na temu

marko1981
Marko Nikolic
Beograd

Član broj: 123059
Poruke: 144
*.bvcom.net.



Profil

icon Re: Pomoc u ado.net (if petlja)31.08.2008. u 22:54 - pre 190 meseci
Pored datog odgovora koji je korektan, možeš pogledati i ovo...

http://www.dotnetspider.com/re...g-Int-Parse-Convert-ToInt.aspx
 
Odgovor na temu

vujkev
Beograd

Član broj: 8072
Poruke: 1347
212.200.241.*



+104 Profil

icon Re: Pomoc u ado.net (if petlja)01.09.2008. u 01:22 - pre 190 meseci
Code:

dim x as integer
If integer.tryparse(TxtSifra.Text, x) = True Then ...

Posle tryparse funkcije, X će biti jednak 0 (nuli) ukoliko TxtSifra.Text nije integer ili će imati konverovanu vrednost TxtSifra.Text u integer ukoliko tekst može da se konvertuje u Integer

Naučio sam...
Da je važnije biti ljubazan nego biti u pravu
 
Odgovor na temu

batika

Član broj: 72401
Poruke: 67
*.eunet.yu.



Profil

icon Re: Pomoc u ado.net (if petlja)03.09.2008. u 08:27 - pre 190 meseci
E ljudi hvala na odgovorima, ali sad imam jedan drugi problem. Naime nece da mi radi update.
Evo kod pa ako moze neko da mi objasni zasto nece.


Kod:
Private Sub BtnUpdate_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnUpdate.Click
Dim pozicija As Integer
Dim objCommand As OdbcCommand = New OdbcCommand
pozicija = objCurrencyManager.Position
objConn.Open()
objCommand.Connection = objConn
objCommand.CommandText = "UPDATE predmet " & _
"SET NazivPredmeta = ?, ESPBodovi = ?, FondPredavanja = ?, FondVezbe = ?" & _
"WHERE SifraPredmeta = ?"
objCommand.CommandType = CommandType.Text



objCommand.Parameters.Add(New OdbcParameter)
objCommand.Parameters.Item(0).Direction = ParameterDirection.Input
objCommand.Parameters.Item(0).DbType = DbType.String
objCommand.Parameters.Item(0).Size = 50
objCommand.Parameters.Item(0).Value = TxtNaziv.Text


objCommand.Parameters.Add(New OdbcParameter)
objCommand.Parameters.Item(1).Direction = ParameterDirection.Input
objCommand.Parameters.Item(1).DbType = DbType.Int16
objCommand.Parameters.Item(1).Size = 11
objCommand.Parameters.Item(1).Value = TxtBodovi.Text


objCommand.Parameters.Add(New OdbcParameter)
objCommand.Parameters.Item(2).Direction = ParameterDirection.Input
objCommand.Parameters.Item(2).DbType = DbType.Int16
objCommand.Parameters.Item(2).Size = 4
objCommand.Parameters.Item(2).Value = TxtFondPredavanja.Text


objCommand.Parameters.Add(New OdbcParameter)
objCommand.Parameters.Item(3).Direction = ParameterDirection.Input
objCommand.Parameters.Item(3).DbType = DbType.Int16
objCommand.Parameters.Item(3).Size = 4
objCommand.Parameters.Item(3).Value = TxtFondVezbe.Text


objCommand.Parameters.Add(New OdbcParameter)
objCommand.Parameters.Item(4).Direction = ParameterDirection.Input
objCommand.Parameters.Item(4).DbType = DbType.Int16
objCommand.Parameters.Item(4).Size = 10
objCommand.Parameters.Item(4).Value = TxtSifra.Text


Try
objCommand.ExecuteNonQuery()
TxtStatusBar.Text = "Predmet je uspesno azuriran"
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try

objConn.Close()

PopuniPodatke()
PoveziKontrole()

objCurrencyManager.Position = pozicija
objCommand = Nothing

End Sub




On javi gresku:INPUT STRING WAS NOT IN CORRECT FORMAT

 
Odgovor na temu

Dejan Vesic
Dejan Vesic
CEO
IGT Ogranak Beograd
Beograd

Član broj: 84929
Poruke: 217
*.xdsl.lixxus.net.

Sajt: www.vesic.org


+1 Profil

icon Re: Pomoc u ado.net (if petlja)19.09.2008. u 19:11 - pre 189 meseci
Nemoj ovako da radiš.

Ako je parametar Int, prvo ga konvertuj u Int; ako prođe, nastaviš dalje; ako ne, prekineš update i javiš korisniku da mora da unese stvari korektno.

Ovo uradi za SVAKI parametar u proceduri ili dodaj validaciju na svaku od tekst kontrola.
 
Odgovor na temu

[es] :: .NET :: Pomoc u ado.net (if petlja)

[ Pregleda: 2673 | Odgovora: 5 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.