This commit is contained in:
Andy
2022-02-01 07:02:26 +03:00
parent 301f2a6b03
commit b17e6ac40a

View File

@@ -349,7 +349,7 @@ BlockNullPicture:
Friend ReadOnly Property LVIKey As String Implements IUserData.LVIKey Friend ReadOnly Property LVIKey As String Implements IUserData.LVIKey
Get Get
If Not _IsCollection Then If Not _IsCollection Then
Return $"{Site.ToString.ToUpper.Substring(0, 1)}_{Name}" Return $"{Site.ToString.ToUpper}_{Name}"
Else Else
Return $"CCCC_{CollectionName}" Return $"CCCC_{CollectionName}"
End If End If
@@ -603,6 +603,7 @@ BlockNullPicture:
Case Sites.Reddit : URL = $"https://www.reddit.com/{IIf(IsChannel, "r", "user")}/{Name}/" Case Sites.Reddit : URL = $"https://www.reddit.com/{IIf(IsChannel, "r", "user")}/{Name}/"
Case Sites.Twitter : URL = $"https://twitter.com/{Name}" Case Sites.Twitter : URL = $"https://twitter.com/{Name}"
Case Sites.Instagram : URL = $"https://www.instagram.com/{Name}/" Case Sites.Instagram : URL = $"https://www.instagram.com/{Name}/"
Case Sites.RedGifs : URL = $"https://www.redgifs.com/users/{Name}/"
Case Else : MsgBoxE($"Site [{Site}] opening not implemented", MsgBoxStyle.Exclamation) Case Else : MsgBoxE($"Site [{Site}] opening not implemented", MsgBoxStyle.Exclamation)
End Select End Select
If Not URL.IsEmptyString Then Process.Start(URL) If Not URL.IsEmptyString Then Process.Start(URL)