 |
|
Strona 1 z 1
|
[ Posty: 12 ] |
|
| Autor |
Wiadomość |
|
edward
Rejestracja: 2009-09-10, 09:52
Posty: 40
|
 Nowy rekord do bazy Witam,
Nie mogę w helpie znaleźć sposobu na dodanie do bazy np. kh (w Handel Premium) nowego rekordu. Any help?
Pozdrawiam
|
| 2009-10-08, 08:33 |
|
|
| Autor |
Wiadomość |
|
Mix-soft.pl
|
|
|
|
Notos
Rejestracja: 2008-09-23, 08:30 Posty: 149 Pomógł: 2
|
Fragment kodu dodawania kontrahenta:
Kod: basekh k
k.Open()
k.Clear()
k.SetKey("id")
k.SetKeySeg("id", 3100)
if !k.GetRec(EQ) then
k.SetField("id", 0)
k.SetField("typ", "0")
k.SetField("typi", 0)
k.SetField("subtypi", 0)
k.SetField("kod", khkod)
k.SetField("nazwa", nazwa)
k.SetField("kodpocz", kod)
k.SetField("miejscowosc", miasto)
k.SetField("ulica", ulica)
k.SetField("dom", dom)
k.SetField("lokal",lokal)
k.SetField("idkraju", 5801)
k.SetField("katalog", 2100)
k.SetField("rodzaj", 3100)
k.InsRec()
endif
k.Close()
Ostatnio zmieniony 2009-10-08, 08:58 przez Notos, łącznie zmieniany 1 raz
|
| 2009-10-08, 08:45 |
|
|
|
edward
Rejestracja: 2009-09-10, 09:52
Posty: 40
|
no wlasnie kurcze ja mam cos takiego:
Kod: SetField (kh, "id", 0)
SetField (kh, "poledod8", "pole 1" )
SetField (kh, "nip", "nip 1")
InsRec (kh)
baseError (kh, 4)
Takie cos wyrzuca mi błąd że rekord istnieje juz w bazie danych.
|
| 2009-10-08, 08:53 |
|
|
|
Notos
Rejestracja: 2008-09-23, 08:30 Posty: 149 Pomógł: 2
|
U góry cała procedura
|
| 2009-10-08, 08:59 |
|
|
|
edward
Rejestracja: 2009-09-10, 09:52
Posty: 40
|
hmm nie wiem co jest nie tak ale nie dodaje mi nic do bazy. Moze to wina wersji demo.
|
| 2009-10-08, 09:30 |
|
|
|
Notos
Rejestracja: 2008-09-23, 08:30 Posty: 149 Pomógł: 2
|
Uzupełniasz wszystkie pola ?
|
| 2009-10-08, 09:33 |
|
|
|
edward
Rejestracja: 2009-09-10, 09:52
Posty: 40
|
nie wszystkie. Jest taka koniecznosc? Probowalem tylko kilka oraz dokladnie to co wkleiles.
|
| 2009-10-08, 09:34 |
|
|
|
Notos
Rejestracja: 2008-09-23, 08:30 Posty: 149 Pomógł: 2
|
A wklejasz to jak leci, czy podstawiasz coś pod zmienne khkod, nazwa, itd. ?
|
| 2009-10-08, 09:39 |
|
|
|
edward
Rejestracja: 2009-09-10, 09:52
Posty: 40
|
wstawiam oczywiscie bo by sie nie wykonalo w ogole
PS. dzieki poki co za pomoc, bede przy komputerze pozniej i nadal serdecznie licze na pomoc:)
|
| 2009-10-08, 09:40 |
|
|
|
barnie
Ekspert
Rejestracja: 2008-04-07, 13:26 Posty: 208 Pomógł: 2
|
nie czekaj juz na pomoc bo ją uzyskałeś od notosa.
bardziej wyczerpującej odpowiedzi nie można dać.
|
| 2009-10-08, 11:46 |
|
|
|
rafal
Ekspert
Rejestracja: 2007-11-16, 15:08 Posty: 4000 Pomógł: 448
|
Notos pisze: Fragment kodu dodawania kontrahenta: Kod: basekh k
k.Open()
k.Clear()
k.SetKey("id")
k.SetKeySeg("id", 3100)
if !k.GetRec(EQ) then
k.SetField("id", 0)
[...] k.InsRec()
endif
k.Close() Nie uruchamiałem tego kodu ale dlaczego sprawdzasz czy istnieje kontrahent o id 3100?
Coś tu jest nie tak chyba.
|
| 2009-10-08, 11:55 |
|
|
|
edward
Rejestracja: 2009-09-10, 09:52
Posty: 40
|
Sorry za zamieszanie juz dziala poprawnie. Odpowiedz byla jak najbardziej pomocna
|
| 2009-10-09, 08:44 |
|
|
|
|
Strona 1 z 1
|
[ Posty: 12 ] |
|
Kto jest online |
Użytkownicy przeglądający to forum: Nie ma żadnego zarejestrowanego użytkownika i 18 gości |
|
Nie możesz tworzyć nowych tematów
Nie możesz odpowiadać w tematach
Nie możesz zmieniać swoich postów
Nie możesz usuwać swoich postów
Nie możesz dodawać załączników
|
|
|
|
