Connessione tramite web service

mercoledì 21 giugno 2006 - 00.49

Elenco Threads

Stanze Forum

Aggiungi ai Preferiti

Cerca nel forum

kiwi Profilo | Newbie

45 messaggi | Data Invio: mer 21 giu 2006 - 00:49

Tipo così?

Public Class RicercaDaStringa
<WebMethod()> _
Public Shared Function CercaCod(ByVal codice As String) As DataSet
Dim MystrSelect As String
Dim Myconn As SqlConnection
Dim MyDataAdapter As SqlDataAdapter
Dim MyDataSet As DataSet
MystrSelect = "Select cod_i, comune, provincia, cap From Comuni WHERE Comuni.cod_i= " & codice
Myconn = New SqlConnection("Stringa di connessione")
MyDataAdapter = New SqlDataAdapter(MystrSelect, Myconn)
MyDataAdapter.SelectCommand.Parameters.Add("cod_i")
MyDataSet = New DataSet
MyDataAdapter.Fill(MyDataSet, "Comuni")
Return MyDataSet
End Function

End Class

kiwi Profilo | Newbie

45 messaggi | Data Invio: mer 21 giu 2006 - 13:01

così che dici va bene?

kiwi Profilo | Newbie

45 messaggi | Data Invio: mer 21 giu 2006 - 13:47

DimenticatA.... no, no scusa l'ho messo sopra modificando il post precedente... scus...

Tipo così?

Public Class RicercaDaStringa
<WebMethod()> _
Public Shared Function CercaCod(ByVal codice As String) As DataSet
Dim MystrSelect As String
Dim Myconn As SqlConnection
Dim MyDataAdapter As SqlDataAdapter
Dim MyDataSet As DataSet
MystrSelect = "Select cod_i, comune, provincia, cap From Comuni WHERE Comuni.cod_i= " & codice
Myconn = New SqlConnection("Stringa di connessione")
MyDataAdapter = New SqlDataAdapter(MystrSelect, Myconn)
MyDataAdapter.SelectCommand.Parameters.Add("cod_i")
MyDataSet = New DataSet
MyDataAdapter.Fill(MyDataSet, "Comuni")
Return MyDataSet
End Function

End Class

kiwi Profilo | Newbie

45 messaggi | Data Invio: mer 21 giu 2006 - 14:14

oops! grazie grazie

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 !