iCentar » Racunari i oprema » Programirannje i baze podataka » Access

zxz	20.12.2010 12:58
Predmet:Re: Autonumber se ponavlja Ako je ovo tvoj ID strai: Usl_Poz = "SELECT * FROM [QryShema] WHERE IDStr = " & Stroj _ & "And IDSkl = " & Sklop _ & "And IDPskl = " & Podsklop _ & "And IDv = " & Cvor ---->ovo Sada bi islo zbog stringa ovako: & "And IDv = '" & Cvor & "'"

zxz

20.12.2010 12:58

Predmet:Re: Autonumber se ponavlja

Ako je ovo tvoj ID strai:
Usl_Poz = "SELECT * FROM [QryShema] WHERE IDStr = " & Stroj _
& "And IDSkl = " & Sklop _
& "And IDPskl = " & Podsklop _
& "And IDv = " & Cvor ---->ovo

Sada bi islo zbog stringa ovako:
& "And IDv = '" & Cvor & "'"

pmiroslav	20.12.2010 13:25
Predmet:Re: Autonumber se ponavlja Safda sam napisao ovako i joÅ¡ uvjek je isti problem Usl_Poz = "SELECT * FROM [QryShema] WHERE IDStr = " & Stroj _ & "And IDSkl = " & Sklop _ & "And IDPskl = " & Podsklop _ & "And IDČv = '" & Cvor & "'"

pmiroslav

20.12.2010 13:25

Predmet:Re: Autonumber se ponavlja

Safda sam napisao ovako i joÅ¡ uvjek je isti problem

Usl_Poz = "SELECT * FROM [QryShema] WHERE IDStr = " & Stroj _
& "And IDSkl = " & Sklop _
& "And IDPskl = " & Podsklop _
& "And IDČv = '" & Cvor & "'"

zxz	20.12.2010 17:11
Predmet:Re: Autonumber se ponavlja Probaj ovako: Usl_Poz = "SELECT * FROM [QryShema] WHERE IDStr = '" & Stroj _ & "' And IDSkl = " & Sklop _ & "And IDPskl = " & Podsklop _ & "And IDČv = " & Cvor Ako ti je idst tvoj stari kljuc. Gledaj moras znati ovo: ako je broj: " imepolja=" I memorijskaPodatka Ako je string: " imepolja='" I memorijskaPodatka & "'" sto znaci da mora podatak biti oivicen Ovako: ' nekipodatakizmemorijeke'

zxz

20.12.2010 17:11

Predmet:Re: Autonumber se ponavlja

Probaj ovako:
Usl_Poz = "SELECT * FROM [QryShema] WHERE IDStr = '" & Stroj _
& "' And IDSkl = " & Sklop _
& "And IDPskl = " & Podsklop _
& "And IDČv = " & Cvor

Ako ti je idst tvoj stari kljuc.

Gledaj moras znati ovo:

ako je broj:
" imepolja=" I memorijskaPodatka
Ako je string:
" imepolja='" I memorijskaPodatka & "'"

sto znaci da mora podatak biti oivicen Ovako:
' nekipodatakizmemorijeke'

pmiroslav	20.12.2010 20:07
Predmet:Re: Autonumber se ponavlja PokuÅ¡avam ali nikako ne uspjevam. Sa funkcijom "Slozi" trebam iz querya "qryShema" prebaciti podatke u tablicu "ShemaTransfer" Dok je ID broj sve je uredu, a kako sam sada ID prepravio u string javlja se greÅ¡ka. Molim te ako nije teÅ¡ko da pogledaÅ¡ primjere koje sam prikvačio pa moÅ¾da uočiÅ¡ gdje je greÅ¡ka.
Prilozi: ID_broj.rar (Velicina datoteke:32.59 KB) ID_string.rar (Velicina datoteke:28.26 KB)

pmiroslav

20.12.2010 20:07

Predmet:Re: Autonumber se ponavlja

