Torna indietro   Hardware Upgrade Forum > Software > Programmazione

Ecovacs Deebot X12 OmniCyclone: lava grazie a FocusJet
Ecovacs Deebot X12 OmniCyclone: lava grazie a FocusJet
Il nuovo Deebot X12 OmniCyclone abbina un sistema di raccolta dello sporco senza sacchetto, un rullo di lavaggio esteso e la tecnologia FocusJet per intervenire più efficacemente sulle macchie più persistenti. Un robot completo e preciso che aiuta a tenere puliti i pavimenti di casa con il minimo sforzo
Narwal Flow 2: la pulizia di casa con un mocio a nastro
Narwal Flow 2: la pulizia di casa con un mocio a nastro
Narwal Flow 2 implementa un mocio a nastro che esegue una pulizia dettagliata del pavimento di casa, in abbinamento ad un potente motore di aspirazione della polvere: un prodotto ideale per gestire in autonomia e con grande efficacia le necessità di pulizia dei pavimenti di casa
Tastiera gaming MSI GK600 TKL: switch hot-swap, display LCD e tre modalità wireless
Tastiera gaming MSI GK600 TKL: switch hot-swap, display LCD e tre modalità wireless
MSI FORGE GK600 TKL WIRELESS: switch lineari hot-swap, tripla connettività, display LCD e 5 strati di fonoassorbimento. Ottima in gaming, a 79,99 euro
Tutti gli articoli Tutte le news

Vai al Forum
Rispondi
 
Strumenti
Old 29-05-2006, 14:35   #1
mangzeus
Senior Member
 
L'Avatar di mangzeus
 
Iscritto dal: Sep 2003
Messaggi: 1025
[vb.net] COncatenare due campi in una stringa select

HO bisogno, in base alla selezione di alcune checkbox, di inserire determinati campi in una stringa "select" per interrogare un database.

ho costruito questo ciclo per portarmi i campi selezionati dalle checkbox in una listview, solo che poi non riesco a riportarli di seguito alla stringa per poter avere la select con i campi selezionati...il codice è questo...

Dim lview As New ListView
Dim campo As String
Dim campi As Integer
Dim i As Integer
Dim sql As String


If cboxcellulare.Checked = True Then
campo = "Cellulare"
lview.Items.Add(campo)
End If
If cboxCitta.Checked = True Then
campo = "Citta"
lview.Items.Add(campo)
End If
If cboxFrequenza.Checked = True Then
campo = "Frequenza"
lview.Items.Add(campo)
End If
If cboxIndirizzo.Checked = True Then
campo = "Indirizzo"
lview.Items.Add(campo)
End If
If cboxIscrizione.Checked = True Then
campo = "Iscrizione"
lview.Items.Add(campo)
End If
If cboxLavoratore.Checked = True Then
campo = "Lavoratore"
lview.Items.Add(campo)
End If
If cboxMaternita.Checked = True Then
campo = "Maternita"
lview.Items.Add(campo)
End If
If cboxNascita.Checked = True Then
campo = "Nascita"
lview.Items.Add(campo)
End If
If cboxPaternita.Checked = True Then
campo = "Paternita"
lview.Items.Add(campo)
End If
If cboxProvincia.Checked = True Then
campo = "Provincia"
lview.Items.Add(campo)
End If




campi = lview.Items.Count

'MI SONO BLOCCATO QUA


For i = 0 To campi - 1

sql = "SELECT " & lview.Items(i).ToString & " FROM Registro"

Next i


adesso vorrei fosse possibile avere la stringa sql completa dei campi selezionati...

esempio...io seleziono cellulare provincia e paternità.

come ho fatto li porto all'intenro della list view...poi attraverso un ciclo come posso avere la lista dei campi nella stringa?????...cioè io devo ottenere questo:

select cellulare, provincia, paternità from ecc...

Ultima modifica di mangzeus : 29-05-2006 alle 14:51.
mangzeus è offline   Rispondi citando il messaggio o parte di esso
Old 29-05-2006, 15:29   #2
DvL^Nemo
Senior Member
 
L'Avatar di DvL^Nemo
 
Iscritto dal: Nov 2001
Città: 100 metri dal mare
Messaggi: 4856
Quote:
sql = "SELECT "

For i = 0 To campi - 1

IF i=campi-1 Then
sql = sql & lview.Items(i).ToString
ELSE
sql = sql & lview.Items(i).ToString & ", "
END IF

Next i

sql= sql & " FROM Registro"
Di VB sono rimasto alla versione 5, ma x queste cose credo non sia cambiato nulla..
Ciao

Ultima modifica di DvL^Nemo : 29-05-2006 alle 15:32.
DvL^Nemo è offline   Rispondi citando il messaggio o parte di esso
Old 29-05-2006, 15:34   #3
mangzeus
Senior Member
 
L'Avatar di mangzeus
 
Iscritto dal: Sep 2003
Messaggi: 1025
Quote:
Originariamente inviato da DvL^Nemo
Di VB sono rimasto alla versione 5, ma x queste cose credo non sia cambiato nulla..
Ciao

grazie avevo risolto in un modo diverso ma questo mi permette di inserire anche il SELECT...


grazie...
mangzeus è offline   Rispondi citando il messaggio o parte di esso
 Rispondi


Ecovacs Deebot X12 OmniCyclone: lava grazie a FocusJet Ecovacs Deebot X12 OmniCyclone: lava grazie a Fo...
Narwal Flow 2: la pulizia di casa con un mocio a nastro Narwal Flow 2: la pulizia di casa con un mocio a...
Tastiera gaming MSI GK600 TKL: switch hot-swap, display LCD e tre modalità wireless Tastiera gaming MSI GK600 TKL: switch hot-swap, ...
DJI Osmo Pocket 4: la gimbal camera tascabile cresce e ha nuovi controlli fisici DJI Osmo Pocket 4: la gimbal camera tascabile cr...
Sony INZONE H6 Air: il primo headset open-back di Sony per giocatori Sony INZONE H6 Air: il primo headset open-back d...
Corsair Platform: scrivanie gaming modul...
Assassin's Creed Black Flag Resynced: Ub...
La crisi delle memorie colpisce anche Ap...
NVIDIA accelera il Path Tracing: nuovo a...
Le migliori cuffie gaming wireless del 2...
Anche HONOR avrà il suo Pro Max: ...
Sta arrivando WhatsApp Plus: cosa includ...
Una GeForce RTX 5070 a un prezzo super c...
Nothing Phone (3) 16+512GB crolla a 662,...
Gigabyte risolve il problema dei connett...
Falsa partenza per l'app della verifica ...
PRAGMATA è un successo: raggiunto...
Privacy, il Garante multa Poste Italiane...
Aramco ribalta il concetto di 'ibrido'. ...
Apple cambia tutto: Tim Cook lascia il t...
Chromium
GPU-Z
OCCT
LibreOffice Portable
Opera One Portable
Opera One 106
CCleaner Portable
CCleaner Standard
Cpu-Z
Driver NVIDIA GeForce 546.65 WHQL
SmartFTP
Trillian
Google Chrome Portable
Google Chrome 120
VirtualBox
Tutti gli articoli Tutte le news Tutti i download

Strumenti

Regole
Non Puoi aprire nuove discussioni
Non Puoi rispondere ai messaggi
Non Puoi allegare file
Non Puoi modificare i tuoi messaggi

Il codice vB è On
Le Faccine sono On
Il codice [IMG] è On
Il codice HTML è Off
Vai al Forum


Tutti gli orari sono GMT +1. Ora sono le: 09:20.


Powered by vBulletin® Version 3.6.4
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Served by www3v