Arba vartotojas "root" ir slaptažodis, kurį pasirinkote konfiguruodami MySQL serverį, arba Jūsų sukurto vartotojo vardas ir slaptažodis.
O Jūs MySQL serverį iš viso instaliavot ir konfiguravot? (instrukcija pridėta ankstesniame post'e)
Nemokama apskaitos programa
Atsiprašau tų, kas jau spėjo atsisiųsti susiinstaliuoti. Programą tai atnaujinau, o štai setupą tai seną palikau. Dabar jau pakeičiau atsisiuntimo linką sename poste. Jei ką, atsisiuntimo linkas:
www.talpink.lt/files/149302
Tiems, kas jau susiinstaliavo pas save, perinstaliuoti nebūtina - su pačia programa viskas gerai, tiesiog jai pagalbinių failų pritrūko.
Trūkstamus du failus galite parsisiųsti linkais (vienas failas - vienas linkas):
www.talpink.lt/files/607871
ir
www.talpink.lt/files/833700
Abu failus nukopijuoti (arba tiesiai downloadinti) į programos folger'į. Dėl failo "SQL_kodas.sql" perklaus ar tikrai norite overwrite'inti - atsakyti taip.
www.talpink.lt/files/149302
Tiems, kas jau susiinstaliavo pas save, perinstaliuoti nebūtina - su pačia programa viskas gerai, tiesiog jai pagalbinių failų pritrūko.
Trūkstamus du failus galite parsisiųsti linkais (vienas failas - vienas linkas):
www.talpink.lt/files/607871
ir
www.talpink.lt/files/833700
Abu failus nukopijuoti (arba tiesiai downloadinti) į programos folger'į. Dėl failo "SQL_kodas.sql" perklaus ar tikrai norite overwrite'inti - atsakyti taip.
Ir dar:
1. Apie tai, kad šiuo metu programa neleidžia pakeisti riboto vartotojo teisių į adminą, žinau. Tik dar nesugalvojau, kaip tą padaryti techniškai neužteršiant duombazių. Beje, sukurti naują vartotoją su admino teisėmis yra leidžiama ir viskas veikia.
2. Apie nelabai estetišką formų, ataskaitų (printinimo) ir ikonų vaizdą irgi žinau. Dailininkas savanoris būtų sveikintinas reiškinys.
1. Apie tai, kad šiuo metu programa neleidžia pakeisti riboto vartotojo teisių į adminą, žinau. Tik dar nesugalvojau, kaip tą padaryti techniškai neužteršiant duombazių. Beje, sukurti naują vartotoją su admino teisėmis yra leidžiama ir viskas veikia.
2. Apie nelabai estetišką formų, ataskaitų (printinimo) ir ikonų vaizdą irgi žinau. Dailininkas savanoris būtų sveikintinas reiškinys.
Nu va israsiau programa ir ismete paleidima ant deskopo ir paspaudziau ir ismete [img]http://www.talpink.lt/images/images/60069klaida2.JPG[/img]
Pas mane mysql ir apachi idiegta.
Pas mane mysql ir apachi idiegta.
Neįsivaizduoju, kodėl taip gali būti. Bent jau login dialogą turėtų parodyti. Gali būti, kad susipjovė su kažkokiom instaliuotom programom.
Programos pradžios kodas labai paprastas, jame net teoriškai neturėtų būti nieko, kas laužtų programą:
Login.ShowDialog()
<...> (Login_load procedūra)
Dim Udata As New DataTable
Udata.Columns.Add()
Udata.Columns.Add()
Udata.Columns.Add()
Me.AcceptButton = OK_Button
Dim path As String = AppPath() & "\users.dat"
If File.Exists(path) = True Then
Dim readtext() As String = File.ReadAllLines(path)
Dim s As String
For Each s In readtext 'duombaziu faile ieskom pasirinktos
If s.Length > 0 Then
Udata.Rows.Add()
Udata.Rows(Udata.Rows.Count - 1).Item(0) = Get_Element(s, 1)
Udata.Rows(Udata.Rows.Count - 1).Item(1) = Get_Element(s, 2)
Udata.Rows(Udata.Rows.Count - 1).Item(2) = Get_Element(s, 3)
End If
Next
End If
Dim kiekis As Integer
Try
kiekis = Udata.Rows.Count
Catch ex As Exception
kiekis = 0
End Try
If kiekis > 0 Then
Dim Sarasas(kiekis - 1) As MTGCComboBoxItem
For i = 1 To kiekis
Sarasas(i - 1) = New MTGCComboBoxItem( _
Udata.Rows(i - 1).Item(0).ToString, _
Udata.Rows(i - 1).Item(1).ToString, _
Udata.Rows(i - 1).Item(2).ToString)
Next
Vartotojas.SelectedIndex = -1 'paruosiam dropa
Vartotojas.Items.Clear()
Vartotojas.LoadingType = MTGCComboBox.CaricamentoCombo.ComboBoxItem 'loadinam duomenis
Vartotojas.ColumnNum = 3
Vartotojas.ColumnWidth = "80; 80; 50"
Vartotojas.Items.AddRange(Sarasas)
Vartotojas.GridLineVertical = True
If Vartotojas.Items.Count > 0 Then Vartotojas.SelectedIndex = 0
End If
Udata.Dispose()
'pradzioje matomas vartotoju dropas, o naujo vardo textboxas ne
Vartotojas.Visible = True
Naujas_vardas.Visible = False
Serveris.Enabled = False
Portas.Enabled = False
Visoms.Checked = True
Programos pradžios kodas labai paprastas, jame net teoriškai neturėtų būti nieko, kas laužtų programą:
Login.ShowDialog()
<...> (Login_load procedūra)
Dim Udata As New DataTable
Udata.Columns.Add()
Udata.Columns.Add()
Udata.Columns.Add()
Me.AcceptButton = OK_Button
Dim path As String = AppPath() & "\users.dat"
If File.Exists(path) = True Then
Dim readtext() As String = File.ReadAllLines(path)
Dim s As String
For Each s In readtext 'duombaziu faile ieskom pasirinktos
If s.Length > 0 Then
Udata.Rows.Add()
Udata.Rows(Udata.Rows.Count - 1).Item(0) = Get_Element(s, 1)
Udata.Rows(Udata.Rows.Count - 1).Item(1) = Get_Element(s, 2)
Udata.Rows(Udata.Rows.Count - 1).Item(2) = Get_Element(s, 3)
End If
Next
End If
Dim kiekis As Integer
Try
kiekis = Udata.Rows.Count
Catch ex As Exception
kiekis = 0
End Try
If kiekis > 0 Then
Dim Sarasas(kiekis - 1) As MTGCComboBoxItem
For i = 1 To kiekis
Sarasas(i - 1) = New MTGCComboBoxItem( _
Udata.Rows(i - 1).Item(0).ToString, _
Udata.Rows(i - 1).Item(1).ToString, _
Udata.Rows(i - 1).Item(2).ToString)
Next
Vartotojas.SelectedIndex = -1 'paruosiam dropa
Vartotojas.Items.Clear()
Vartotojas.LoadingType = MTGCComboBox.CaricamentoCombo.ComboBoxItem 'loadinam duomenis
Vartotojas.ColumnNum = 3
Vartotojas.ColumnWidth = "80; 80; 50"
Vartotojas.Items.AddRange(Sarasas)
Vartotojas.GridLineVertical = True
If Vartotojas.Items.Count > 0 Then Vartotojas.SelectedIndex = 0
End If
Udata.Dispose()
'pradzioje matomas vartotoju dropas, o naujo vardo textboxas ne
Vartotojas.Visible = True
Naujas_vardas.Visible = False
Serveris.Enabled = False
Portas.Enabled = False
Visoms.Checked = True
Kaip matyti iš kodo, paleidimo stadijoje (kol useris nepaspaudžia mygtuko Ok) programa net nebando bendrauti su jokiu serveriu. Tiesiog bando iš failo užsikrauti programos userių nustatymus. Tik instaliavus useriu nustatymų žinoma nėra, taigi neradusi nustatymų failo programa tiesiog turėtų parodyti "tuščią" dialogą. Pas mane taip ir vyksta.
O negali suinstaliuotos programuos ideti. As SQL isdesiu per phpmyadmin jeigu gali tai dar ir ji parasyk ydek y talpink.lt nes man kaskas blogai :((
Duomenys/sąskaitų planas/ (mygtukas įvesti).
Tipinis planas (mano kūrybos sutrumpinta pavyzdinio versija) yra automatiškai generuojamas paspaudus mygtuką "Tipinis". Tačiau generavimas leidžiamas tik jei nėra sukurta nė vienos sąskaitos.
Jei sąskaitų planas kuriamas rankiniu būdu, prieš tai būtina sukurti pageidaujamą balanso ir pelno(nuostolio) ataskaitų struktūrą. (Ataskaitos/Fin. atskaitomybės struktūra) Jei reikia trumpų formų: spaudžiate Pakrauti/Iš failo... ir pasirenkate trump_bal.str arba trump_p(n).str formas įkrovus spaudžiate Išsaugoti/Įmonės P(N) arba Įmonės B. Galima kurti ir "rankiniu" būdu. Šiuo atveju pagrindiniai struktūros principai:
1. Kiekvienas aukštesnis lygmuo, sumuoja žemesnius.
2. Pilnai išskleidus "medį" laukelių išsidėstymas privalo atitikti balanso ataskaitos laukelių išsidėstymą, arba atvirkštinį pelno (nuostolio) ataskaitos laukelių išsidėstymą.
3. Pridėti "dukterinį" lygmenį galima paclickinus ant atitinkamo laukelio.
Tipinis planas (mano kūrybos sutrumpinta pavyzdinio versija) yra automatiškai generuojamas paspaudus mygtuką "Tipinis". Tačiau generavimas leidžiamas tik jei nėra sukurta nė vienos sąskaitos.
Jei sąskaitų planas kuriamas rankiniu būdu, prieš tai būtina sukurti pageidaujamą balanso ir pelno(nuostolio) ataskaitų struktūrą. (Ataskaitos/Fin. atskaitomybės struktūra) Jei reikia trumpų formų: spaudžiate Pakrauti/Iš failo... ir pasirenkate trump_bal.str arba trump_p(n).str formas įkrovus spaudžiate Išsaugoti/Įmonės P(N) arba Įmonės B. Galima kurti ir "rankiniu" būdu. Šiuo atveju pagrindiniai struktūros principai:
1. Kiekvienas aukštesnis lygmuo, sumuoja žemesnius.
2. Pilnai išskleidus "medį" laukelių išsidėstymas privalo atitikti balanso ataskaitos laukelių išsidėstymą, arba atvirkštinį pelno (nuostolio) ataskaitos laukelių išsidėstymą.
3. Pridėti "dukterinį" lygmenį galima paclickinus ant atitinkamo laukelio.
Ar dar kam nors programa nepasileidžia iš viso? (t.y. nerodo net login dialogo)
P.S. Atkreipkit dėmesį, kad programa iš principo negali pasileisti ant žemesnių kaip Windows 2000. Gali kilti suderinamumo bėdų su ne XP šeimos windowsais, bet neturiu galimybės testuoti programos ant šių sistemų. Visi kompai, prie kurių prieinu, sukasi su XP. Teoriškai programa gali strigti, jei su ja dirbama guest account'u, t.y. be pakankamo kiekio teisių. Programa privalo turėti teisę savo folgeryje daryti ką nori (t.y. kurti ir keisti failus).
P.P.S. Instaliacinis programos paketas paprasčiausiai sukuria Program files folgerį ir sukopijuoja ten visus reikalingus programos failus (exe, dll, dat ir pan.) + programos kodo failus (jie nebūtini programos veikimui ir skirti norintiems pasitobulinti programą ar prisitaikyti ją sau). Instaliacija neliečia nei registro, nei GAC'o. Jokie failai neinstaliuojami į sisteminius folgerius. Jo veikimas neturi nieko bendro su pačios programos veikimu.
P.S. Atkreipkit dėmesį, kad programa iš principo negali pasileisti ant žemesnių kaip Windows 2000. Gali kilti suderinamumo bėdų su ne XP šeimos windowsais, bet neturiu galimybės testuoti programos ant šių sistemų. Visi kompai, prie kurių prieinu, sukasi su XP. Teoriškai programa gali strigti, jei su ja dirbama guest account'u, t.y. be pakankamo kiekio teisių. Programa privalo turėti teisę savo folgeryje daryti ką nori (t.y. kurti ir keisti failus).
P.P.S. Instaliacinis programos paketas paprasčiausiai sukuria Program files folgerį ir sukopijuoja ten visus reikalingus programos failus (exe, dll, dat ir pan.) + programos kodo failus (jie nebūtini programos veikimui ir skirti norintiems pasitobulinti programą ar prisitaikyti ją sau). Instaliacija neliečia nei registro, nei GAC'o. Jokie failai neinstaliuojami į sisteminius folgerius. Jo veikimas neturi nieko bendro su pačios programos veikimu.
Diskusijos
-
Sąskaitų korespondencija
apie 10 valandų |
failai: 52 |
Mone8759 » 20888
-
PVM tarp ES valstybiu
apie 22 valandų |
failai: 39 |
gyvate » 5137
-
Atostoginiai
2 dienų |
failai: 0 |
Axis » 41
-
Buhalterinė programa "Centas"
2 dienų |
failai: 232 |
Leliukas » 23386
-
Apmokėjimas už šventines naktines darbo valandas. Kiek kartų reikia didinti darbo užmokestį ?
3 dienų |
failai: 6 |
Auriuke86 » 763
-
Aiškinamasis raštas
3 dienų |
failai: 7 |
jorja » 135
-
Kompensacija už nepanaudotas atostogas
3 dienų |
failai: 65 |
dassi » 4062
-
Ligos pašalpa iš darbdavio 2d
3 dienų |
failai: 6 |
Whagati » 2084
-
Skolų nurašymas/ beviltiškos skolos
4 dienų |
failai: 5 |
astuleee » 475
-
Barkodų skaitymas
4 dienų |
failai: 0 |
astuleee » 2
-
Darbo laikas
4 dienų |
failai: 19 |
regina70 » 2343
-
Programa "Būtent"
5 dienų |
failai: 13 |
gyvate » 2029
-
Rivilė
5 dienų |
failai: 315 |
digin » 15546
-
Ryanair lėktuvo bilietų įtraukimas į sąnaudas
6 dienų |
failai: 0 |
nebuhalteris » 2
-
Pvm sąskaita-faktūra
6 dienų |
failai: 45 |
allana » 6387
-
Vyr. buhalterio pavadavimas
7 dienų |
failai: 0 |
astuleee » 247
-
IV suteiktos paslaugos, neišrašytos sąskaitos, mokesčių deklaracijos pildymas
7 dienų |
failai: 0 |
Gita1 » 6
-
Ilgalaikio turto remontas
7 dienų |
failai: 3 |
astuleee » 284
-
Asociacijos
7 dienų |
failai: 50 |
judaskinas » 3590
-
Mažoji bendrija
9 dienų |
failai: 53 |
virbuh » 7571
-
Atsiskaitymas grynais pinigais iki 5000EUR (nuo lapkričio 1d.)
9 dienų |
failai: 0 |
virbuh » 5
-
Atvykimo išmoka / Išmoka pritraukus darbuotoją UĮ 48 (1) / 48 (2) str
11 dienų |
failai: 0 |
wolf » 2
-
Atsakymai "ant lėkštutės"
11 dienų |
failai: 77 |
allana » 9120
-
60 VDU, Sodra (S50) ir pereinamųjų mėnesių problemos
11 dienų |
failai: 0 |
wolf » 4
-
Atvirkštinis PVM
11 dienų |
failai: 0 |
agni752 » 1
- Tax.lt forumo taisyklės
- Paieška forume
Kas prisijungęs?
Tu esi neprisijungęs vartotojas
Prisijungti arba registruotis
Atmintinė
Atmintinė buhalteriui
Delspinigiai už ne laiku sumokėtus mokesčius ir baudas 2022 m. IV ketv. | 0.03 % |
Palūkanos už naudojimąsi mokestine paskola 2022 m. IV ketv. | 0,00013699 % |
Valstybinio socialinio draudimo bazinė pensija nuo 2022-06-01 |
225,84 € |
Minimalus valandinis atlygis ir minimali mėnesinė alga (MMA) nuo 2023-01-01 |
5.14 € / 840 € |
Įmonių finansinių ataskaitų duomenys
Balansai, Pelno (nuostolių) ataskaitos, Sodra
Įmonė |
---|
Pelėdos, VšĮ
,
302674787
Kretingos r. sav. Darbėnų mstl. Lakštingalų g. 13
1,85 tūkst. €
|
Selnora, UAB
,
303231047
Vilniaus m. sav. Vilniaus m. Architektų g. 56-101
|
HOPTRANS1, UAB
,
304957392
, PVM k. LT100014291218
Kauno r. sav. Ramučių k. Silvestro Žukausko g. 13
53,2 tūkst. € / 10 tūkst. €
|
DVYNIŲ SAPNAS, UAB
,
125750021
Vilniaus m. sav. Vilniaus m. Svajonių g. 24-23
|
Indesco, UAB
,
302890144
Vilniaus m. sav. Vilniaus m. Taikos g. 181-6
2 tūkst. € / -1,18 tūkst. €
|
Netsoftas, MB
,
304743933
Ežero g. 25, Karvio k., Maišiagalos sen., Vilniaus r. sav. 14244
3,32 tūkst. € / -1,15 tūkst. €
|
JUVELYRIKA GG, UAB
,
301577787
Druskininkų sav. Druskininkų m. Šv. Jokūbo g. 4-6
8,47 tūkst. € / -11,5 tūkst. €
|
LENTAINIŲ BENDRUOMENĖ
,
302492628
Lentainių g. 1, Kauno m., Kauno m. sav. 47492
|
TK mediena, UAB
,
305887662
Vilnius V. Nagevičiaus g. 3
|
Just Consulting, MB
,
305931678
Vilnius A. Šabaniausko g. 12-27
6 tūkst. € / 5,93 tūkst. €
|
Divetis, UAB
,
134208475
, PVM k. LT342084716
Kauno m. sav. Kauno m. S. Dariaus ir S. Girėno g. 22-4
74,9 tūkst. € / -11,6 tūkst. €
|
Citronella, UAB
,
305622607
, PVM k. LT100015667317
Rokiškio r. sav. Jūžintų sen. Pilkėnų k. 12
|
Skaičiuokime, MB
,
305471660
Lauryno Ivinskio g. 2, Vingininkų k., Šilalės kaimiškoji sen., Šilalės r. sav. 75113
16,9 tūkst. € / 15 tūkst. €
|
Bresneta, UAB
,
304207412
, PVM k. LT100010505010
Vilniaus m. sav. Vilniaus m. Architektų g. 56-101
126 tūkst. € / 2,71 tūkst. €
|
Sporto era, VšĮ
,
304749637
Kauno m. sav. Kauno m. Įkalnės aklg. 10-20
|