PokuÅ¡avam ali nikako ne uspjevam.
Sa funkcijom "Slozi" trebam iz querya "qryShema" prebaciti podatke u tablicu "ShemaTransfer"
Dok je ID broj sve je uredu, a kako sam sada ID prepravio u string javlja se greÅ¡ka.
Molim te ako nije teÅ¡ko da pogledaÅ¡ primjere koje sam prikvačio pa moÅ¾da uočiÅ¡ gdje je greÅ¡ka.

Prilozi:
ID_broj.rar (Velicina datoteke:32.59 KB)
ID_string.rar (Velicina datoteke:28.26 KB)

zxz	20.12.2010 20:31
Predmet:Re: Autonumber se ponavlja Nisi morao obadvije stavljati: PreuzmiIzvorni kôd (Visual Basic): Usl_Poz = "SELECT * FROM [QryShema] WHERE IDStr ='" & Stroj _ & "' And IDSkl ='" & Sklop _ & "' And IDPskl ='" & Podsklop _ & "' And IDcv ='" & Cvor & "'" Jos je bila greska u imenu idČv--->idCv. U staroj imas dosta polja sa nasim slovima. Sad si prepravio. To moras prepraviti i na formama i Qury-ima. Elem moras detaljno pregledati.

zxz

20.12.2010 20:31

Predmet:Re: Autonumber se ponavlja

Nisi morao obadvije stavljati:

PreuzmiIzvorni kôd (Visual Basic):

Usl_Poz = "SELECT * FROM [QryShema] WHERE IDStr ='" & Stroj _
& "' And IDSkl ='" & Sklop _
& "' And IDPskl ='" & Podsklop _
& "' And IDcv ='" & Cvor & "'"

Jos je bila greska u imenu idČv--->idCv.
U staroj imas dosta polja sa nasim slovima.
Sad si prepravio.
To moras prepraviti i na formama i Qury-ima.
Elem moras detaljno pregledati.

pmiroslav	20.12.2010 21:13
Predmet:Re: Autonumber se ponavlja Hvala, sada radi. Nikako da shvatim te znakove navoda u SQL stringovima. A to Å¡to se tiče naÅ¡ih slova znam da ne valja, međutim to je iz baze koju sam počeo raditi joÅ¡ kao početnik pa sam je nadograđivao i nadograđivao pa u njoj joÅ¡ ima takovih stavri. Moram to popraviti.

pmiroslav

20.12.2010 21:13

Predmet:Re: Autonumber se ponavlja

Hvala, sada radi. Nikako da shvatim te znakove navoda u SQL stringovima.
A to Å¡to se tiče naÅ¡ih slova znam da ne valja, međutim to je iz baze koju sam počeo raditi joÅ¡ kao početnik pa sam je nadograđivao i nadograđivao pa u njoj joÅ¡ ima takovih stavri.
Moram to popraviti.

zxz	20.12.2010 21:32
Predmet:Re: Autonumber se ponavlja Evo jos jednom kada treba znak za string. Primjer: Dim Podatak as string Podatak=Rs!Nekopoleiztabele ili Podatak=Me.Imepoljanaformi PretÅ¡postavimo da je podatak ime. Znaci u Memorijskoj podatak imamo ime. Pretpostavimo da je to ime Tomica Znaci rezultat memorijske Podatak je Tomica. Ako sad ovo hocemo staviti kao uslov za izvrsenje negog SQL-a: Sql u kodu je sam strin znaci moramo ga pisati izmedju znakova navoda. Ovi vanjski znaci navoda ne idubazi oni sluze samo Vb-u da VB to razumije kao string. E sad Posto kaka Pisemo Query odnosno sql i tamo koristimo znake navoda za string. Sada pri pisanju Vb taj znak poznaje kao svoj string. Sta mi radimo: Posto SQL prihvata i ovaj znak ' za oivicenje stringa onda kada pisemo SQL u VB kodu koristimo taj znak za slanje bazi kao string a ostaje nam znak navoda kao Vb-ov string. U gore navedenom slucaju Rezultat Memorijske Podatak cemo oiviciti sa ovim znakom '. Znaci bilo bi: SQL= "SELECT * FROM Imetabele WHERE ImePolja=" Ovo je prvi dio stringa koji saljemo SQL-u a drugi dio citamo iz memorijske Podatak. Pa bi bilo: SQL= "SELECT * FROM Imetabele WHERE ImePolja=" & "'" & Podatak & "'" Evo ovako se pise: A izgledat ce SQL ovako: SELECT * FROM Imetabele WHERE ImePolja='Tomica' Znaci SQL ovo zadnje dobije sto postuje pravila SQLa.

