Új hozzászólás Aktív témák
-
Nah, akkor felvázolom a teljes feladatot:
Timert használok, de nem erre. Egy adatbázishoz nyúlok hozzá meghatározott időközönként és futtatok le egy lekérdezést. Erre kell nekem a timer. A timer_tick eseményen belül kell a formot popup ablakként felvillantanom. Viszont nem tudom, hogy timeren belül lehet-e még egy timert aktiválni, ráadásul szerintem 100% lenne a proci terheltség. -
Vb.net
De feltehetném úgy is a kérdést, hogy miként kell formot úgy mozgatni, hogy közben ne legyen 100%-on a proci és a form elemei is látszódjanak.Időzítővel?
Timer1_Timer()
If Form1.Top > 1500 Then ' 1500 magasig emelkedik
Form1.Top = Form1.Top - 120
End If
End
Lehet hogy hülyeséget mondok de én asszem igy csináltam.
-
Sziasztok!
Tudna valaki segíten egy cseppet? Azt szeretném megcsinálni, hogy egy form a képernyő jobb alsó sarkában popup szerűen jöjjön fel. Ezt részben sikerült is megoldanom, de valamiért a rajta lévő objektumok a mozgás közben nem látszanak, vagy teljesen feketék. Mit rontok el?
Dufresne: nézz át az Excel topickba, szerintem ott kapni fogsz segítséget.
[Szerkesztve] -
Nagyon szépen köszönöm!
Látom nagyon vágod a témát, úgyhogy kérdezek néhány butaságot.
1. Mi a különbség egy tárolt eljárás és egy lekérdezés között? Azon kívül, hogy az egyik a stored procedure, a másik a view nézetben jelenik meg. Melyiket használjam?
2. Adott egy tábla, ami tartalmazza a partnerek adatait. Itt rögzítem a telepules_kod mezőbe azt, hogy hol lakik. Értelemszerűen van egy Telepules táblám telepules_kod; telepules_nev mezőkkel.
Szeretnék csinálni egy ilyen panelt:![[kép]](http://gh0st.tvn.hu/panel.jpg "[kép]")
Korábban ez működött is, mivel egyszerűen a Partner táblában nem a telepules_kod-ot, hanem a telepules_nev-et rögzítettem, de ugye ez tárolós szempontjából nem a legjobb megoldás volt. Szóval: most van a partner táblám mondjuk a következő adatokkal:
1. Kiss Pista 0001
2. Horváth Dezső 0002
3. Orosz Béla 0001
4. Cserepes Virág 0003
És van a Telepules táblám:
0001 Kiskunhalas
0002 Budapest
0003 Kaposvár
0004 Debrecen
Azt elvileg meg tudom csinálni, hogy a képen látható Comboboxot feltöltsem a kódokkal a partner tábla alapján (ezért is volt korábban egyszerű, mert a kódok helyett a település nevek szerepeltek). De hogyan töltöm fel a telepules_nevekkel?
a.) Fel kellene töltenem az összes település nevével. (Erre az általad mutatott korábbi megoldást tudnám elképzelni. Tehát a Telepules tábla második oszlopának összes elemét hozzáadnám a Comboboxhoz és ezt használnám paraméternek)
b.) Úgy kellene megoldanom, hogy csak a már létező település nevek szerepljenek a listában, ne az összes (pl a Debrecen ne, mert nem tartozik senkihez) és ne szerepeljen semmi kétszer, vagy többször. -
Sikerült kiolvasnom az adatbázisból a lekérdezés fejléceit, de adatokat valamiért nem tudok.
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim Connection1 As New System.Data.SqlClient.SqlConnection(''Data Source=kisg\sqlexpress; Initial Catalog=Babel;Integrated Security=SSPI;'')
Dim Command1 As New System.Data.SqlClient.SqlCommand(''Select * from UKM'', Connection1)
Connection1.Open()
Dim Reader1 As System.Data.SqlClient.SqlDataReader = Command1.ExecuteReader()
Dim Table As DataTable = Reader1.GetSchemaTable()
Dim index As Integer
For index = 0 To Table.Rows.Count - 1
TextBox1.Text &= Reader1.GetName(index) & ControlChars.Tab
Next
Egészen eddig működik is, a TextBoxban megjelennek a tábla fejlécei
'For index = 0 To Table.Rows.Count - 1
'TextBox1.Text &= Reader1.GetString(index) & ControlChars.Tab
'Next
End Sub
Gondolom itt lehet valami hiba, mert úgy viselkedik, mintha nem lenne találat. Pedig fel van töltve adatokkal. Ezek szerint nem a GetStringgel kellene adatokat kinyernem a táblából?Megoldottam...
While (Reader1.Read())
TextBox1.Text &= Reader1(0)
End While
Jól elvagyok itt magamban. -
Újabb probléma:
Szeretnék login formot használni, de nem tudom hogyan kell.
Alapprobléma: kb. 40-50 usert kellene kiszolgálni, mindenkinek külön felhasználónév, jelszó, jogosultsági szint.
A következőt gondoltam: a userek adatait eltárolnám egy adatbázisban.
ID
Név
Jelszó
Jogosultság
Többi adat
A login formra felteszek egy TextBoxot (TextBox1), amibe beüti a felhasználónevét, valamint egy másik Password (TextBox2) boxot is. Emellett lerejtek két másik mezőt is, amikhez nincs hozzáférése és nem is látszanak (TextBox3, TexTBox4).
Amikor a felhasználó beüti a TextBox1-be a felhasználónevét, valamint a TextBox2-be a jelszavát és az OK gombra klikkel, akkor egy paraméterezett lekérdezést futtatnék, ahol a paraméter a felhasználónév lenne. Ha van találat az adatbázisban (vagyis van ilyen felhasználó), akkor ugye a TextBox3-ba beolvasom az adatbázisból a felhasználónevet, valamint a TextBox4-be az adatbázisban tárolt jelszót. Ezután már nincs más dolgom, mint összevetni a begépelt és a beolvasott jelszavakat.
Ezt így meg is csináltam és működik is. Valszeg biztonsági szempontból szart sem ér, de tökre örülök neki.
Két kérdés:
1. Lehet ezt valahogyan elegánsabban csinálni? Mondjuk a TextBox3 és TextBox 4 kiküszöbölésével? Gondoltam, hogy beolvasom egy változóba egyből az adatokat, de béna módon csak vezérlőkre és azok értékeire tudok hivatkozni. Szóval valahogyan direktbe el lehet érni az adatbázist (MS SQL szerver)?
2. Szükséges az adatok titkosítása? Jelenleg az adatbázisban nincsenek titkosítva a jelszavak, mert minek. Mondjuk nem is tudom, hogy ezt hogyan lehetne, egyáltalán ott célszerű őket tárolni? Úgy kellene megoldanom, hogy azért tudják változtatni, tehát érdemes lenne tárolni őket. -
![[HUN]Zolee](//cdn.rios.hu/dl/faces/c11.gif)
[HUN]Zolee
őstag
Probléma:
Adott egy combobox, aminek az alábbi elemei vannak:
elmúlt egy hét
elmúlt egy hónap
elmúlt negyedév
elmúlt félév
elmúlt év
Ezen kívül manuálisan is lehet beírni dátum értéket. Megoldható valahogyan az, hogy mondjuk dupla klikkre megjelenjen a naptár, amin ki lehetne választani az időpontot? Sokkal elegánsabb lenne, mint ez a manuális bevitel. -
[HUN]Zolee
őstag
Hi!
Tegnap még próbálkoztam, de nem mentem sokra az ablak megjelenítéssel. Működik, de valamiért feketéből kezd el megjelenni az ablak és nyeri el az eredeti színét.
A következőt csináltam:
Dim n As Integer
For n = 1 to 100
Me.Opacity = n/100
System.Threading.Thread.Sleep(5)
Next
Próbáltam megváltoztatni a lépésközt nagyobbra, de semmi eredmény.
Aztán próbaképp csináltam egy ilyet:
Dim n As Integer
For n = 1 to 100
Me.Opacity = n/100
MsgBox(n)
Next
Itt ugye mindig feldobta n értékét egy ablakban, de látszólag nem feketéről indult a megjelenés. Minden OK volt, csak az MsgBox-okra nem lett volna szükségem. Hol lehet a hiba?ha gondolod keress meg majd msn-en. ott gyorsabb.
-
[HUN]Zolee
őstag
Hi!
Tegnap még próbálkoztam, de nem mentem sokra az ablak megjelenítéssel. Működik, de valamiért feketéből kezd el megjelenni az ablak és nyeri el az eredeti színét.
A következőt csináltam:
Dim n As Integer
For n = 1 to 100
Me.Opacity = n/100
System.Threading.Thread.Sleep(5)
Next
Próbáltam megváltoztatni a lépésközt nagyobbra, de semmi eredmény.
Aztán próbaképp csináltam egy ilyet:
Dim n As Integer
For n = 1 to 100
Me.Opacity = n/100
MsgBox(n)
Next
Itt ugye mindig feldobta n értékét egy ablakban, de látszólag nem feketéről indult a megjelenés. Minden OK volt, csak az MsgBox-okra nem lett volna szükségem. Hol lehet a hiba? -
[HUN]Zolee
őstag
-
[HUN]Zolee
őstag
Ok, működik, köszi! Csak nem tudom arra használni, amire szerettem volna.
A login Formnál szeretném megcsinálni azt, hogy kb 2 mp alatt jelenjen meg. Gondoltam, hogy ha a form.opacity tulajdonságára írok egy for/next ciklust, akkor sima ügy lesz. Persze nem működik, de miért?
Dim n As Integer
For n = 1 to 100
Me.Opacity = n
System.Threading.Thread.Sleep()
Me.Refresh()
Next
Futási időben nem tudom az Opacity tulajdunságot változtatni? -
Ok, működik, köszi! Csak nem tudom arra használni, amire szerettem volna.
A login Formnál szeretném megcsinálni azt, hogy kb 2 mp alatt jelenjen meg. Gondoltam, hogy ha a form.opacity tulajdonságára írok egy for/next ciklust, akkor sima ügy lesz. Persze nem működik, de miért?
Dim n As Integer
For n = 1 to 100
Me.Opacity = n
System.Threading.Thread.Sleep()
Me.Refresh()
Next
Futási időben nem tudom az Opacity tulajdunságot változtatni? -
[HUN]Zolee
őstag
-
[HUN]Zolee
őstag
Valaki meg tudná mondani, hogy az Rnd() függvény miért mindig ugyanazt az értéket adja vissza?
Egy parancsgombhoz rendeltem hozzá az Rnd()*100+1 függvényt, ami mondjuk elsőre 75-öt ad eredményül. Ezután újra klikkelek és mondjuk 18-at kapok, majd a következőre 37-et.
Kilépés és újraindítás után ismét 78, 18, 37 lesz a sorrend. De miért??? -
Lenne egy problémám, amit szeretnék elegánsabban megoldani:
Adott a formon egy adatrács, amiben mondjuk a következő oszlopok vannak:
Azonosító, Név, Életkor
Szeretném megcsinálni azt, hogy ha mondjuk ráállok a harmadik rekodra és dupla klikket nyomok rajta, akkor előugrana egy másik form amin az adott azonosítóhoz tartozó többi adat lenne.
Sikerült megoldanom, de elég bénán. Jelenleg használok egy segéd TextBox-ot, aminek a Text tulajdonságához hozzárendeltem az adatrács aktuális kijelölésének azonosítóját. Magyarán ha ráállok valamelyik rekordra, akkor egy Textboxban az adatrács mellett megjelenik az azonosító és erre hiavtkozva egy paraméteres lekérdezéssel már meg tudom nyitni a kívánt formot.
Jó lenne, ha a Textboxot ki tudnám valahogyan kerülni, csak lövésen nincs, hogy az adatrács egy mezőjének értékére hogyan tudok kódból hivatkozni. Valamiért nem találok value tulajdonságot az adatrács mezőiben. Valakinek van ötlete? -
Sziasztok!
Egy gyors kérdés: épp nézegetem a Visual Basicet és nem tudom eldönteni, hogy adatbázis kezelésre mennyire lenne alkalmas. Eddig Accesst használtunk, de szeretném magát a felületet átteni VB-re. Úgy gondoltam, hogy az adatbázis szerkezetén nem változtatnék, hanem ahhoz kellene hozzáférnem VB-ből (az Accesshez hasonló űrlapos megoldásokkal). Az eddigi benyomásaim vegyesek. Egyrész viszonylag könnyű használni, de design szempontjából kevés lehetőségem van. Pedig itt most pont az lenne a lényeg, hogy egy teljesen letisztult profi külsőt kellene kölcsönözzek a programnak. Emellett persze minden olyan lehetőséget ki tudjak használni, ami accessben megvolt.
Esetleg tudnátok valami más programnyelvet ajánlani, ha ez nem jönne be?
![[HUN]Zolee](http://cdn.rios.hu/dl/faces/c11.gif)
Új hozzászólás Aktív témák
- Mac Pro 6,1 2013 Late
- GAMER PC! i7-14700 / RTX 5080 / 32GB DDR5 / 1TB NVMe / 1000w Gold / BeszámítOK !
- ASUS ROG Strix SCAR 16 / Ultra 9 275HX / RTX5090 / 32GB / 2TB NVMe! BeszámítOK
- 27% - Corsair RMx Series RM1000x 1000W 80 PLUS Gold (CP-9020271-EU) Tápegység!
- White AM4 félkonfig! ASUS ROG B550-A + Ryzen 9 5950X BOX + 32GB DDR4 3600Mhz CL17
- ÚJ MacBook Pro 16" M4 PRO 24GB 512GB Space Black
- Óriás! Gamer PC-Számítógép! Csere-Beszámítás! R7 5700 / RTX 3080 / 16GB DDR4 / 512GB SSD!
- ROLLEREK: ÚJ, Újszerű, Használt 30+ db listát tudok küldeni
- Samsung Galaxy S22 Ultra 256GB, Kártyafüggetlen, 1 Év Garanciával
- Segway KickScooter MAX G2 elektromos roller 32 km/h
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Cég: aiMotive Kft.
Város: Budapest