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

Funkcija za spajanje i pretragu baze podataka

[es] :: .NET :: .NET Desktop razvoj :: Funkcija za spajanje i pretragu baze podataka

[ Pregleda: 1639 | Odgovora: 3 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

itf
Zagreb

Član broj: 59794
Poruke: 993
161.53.237.*



+9 Profil

icon Funkcija za spajanje i pretragu baze podataka21.01.2011. u 11:13 - pre 101 meseci
Pozdrav.

Inače programiram u C++u pa ne provodim previše vremena za .NETom. Igrom slučaja za jedan software pišem dokumentaciju pa moram napisati primjer funkcije koja se spaja na ms access bazu podataka, provjerava da li se u nekoj tablici nalazi nekakav string i vraća true ili false (da li je našao ili nije). Znači, prototip bi nekako glasio ovako:

bool ProvjeriStringuBazi(char* baza, char* tablica, char* string);

tj. poziv funkcije bi bio npr.:

bool provjera = ProvjeriStringuBazi("Baza.mdb", "Tablica1", "NekiString");

Opet napominjem, .NET nije moje područje pa se nadam da me nećete razapinjati jer nisam napisao ništa sa svoje strane :)

Bio bih zahvalan za C# i VB.NET primjer.
 
Odgovor na temu

aca andrijevic
aka LoGaN
Nis

Član broj: 35450
Poruke: 347
93.184.86.*

ICQ: 325309560


+2 Profil

icon Re: Funkcija za spajanje i pretragu baze podataka21.01.2011. u 15:19 - pre 101 meseci
Code (vbnet):
Imports System.Data.OleDb

Public Class Form1
    Public Function ProveraStringa(ByVal baza As String, ByVal tabela As String, ByVal pretraga As String)
        Dim con As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Application.StartupPath & "/" & baza & ";Persist Security Info=False;"
        Dim oledbcon As New OleDbConnection(con)
        Dim objRead As OleDbDataReader
        Dim cmd As OleDbCommand
        Dim str As String
        Dim str2 As String
        Try
            oledbcon.Open()
            str = "SELECT * FROM " & tabela & " WHERE string ='" & pretraga & "'"
            cmd = New OleDbCommand(str, oledbcon)
            objRead = cmd.ExecuteReader
            While objRead.Read
                str2 = objRead("string").ToString
            End While
            If str2 = "" Then
                MessageBox.Show("Nema podataka")
            Else
                MessageBox.Show("Ima podataka")
            End If
        Catch ex As Exception
            MessageBox.Show(ex.Message)
        End Try

    End Function

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Call ProveraStringa("Baza.mdb", "Tablica1", "NekiString")
    End Sub
End Class


Ovo je VB.NET, C# ne radim, tako da mozes ili da uzmes neki prevodioc ili ako se neko jos javi.

[Ovu poruku je menjao Shadowed dana 21.01.2011. u 16:46 GMT+1]
"Ne menjaj nesto sto te sasvim dobro sluzi, ne trazi leba preko pogace" - Aleksandar Andrijevic
 
Odgovor na temu

BrainDemage
gotovan

Član broj: 253985
Poruke: 114
*.dynamic.sbb.rs.



+2 Profil

icon Re: Funkcija za spajanje i pretragu baze podataka21.01.2011. u 16:04 - pre 101 meseci
Ovde mozes da prevedes u c# kod.
Život je polje svih mogućnosti.
Ono što izaberete to je vaš život.
 
Odgovor na temu

itf
Zagreb

Član broj: 59794
Poruke: 993
161.53.237.*



+9 Profil

icon Re: Funkcija za spajanje i pretragu baze podataka22.01.2011. u 07:37 - pre 101 meseci
Hvala!
 
Odgovor na temu

[es] :: .NET :: .NET Desktop razvoj :: Funkcija za spajanje i pretragu baze podataka

[ Pregleda: 1639 | Odgovora: 3 ] > FB > Twit

Postavi temu Odgovori

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