zxz

20.12.2010 21:32

Predmet:Re: Autonumber se ponavlja

Evo jos jednom kada treba znak za string.
Primjer:
Dim Podatak as string

Podatak=Rs!Nekopoleiztabele ili
Podatak=Me.Imepoljanaformi
PretÅ¡postavimo da je podatak ime.

Znaci u Memorijskoj podatak imamo ime.
Pretpostavimo da je to ime Tomica
Znaci rezultat memorijske Podatak je Tomica.

Ako sad ovo hocemo staviti kao uslov za izvrsenje negog SQL-a:
Sql u kodu je sam strin znaci moramo ga pisati izmedju znakova navoda.
Ovi vanjski znaci navoda ne idubazi oni sluze samo Vb-u da VB to razumije kao string.
E sad Posto kaka Pisemo Query odnosno sql i tamo koristimo znake navoda za string.
Sada pri pisanju Vb taj znak poznaje kao svoj string.
Sta mi radimo:
Posto SQL prihvata i ovaj znak ' za oivicenje stringa onda kada pisemo SQL u VB kodu koristimo taj znak za slanje bazi kao string a ostaje nam znak navoda kao Vb-ov string.

U gore navedenom slucaju Rezultat Memorijske Podatak cemo oiviciti sa ovim znakom '.

Znaci bilo bi:

SQL= "SELECT * FROM Imetabele WHERE ImePolja="
Ovo je prvi dio stringa koji saljemo SQL-u
a drugi dio citamo iz memorijske Podatak.
Pa bi bilo:
SQL= "SELECT * FROM Imetabele WHERE ImePolja=" & "'" & Podatak & "'"

Evo ovako se pise:

A izgledat ce SQL ovako:
SELECT * FROM Imetabele WHERE ImePolja='Tomica'

Znaci SQL ovo zadnje dobije sto postuje pravila SQLa.

pmiroslav	21.12.2010 09:43
Predmet:Re: Autonumber se ponavlja Upomoć, ja nikako na zelenu granu i ponovnno problemi. Sada se mućim sa ovim PreuzmiIzvorni kôd (vbnet): Dim stDocName As String Dim stLinkCriteria As String stDocName = "PitaIzdatnicu" stLinkCriteria = "IDPoz=" & CStr(Me.txtIDpoz) [color=#FF0000]'IDpoz je bio broj, a sada je string[/color] If Not IsNull(DLookup("IDPoz", "qryNalog", "IDPoz=" & CStr(Me.txtIDpoz))) Then DoCmd.OpenForm FormName:=stDocName, OpenArgs:=Me.txtIDpoz Else DoCmd.OpenForm FormName:=stDocName _ , datamode:=acFormAdd _ , WhereCondition:=stLinkCriteria _ , OpenArgs:=Me.txtIDpoz End If

pmiroslav

21.12.2010 09:43

Predmet:Re: Autonumber se ponavlja

Upomoć, ja nikako na zelenu granu i ponovnno problemi.
Sada se mućim sa ovim

PreuzmiIzvorni kôd (vbnet):

Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "PitaIzdatnicu"
stLinkCriteria = "IDPoz=" & CStr(Me.txtIDpoz) [color=#FF0000]'IDpoz je bio broj, a sada je string[/color]
If Not IsNull(DLookup("IDPoz", "qryNalog", "IDPoz=" & CStr(Me.txtIDpoz))) Then
DoCmd.OpenForm FormName:=stDocName, OpenArgs:=Me.txtIDpoz
Else
DoCmd.OpenForm FormName:=stDocName _
, datamode:=acFormAdd _
, WhereCondition:=stLinkCriteria _
, OpenArgs:=Me.txtIDpoz
End If