[es] - upit u vb.u, datum

execution
Sarajevo

Član broj: 171411
Poruke: 5
*.europronet.ba.

Profil

^{27.12.2008. u 14:39 - pre 187 meseci}

dragi moji vi... ja imam jedan problem i mnogo bih cijenila vasu pomoc
naime, pravim neki mini projekat Aerodrom u vb6

sada sam pri kraju ostao mi jedan problem koji me izludi

imam tabelu Let i u njoj izmedju ostalog atribute SifraLeta i Datum

Sada u jednoj formi u ComboBox.u izaberem Datum... i njega proslijedim u iducu formu, i u toj formi pomocu upita trazim sifru leta na osnovu proslijedjenog datuma

e sada u tabeli
kad unosim datum kako god ga unesem sa tackama ili sa / on ga sam konvertuje na to da bude sa tackama (unesem 1/1/2009 on ispravi na 1.1.2009)
no, kada pravim upit

npr.

SELECT SifraLeta
FROM Let
WHERE Datum=#1/1/2009#;

trazi od mene da budu /, jer sa tackama nece da radi

e sada... posto ja u vb.u necu rucno upisivati datum pa da mogu tako pisati ha tacku ha /, mislila sam to rijesti sa

Code:
Call Form5.Datum(mojDatum) 'iz ove forme sma proslijedila datum
    'MsgBox mojDatum
    dd = Mid(mojDatum, 1, 2)
    mm = Mid(mojDatum, 4, 2)
    gg = Mid(mojDatum, 7, 5)

    mojDatum = "#" & dd & "/" & mm & "/" & gg & "#"

    str1 = "Select SifraLeta " & _
    "From Let " & _
    "Where Datum = mojDatum"
    Set tabela = mDb.OpenRecordset(str1, dbOpenDynaset)

no vise me izludi sintaxa ovih upita u vb.u... sad mi ovdje opet javlja gresku Too few parameters. Expected 1... koju mi je prije javljao zbog nedostatka ovih & _ a sada poojma nemam zasto

eto, ako je neko shvatio sta sam htjela, i zna gdje je problem, mnogo bih bila zahvalna

Odgovor na temu

Pulapola
Pula

Član broj: 28152
Poruke: 52
*.adsl.net.t-com.hr.

Profil

Re: upit u vb.u, datum

^{27.12.2008. u 16:09 - pre 187 meseci}

Prvo datum podijeli na dan, mjesec i godina.
Dodaj jedni Adodc i povežu na tvoju bazu.
Evo jedan primjer sintakse:

Code:

    Dan = Day(txtDatum)
    Mjesec = Month(txtDatum)
    Godina = Year(txtDatum)

    Adodc1.ConnectionString = gConnectionString
    Adodc1.RecordSource = "SELECT Stranke.Broj, Stranke.Datum, " & _
    "Stranke.Prezime, Stranke.Ime, Stranke.Svrha " & _
    "From Stranke WHERE (((Stranke.Datum) =#" & Mjesec & " / " & Dan & " / " & Godina & "# ))"
    Adodc1.Refresh

Pozdrav

Odgovor na temu

execution
Sarajevo

Član broj: 171411
Poruke: 5
*.europronet.ba.

Profil

Re: upit u vb.u, datum

^{27.12.2008. u 17:13 - pre 187 meseci}

hvala mnogo na odgovoru
taj adodc mi je mnogo stran pa nisam pomocu toga rijesila
ali sam svejedno skoro pa rijesila problem zahvaljujuci tvom postu

Odgovor na temu