vb.net 2008 我想用代码复制一个文件到剪贴板。 用户然后在QQ对话框中右击粘贴就可直接发送。 代码怎么写

Posted 2023-04-19

我只需要 把文件复制到剪贴板中就行了。这个代码怎么写？

'My.Computer.Clipboard.SetAudio() 'My.Computer.Clipboard.SetData() 'My.Computer.Clipboard.SetDataObject() 'My.Computer.Clipboard.SetFileDropList() 'My.Computer.Clipboard.SetImage() 'My.Computer.Clipboard.SetText()

用那个？具体怎么写？不要搞错了，用户在QQ对话框中右击后粘贴的是文件本身，QQ直接就显示发送文件，而不是在QQ对话框中显示这个文件的路径。 也不是文件内容。应当象在桌面上复制文件一样。

Dim 数据库文件 As New System.IO.FileInfo(数据库位置)

My.Computer.Clipboard.SetData(数据库文件)

上面这样写是不对的。我不知到怎么写？

参考技术A

复制什么文件呢？

给你举个例子：复制音频文件

Public Class Form1  
'VB.Net复制读取音频文件并复制到剪贴板  
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click  
Try  
Dim MyData As Byte()  
MyMyData = My.Computer.FileSystem.ReadAllBytes("WindowsXP.wav")  
My.Computer.Clipboard.SetAudio(MyData)  
MessageBox.Show("已经成功将音频数据VB.Net复制到剪贴板！", "51cto提示", MessageBoxButtons.OK, MessageBoxIcon.Information)  
Catch ex As Exception  
MessageBox.Show("将音频数据复制到剪贴板出现错误，请检查音频文件是否已经存在？", "51cto提示", MessageBoxButtons.OK, MessageBoxIcon.Error)  
End Try  
End Sub  
'粘贴剪贴板音频数据并播放  
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click  
Try  
Dim MyData As Object  
MyMyData = My.Computer.Clipboard.GetData(DataFormats.WaveAudio)  
My.Computer.Audio.Play(MyData, AudioPlayMode.Background)  
Catch ex As Exception  
MessageBox.Show("剪贴板上不存在指定的音频数据！", "51cto提示", MessageBoxButtons.OK, MessageBoxIcon.Error)  
End Try  
End Sub  
'清空剪贴板上的音频数据  
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click  
My.Computer.Clipboard.Clear()  
End Sub  
End Class

 完善一下答案，现在所谓的复制粘贴文件操作，只是复制文件的地址，然后copy到指定地址，你要做的就是把文件的地址复制到剪贴板就好。所谓的剪切，也就是copy后多了一个delete功能。大同小异。

追问

我要复制的是一个ACCESS数据库，如何搞？
关键，粘贴已经不由我的程序控制了。是系统控制的。

我的程序仅负责复制到剪贴板就行了。 复制要象在WINDOWS里复制一样的效果。不是复制文件的路径，

VB.NET 2003 将 log4net.config 复制到 bin 文件夹

【中文标题】VB.NET 2003 将 log4net.config 复制到 bin 文件夹

【英文标题】：VB.NET 2003 copy log4net.config to bin folder

【发布时间】：2009-12-22 05:15:14

【问题描述】：

我正在使用 VS.NET 2003 和 VB.NET。我已将 log4net.config 文件与源代码放在同一文件夹中，并且我想将 log4net.config 文件自动复制到 bin 文件夹，就像将 app.config 文件复制到 bin 一样。有自动的方法吗？

【问题讨论】：

“我正在使用 VS.NET 2003 和 VB.NET。” - 非常抱歉。

【参考方案1】：

将其作为资源包含，并始终选择复制。

您可以这样做：

点击您的 vbproj 文件并选择“添加现有项目” 导航到配置文件并选择它 右键单击配置文件并确保它没有设置为“嵌入式资源”（您不希望它嵌入到您的 exe 或 dll 中） 确保其构建操作设置为“始终复制” 构建并检查您的构建目录，它应该在那里

我的 IDE 没有打开，所以步骤可能需要稍作调整。

【讨论】：

我在 VS.NET 2003 IDE 中没有看到这个选项。

构建操作只有 4 个选项，即无、编译、内容和嵌入式资源。我没有看到您建议的“始终复制”选项。

感谢您的时间 GrayWizardx。不幸的是，选择“内容”仍然不会将 Log4net.config 复制到 bin 文件夹中。

只是为了向任何阅读的人澄清：“始终复制”选项是 VS2005 中引入的一个单独的项目属性； VS2003中不存在。

【参考方案2】：

添加构建后事件 - http://geekswithblogs.net/dchestnutt/archive/2006/05/30/80113.aspx

类似：-

复制“$(ProjectDir)log4net.config”“$(ProjectDir)$(OutDir)”

应该这样做。

【讨论】：

很遗憾，VS2003 不支持构建事件，所以这不起作用。