Riga 87: Dim StrConn As String = WebConfigurationManager.ConnectionStrings("dati_acquirenti").ConnectionString
Riga 88: Dim conn As New SqlConnection(StrConn)
Riga 89: Dim StrSql As String = "INSERT INTO STATISTICHE_VISITE(DATA, DATA_ORA, LINGUA_BROWSER, BROWSER_CLIENT, PROVENIENZA, IP_CLIENT, VISITE) VALUES('" & str_data & "', GETDATE(), '" & User_Lang(0) & "', '" & str_client & "','" & Str_Url_Provenienza & "', '" & Str_Indirizzo_Ip & "', 1)"
Riga 90: Dim comm As New SqlCommand(StrSql, conn)
Riga 91: conn.Open()
|