Public Async Function Kick(ByVal user As IGuildUser, <Remainder> ByVal reason As String) As Task
Dim guild = Context.Guild
Dim bot = Context.Client
Dim message = Context.Message
Dim u = Context.User
'Channel Info
Dim _client As New DiscordSocketClient
Dim id As ULong = 1235234987 'Random numbers not a channel id
Dim chnl As IMessageChannel = _client.GetChannel(id)
If u.Id = "id" Or "id" Or "id" Then
Dim embed As New EmbedBuilder With {
.Author = New EmbedAuthorBuilder With {
.IconUrl = u.GetAvatarUrl,
.Name = u.Username
},
.Title = $"{user.Username}#{user.Discriminator}'s Kick Information",
.ImageUrl = "https://i.imgur.com/vc241Ku.jpeg",
.Description = reason,
.Color = New Color(masterClass.randomEmbedColor),
.ThumbnailUrl = user.GetAvatarUrl,
.Timestamp = Context.Message.Timestamp,
.Footer = New EmbedFooterBuilder With {
.Text = "Kick Data",
.IconUrl = guild.IconUrl
}
}
Await chnl.SendMessageAsync("", False, embed.Build())
Await user.SendMessageAsync("", False, embed.Build())
Await user.KickAsync(reason)
Else
Await Context.Channel.SendMessageAsync("You do not match the IDs that are required for this. Bye.")
End If
End Function
这是我的kick命令,我该如何使它将嵌入发送到特定的通道?我已经设置好了,所以它会向用户发送嵌入,但我希望它现在将嵌入发送到服务器中的某个通道。还有一个旁注。有人知道我可以在哪里在线托管机器人,而不是自我托管,或者在哪里托管它的好教程吗?
Public Async Function Kick(ByVal user As IGuildUser, <Remainder> ByVal reason As String) As Task
Dim guild = Context.Guild
Dim chnl = guild.GetTextChannel(123456789)
Dim embed As New EmbedBuilder With {
.Author = New EmbedAuthorBuilder With {
.IconUrl = user.GetAvatarUrl,
.Name = user.Username
},
.Title = $"{user.toString()}'s Kick Information",
.ImageUrl = "https://i.imgur.com/vc241Ku.jpeg",
.Description = reason,
.Color = New Color(masterClass.randomEmbedColor),
.ThumbnailUrl = user.GetAvatarUrl,
.Timestamp = Context.Message.Timestamp,
.Footer = New EmbedFooterBuilder With {
.Text = "Kick Data",
.IconUrl = guild.IconUrl
}
}
Await chnl.SendMessageAsync("", False, embed.Build())
Await user.SendMessageAsync("", False, embed.Build())
Await user.KickAsync(reason)
End Function