- Luck Dragon: Asszociációs játék. :)
- sziku69: Fűzzük össze a szavakat :)
- koxx: Bloons TD5 - Tower Defense játék
- sziku69: Szólánc.
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- btz: Internet fejlesztés országosan!
- GoodSpeed: AMD Ryzen 7 7700X vs AMD Ryzen 9 9900X Cinebench R23 & R24 Benchmarkokban mérve
- bambano: Bambanő háza tája
- ubyegon2: Airfryer XL XXL forrólevegős sütő gyakorlati tanácsok, ötletek, receptek
- Krisztianby: Íróasztal STAUNING 80x160 jobb mint gondoltam.
-
LOGOUT
Új hozzászólás Aktív témák
-
Hali mindenkinek!
VB.NET-ben írogatok néha és szeretnék SQL-el dolgozni benne. Lenne egy megbízólevél amit megadott adatok alapján kellene kitöltenie a proginak. Tudom egyszerűbb lenne egy körlevélkészítő de szeretném én magam megcsináni.
Jelenleg egy neten talált kód alapján írtam egy nagyon egyszerű login ellenörzőt ami csak arra kell hogy a felhasználó név alapján töltsön ki egy űrlapot. Nem is igazi login de célnak megfelel.
Public con As New SqlClient.SqlConnection
Public strCon As String = "Data Source=" & sqlszerverneve & ";Initial Catalog=" & adatbazisnev & ";User ID=sa;Password=" & sqlsajelszo & ";Connection Timeout=50;"
Public Sub loginellenorzes()
sql = "select count(*) from felhasznalok where felhasznalonev=@felhasznalonev and jelszo=@jelszo"
Using Conn As New SqlConnection(strCon)
Using cmd As New SqlCommand(sql, Conn)
Conn.Open()
cmd.Parameters.AddWithValue("@felhasznalonev", felhasznalonev)
cmd.Parameters.AddWithValue("@jelszo", jelszo)
Dim value = cmd.ExecuteScalar()
If value > 0 Then
Foablak.Show()
Loginablak.Hide()
Else
MessageBox.Show("Hibás fehasználónév/jelszó")
End If
Conn.Close()
End Using
End Using
End SubEddig ez okés is, tökéletesen működik.
Viszont kellene egy sub visszatérő értékkel ami azt csinálja hogy megadott sql parancsokat végrehajt majd visszadja az eredményt string-be vagy tömbbe hogy azt használhassam a progiba.
Szóval mi a bevállt dolog sql lekérdezésekre? Gondolom nem kell minden egyes parancs előtt connectelni?
Új hozzászólás Aktív témák
Hirdetés
● olvasd el a téma összefoglalót!
- Samsung Galaxy S24 Ultra - ha működik, ne változtass!
- A fociról könnyedén, egy baráti társaságban
- Konteó topic
- Mibe tegyem a megtakarításaimat?
- Parfüm topik
- Drón topik
- Kertészet, mezőgazdaság topik
- Android játékok topikja
- iPhone topik
- Milyen asztali (teljes vagy fél-) gépet vegyek?
- További aktív témák...
- HP Elitebook 840 G8, I7-1185G7, 32 GB RAM, 512 SSD (MAGYAR VILÁGÍTÓ BILLENTYŰZET)
- DELL Precision Dual USB-C Thunderbolt Dock - TB18DC
- HP 840 G3 Laptop 14" FHD/i5-6Gen/DDR4 8Gb/256GB SSD M2/Bluetooth/CAM 6hó Gari
- HP 840 G3 Laptop 14" HD/i5-6Gen/DDR4 16Gb/256GB SSD M2/Bluetooth/CAM 6hó Gari
- Dell 7390 Slim Laptop 13,3" FHD/i5-8Gen/DDR4 8Gb/256GB SSD M2/HDMI/BT/USB-C/CAM 6hó Gari
- HIBÁTLAN iPhone 13 mini 128GB Pink -1 ÉV GARANCIA - Kártyafüggetlen, MS3087
- Eladó szép állapotban levő Lenovo Tab M8HD 3/32GB / 12 hó jótállással / gyári tartozékokkal
- BESZÁMÍTÁS! ASRock X570 R9 5900X 32GB DDR4 1TB SSD RX 7800 XT 16GB Fractal Design Meshify 2 850W
- Dell G15 5520 Gamer FHD IPS 120Hz i7-12700H 14mag 16GB 512GB Nvidia RTX 3060 6GB 140W Win11 Garancia
- BESZÁMÍTÁS! Gigabyte B85M-D3H B85 chipset alaplap garanciával hibátlan működéssel
Állásajánlatok
Cég: FOTC
Város: Budapest