Récupérer l'URL d'une page dans une variable
Bonjour,
Alors voila, je travail avec ASP.NET / VB.NET, et je souhaite récupérer l'adresse URL d'une page dans une variable en VB.NET.
Je vous montre mon code, et donc j'aimerai récupéré automatiquement l'Url de la page que je visite dans la variable "AdressePage"
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
| Dim AdressePage As String = "http://www.monDomaine.fr/Accueil.aspx"
Try
'Ouverture de la connexion'
access_connexion()
'Instancier un objet Command'
Obj_Command = New OleDbCommand()
'Initialiser l objet Command'
Obj_Command.Connection() = laConnection
Obj_Command.CommandText = "SELECT ID FROM VISITE WHERE ID=@adresse"
Obj_Command.Parameters.Add("@adresse", OleDbType.VarChar, 100).Value = AdressePage
Obj_Reader = Obj_Command.ExecuteReader()
If Obj_Reader.Read() Then
Obj_Reader.Close()
Obj_Command.CommandText = "UPDATE VISITE SET NBR_V = NBR_V + 1 WHERE ID=@adresse"
Obj_Command.ExecuteNonQuery()
Else
Obj_Reader.Close()
Obj_Command.CommandText = "INSERT INTO VISITE (ID, NBR_V) VALUES (@adresse, 1)"
Obj_Command.ExecuteNonQuery()
End If
access_deconnexion()
Catch ex As Exception
MsgBox(ex.Message)
End Try |
Merci :D
