ASP.NET中应用VB6编写的Activex控件

简介:
打开microsoft visual basic开发环境,新建一个Activex控件
设计界面如下,这是直接运行这个控件的结果。接下来我们看看如何
一个驱动器控件,一个文件夹控件,一个文件显示控件
代码如下:
Sub Command1_Click()  Sub Command1_Click() 
CommonDialog1.ShowOpen 

WindowsMediaPlayer1.URL = CommonDialog1.FileName 
End  Sub 

Sub Dir1_Change()  Sub Dir1_Change() 
ChDir Dir1.Path 
File1.Path = Dir1.Path 
End  Sub 

Sub Drive1_Change()  Sub Drive1_Change() 
ChDrive Drive1.Drive 
Dir1.Path = Drive1.Drive 
End  Sub 

Sub File1_DblClick()  Sub File1_DblClick() 
If File1.FileName Like  "*.mp3"  Then 
Form1.Show 
Form1.WindowsMediaPlayer1.URL = File1.FileName 
End  If 
End  Sub 

再添加一个form窗体,命名为form1,拖一个windowMedaplayer上去,如下图
代码如下
Sub Command1_Click()  Sub Command1_Click() 
CommonDialog1.ShowOpen 
WindowsMediaPlayer1.URL = CommonDialog1.FileName 
End  Sub

总体的功能是点击文件列表如果所点击的文件时MP3文件,则播放其。
 
查看源文件如下
<HTML><BODY><OBJECT classid="clsid:E324CF06-C6E8-4F7F-AD6A-95FB7D2ADF5D">
</OBJECT></BODY></HTML>
ok现在我们看看如何在asp.net项目中引用,前台代码如下
点击播放按钮弹出文件选择框,选择MP3文件进行播放。
看看效果
本机的话不用进行cab包签名,只需要进行ocx的注册(注册方法如:regsvr32 G:\WebSite2\工程1.ocx)。否则则需要对控件进行签名。cab文件可通过VB6的打包程序得到。


本文转自 BruceAndLee 51CTO博客,原文链接:xxxxxx,如需转载请自行联系原作者

目录
打赏
0
0
0
0
265
分享
相关文章
|
7月前
|
快速上手基于 BaGet 的脚本自动化构建 .net 应用打包
本文介绍了如何使用脚本自动化构建 `.net` 应用的 `nuget` 包并推送到指定服务仓库。首先概述了 `BaGet`——一个开源、轻量级且高性能的 `NuGet` 服务器,支持多种存储后端及配置选项。接着详细描述了 `BaGet` 的安装、配置及使用方法,并提供了 `PowerShell` 和 `Bash` 脚本实例,用于自动化推送 `.nupkg` 文件。最后总结了 `BaGet` 的优势及其在实际部署中的便捷性。
306 10
2025年全面的.NET跨平台应用框架推荐
2025年全面的.NET跨平台应用框架推荐
158 23
【Azure App Service】部署在App Service上的.NET应用内存消耗不能超过2GB的情况分析
x64 dotnet runtime is not installed on the app service by default. Since we had the app service running in x64, it was proxying the request to a 32 bit dotnet process which was throwing an OutOfMemoryException with requests >100MB. It worked on the IaaS servers because we had the x64 runtime install
JWT Bearer 认证在 .NET Core 中的应用
【10月更文挑战第30天】JWT(JSON Web Token)是一种开放标准,用于在各方之间安全传输信息。它由头部、载荷和签名三部分组成,用于在用户和服务器之间传递声明。JWT Bearer 认证是一种基于令牌的认证方式,客户端在请求头中包含 JWT 令牌,服务器验证令牌的有效性后授权用户访问资源。在 .NET Core 中,通过安装 `Microsoft.AspNetCore.Authentication.JwtBearer` 包并配置认证服务,可以实现 JWT Bearer 认证。具体步骤包括安装 NuGet 包、配置认证服务、启用认证中间件、生成 JWT 令牌以及在控制器中使用认证信息
242 2
.NET 3.5 中 HttpWebRequest 的核心用法及应用
【9月更文挑战第7天】在.NET 3.5环境下,HttpWebRequest 类是处理HTTP请求的一个核心组件,它封装了HTTP协议的细节,使得开发者可以方便地发送HTTP请求并接收响应。本文将详细介绍HttpWebRequest的核心用法及其实战应用。
302 6
WPF开发者必读:揭秘ADO.NET与Entity Framework数据库交互秘籍,轻松实现企业级应用!
【8月更文挑战第31天】在现代软件开发中,WPF 与数据库的交互对于构建企业级应用至关重要。本文介绍了如何利用 ADO.NET 和 Entity Framework 在 WPF 应用中访问和操作数据库。ADO.NET 是 .NET Framework 中用于访问各类数据库(如 SQL Server、MySQL 等)的类库;Entity Framework 则是一种 ORM 框架,支持面向对象的数据操作。文章通过示例展示了如何在 WPF 应用中集成这两种技术,提高开发效率。
169 0
从怀旧到革新:看WinForms如何在保持向后兼容性的前提下,借助.NET新平台的力量实现自我进化与应用现代化,让经典桌面应用焕发第二春——我们的WinForms应用转型之路深度剖析
【8月更文挑战第31天】在Windows桌面应用开发中,Windows Forms(WinForms)依然是许多开发者的首选。尽管.NET Framework已演进至.NET 5 及更高版本,WinForms 仍作为核心组件保留,支持现有代码库的同时引入新特性。开发者可将项目迁移至.NET Core,享受性能提升和跨平台能力。迁移时需注意API变更,确保应用平稳过渡。通过自定义样式或第三方控件库,还可增强视觉效果。结合.NET新功能,WinForms 应用不仅能延续既有投资,还能焕发新生。 示例代码展示了如何在.NET Core中创建包含按钮和标签的基本窗口,实现简单的用户交互。
143 0
Spring 框架里竟藏着神秘魔法?国际化与本地化的奇妙之旅等你来揭开谜底!
【8月更文挑战第31天】在软件开发中,国际化(I18N)与本地化(L10N)对于满足不同地区用户需求至关重要。Spring框架提供了强大支持,利用资源文件和`MessageSource`实现多语言文本管理。通过配置日期格式和货币符号,进一步完善本地化功能。合理应用这些特性,可显著提升应用的多地区适应性和用户体验。
79 0
Xamarin 与 .NET:解锁现代化移动应用开发的超级武器——深入探讨C#与.NET框架如何赋能跨平台应用,实现高效编码与卓越性能
【8月更文挑战第31天】Xamarin 与 .NET 的结合为开发者提供了强大的平台,用于构建现代化移动应用。通过 C# 和 .NET 框架,Xamarin 可以实现一次编写、多平台运行,覆盖 iOS、Android 和 Windows。这种方式不仅节省了开发时间和成本,还保证了应用的一致性和高质量。Xamarin 是一个开源框架,专为跨平台移动应用开发设计,允许使用 C# 语言和 .NET 核心库构建原生应用,并访问各平台特定功能。微软维护的 Xamarin 是 Visual Studio 生态系统的一部分,极大地提高了开发效率。
138 0
AI助理

你好,我是AI助理

可以解答问题、推荐解决方案等