Trasformazione query da Sql a Form VB2008

lunedì 29 settembre 2008 - 12.47

Elenco Threads

Stanze Forum

Aggiungi ai Preferiti

Cerca nel forum

jtpsala Profilo | Senior Member

206 messaggi | Data Invio: lun 29 set 2008 - 12:47

Un saluto a tutti gli utenti di questo Forum.
Volevo chiedere come poter trasformare questa query creata in Sql:

INSERT INTO "TrasmissioneSitoWeb" ("RifeImmobile", "SitoWeb")
SELECT "RifeImmobile", "SitoWeb"
FROM "Immobile"
WHERE "SitoWeb" LIKE 'Si' and "Status" LIKE 'Gestito'

per poter essere eseguita direttamente da un form vb2008, in quanto ho problemi con le virgolette e gli apici.

Ringrazio tutti in anticipo.

SSUPERPIPPO Profilo | Guru

1.095 messaggi | Data Invio: lun 29 set 2008 - 13:48

>Un saluto a tutti gli utenti di questo Forum.

Ciao

>Volevo chiedere come poter trasformare questa query creata in
>Sql:
>
>INSERT INTO "TrasmissioneSitoWeb" ("RifeImmobile", "SitoWeb")
>SELECT "RifeImmobile", "SitoWeb"
>FROM "Immobile"
>WHERE "SitoWeb" LIKE 'Si' and "Status" LIKE 'Gestito'
>
>per poter essere eseguita direttamente da un form vb2008, in
>quanto ho problemi con le virgolette e gli apici.
>

Nome tabella e nomi campi non vanno inclusi tra le virgolette quindi l'istruzione sarà:

INSERT INTO TrasmissioneSitoWeb (RifeImmobile, SitoWeb)
SELECT RifeImmobile, SitoWeb
FROM Immobile
WHERE SitoWeb LIKE '*Si*' and Status LIKE '*Gestito*'

>Ringrazio tutti in anticipo.

Ciao

Ale

http://blogs.dotnethell.it/alebadalin

jtpsala Profilo | Senior Member

206 messaggi | Data Invio: lun 29 set 2008 - 14:22

Grazie per avermi risposto.
Ho eseguito in questo modo:
Dim Nome_db As String = "DATABASE"
Dim Query As String
Query = "INSERT INTO TrasmissioneSitoWeb (RifeImmobile, SitoWeb) SELECT RifeImmobile, SitoWeb FROM Immobile WHERE SitoWeb LIKE '*Si*' and Status LIKE '*Gestito*'"
Using db As New SqlConnection(Global.House_2008.My.MySettings.Default.DatabaseConnectionString)
Dim comando As New SqlCommand(Query, db)
db.Open()
comando.ExecuteNonQuery()
db.Close()
End Using

ma nella tabella TrasmissioneSito Web non è stato inserito alcun dato.

SSUPERPIPPO Profilo | Guru

1.095 messaggi | Data Invio: lun 29 set 2008 - 16:45

>Grazie per avermi risposto.
>Ho eseguito in questo modo:
> Dim Nome_db As String = "DATABASE"
> Dim Query As String
>Query = "INSERT INTO TrasmissioneSitoWeb (RifeImmobile, SitoWeb)
>SELECT RifeImmobile, SitoWeb FROM Immobile WHERE SitoWeb LIKE
>'*Si*' and Status LIKE '*Gestito*'"
>Using db As New SqlConnection(Global.House_2008.My.MySettings.Default.DatabaseConnectionString)
> Dim comando As New SqlCommand(Query, db)
> db.Open()
> comando.ExecuteNonQuery()
> db.Close()
> End Using
>
>ma nella tabella TrasmissioneSito Web non è stato inserito alcun
>dato.

Se non ti viene restituita alcuna eccezione significa che la sintassi è corretta, probabilmente il problema stà nel filtro.
Ti consiglio di eseguire la sola SELECT per vedere se ti vengono restituiti i dati richiesti, in caso contrario verifica che la Where sia corretta...

Ciao

Ale

http://blogs.dotnethell.it/alebadalin

jtpsala Profilo | Senior Member

206 messaggi | Data Invio: mar 30 set 2008 - 00:15

per risolvere quel problema ho adottato questo metodo come da mia risposta al seguente link:

http://www.dotnethell.it/forum/messages.aspx?ThreadID=25537

Magari non era la soluzione migliore, però funziona e fa ciò che volevo.

Ringrazio immensamente gli intervenuti.

Ciao...
Giuseppe

Torna su

Stanze Forum

Elenco Threads

Partecipa anche tu! Registrati!

Hai bisogno di aiuto ?
Perchè non ti registri subito?

Dopo esserti registrato potrai chiedere
aiuto sul nostro Forum oppure aiutare gli altri

Consulta le Stanze disponibili.

Registrati ora !