行 24: My.EasyFunction.AppMSSQL.Execute_SQL("INSERT INTO [AdvertisementCounter] ([AdvertisementID],[來源網址],[IP]) Values (@AdvertisementID,@來源網址,@IP)", Parameters)
行 25:
行 26: context.Response.Redirect(DataSet.Tables(0).Rows(0).Item("連結網址"))
行 27:
行 28: End Sub
|