Legfrissebb anyagok
IT café témák
PROHARDVER! témák
Mobilarena témák
Aktív témák
-
lapa
veterán
no én meg a vaktyúk:
Sub getdate()
Dim cn As ADODB.Connection
Dim sql As String
Dim rs As ADODB.Recordset
Set cn = New ADODB.Connection
cn.Open ''DSN=dsn;UID=juzer;PWD=pass''
Set rs = New Recordset
sql = ''SELECT mezo FROM tabla WHERE pk = 'PK'''
rs.Open sql, cn
If rs.EOF = False Then
MsgBox rs(0)
Else
MsgBox ''nemvan ilyen pk''
End If
cn.Close
Set cn = Nothing
End Sub
ja, be kell pippantani hozzá a vba tools --> references --> ms activex data objects 2.5-öt.
[Szerkesztve]
Aktív témák
Aktív témák
- ESET NOD32 Antivirus / Smart Security
- Gaming notebook topik
- AMD K6-III, és minden ami RETRO - Oldschool tuning
- Opera böngésző
- Már 40 milliárd dollárt érhet a Revolut
- Vírusirtó topic
- Debrecen és környéke adok-veszek-beszélgetek
- Diablo IV
- Kiszivárogtak az Intel 800-as lapkakészletének részletei
- AMD Ryzen 9 / 7 / 5 / 3 5***(X) "Zen 3" (AM4)
- További aktív témák...
Új prémium hirdetések
- HP OMEN Gaming 16-xf00004nl - ÚJ 16" QHD laptop - Ryzen 9-7940HS, 32GB, 2TB SSD, RTX4070 (8GB)
- Microsoft surface slim pen 2
- Realme Realfit F3 ANC aktív zajszűrésű Bluetooth 5.3
- ÚJ ASUS VIVOBOOK GO 15 E1504 - 15,6"FHD IPS - i3-N305 - 8GB - 512GB - Win11 - 2+ év garancia -Magyar
- IPhone 14 128GB gyári független új 90 nap Apple garancia
Állásajánlatok
Cég: Ozeki Kft.
Város: Debrecen