[ Blue82 @ 13.03.2015. 10:29 ] @
Pokusavam nesto da prepravim u našoj bazi a programer mi nije tu pa mi je potrebna pomoć.
Kako nemam pristup SQL-u pa ne mogu da napravim backup a radim na živim podacima ne bih da nešto zeznem.

Imam neku funkciju čije se rešenje smešta u promenjivu UlazniStatus. Neka je ona u ovom primeru uvek "00" to mi nije bitno.
Pokusavam da procitam sve zapise iz baze sa StatusKom "00" i "03" -tip podataka string, i da ih uporedim sa vrednosti iz proenjive UlazniStatus. Ako ta 2 statusa nisu ista, u bazi treba da se upiše vrednost iz promenjive "UlazniStatus".

Ovim dole kodom uspešno očitavam Šifru komitenta (ona je jedinstveni zapis u bazi sa svakog komitenta sa kojim radimo) i njegov trenutni status.

Može li mi neko doraditi code, jer ovo sam mogao da isprobam a sa upisom se ne bih igrao.

Code:

        Dim UlazniStatus As String = "00"
        Dim StatusUbazi as string=""
        Dim SifraKomitenta As String = ""

        Dim connetionString As String
        Dim connection As SqlConnection
        Dim command As SqlCommand
        Dim sql As String
        connetionString = "Data Source=SERVER2003\SERVER2000;Initial Catalog=Komercijala;User ID=sa;Password=sa"
        sql = "SELECT * FROM Komintenti WHERE StatusKom LIKE '00' OR StatusKom LIKE '03'"
        connection = New SqlConnection(connetionString)
        Try
            connection.Open()
            command = New SqlCommand(sql, connection)
            Dim sqlReader As SqlDataReader = command.ExecuteReader()

            While sqlReader.Read()
                StatusUbazi = sqlReader.Item("StatusKom")  'ovde procitam status komitenta
                SifraKomitenta = sqlReader.Item("SifKomint") ' ovde procitam sifru komitenta
            End While
            sqlReader.Close()
            command.Dispose()
            connection.Close()
        Catch ex As Exception
            MsgBox("Can not open connection ! ")
        End Try


[ ravni @ 16.03.2015. 10:35 ] @
Citat:
Blue82: Imam neku funkciju čije se rešenje smešta u promenjivu UlazniStatus. Neka je ona u ovom primeru uvek "00" to mi nije bitno.
Pokusavam da procitam sve zapise iz baze sa StatusKom "00" i "03" -tip podataka string, i da ih uporedim sa vrednosti iz proenjive UlazniStatus. Ako ta 2 statusa nisu ista, u bazi treba da se upiše vrednost iz promenjive "UlazniStatus".
Mozda lupam, al cini mi se da je dovoljno
Code:
UPDATE Komintenti 
SET StatusKom = ulazni_status
WHERE StatusKom = '00' OR StatusKom = '03'