网易博客| 空间服务| 博客圈| 搜索圈子
正在加载用户信息...
刚又写了个程序给大家(请大家重新下载!)
2008年04月26日 20:32:31 作者: NoyFnr

FLV视频文件提取MP3和转换AVI工具+FLV视频地址嗅探工具(绝对实用的FLV视频工具集合!) 下载地址(地址已修正):http://www.fs2you.com/files/36f59073-171f-11dd-b2bb-0014221f4662/

FLV视频工具集合已进行大面积更新,原来的图片(下面)已不是这样了~

请立即下载进行更新,新版本中加入了自动更新功能!及更新了10个以上的工具!

注意:我的BLOG也可直接打开Http://NoyFnr.QQ.LIYC.CN 也可访问我的BLOG!

永久下载地址:http://work.newhua.com/cfan/200813/flvspgj.rar

以下全部软件的合集下载地址(已更新):http://services.qq.liyc.cn/soft

反馈BUG请访问:http://services.qq.liyc.cn/

软件下载:http://services.qq.liyc.cn/soft

写了个可以把FLV视频文件里的音乐提取为MP3格式并且能把FLV转换成AVI格式的软件~~

大家喜欢就拿去用把,呵呵 ^-^

对了,要下载土豆,优酷等视频网的视频就去FLVCD把`~

恩,去玩了~~

刚发现软件转换大的FLV文件,如超过30M以上的时候.就会导致溢出,软件错误退出.更新把这个BUG修复了~

新版把界面改了下,把退出后的SHOW给去掉了~~很多人说叫我去掉~~把转换的KB数显示出来了.

新版本的:

FLV播放工具,迄今为止最小的,下灾:http://www.fs2you.com/files/d0c23533-15e8-11dd-a9b9-00142218fc6e/

 

FLV音频提取工具(13KB极度精简版)下载!!!

       

该版本只能提取FLV视频里的音乐,但是大小才13KB!!!

软件介绍:FLV音频提取工具  [20080505更新版]

更多工具下载请访问:Http://23321213.BLOG.163.COM

更新了软件的一些小部分的内容

加快了提取FLV视频文件里的音频速度

改变软件界面

提取出的音频文件名由“音频.MP3”改变为“AU.MP3”

占用系统内存更小

更改了“打开文件”对话框

主程序体积更小

软件特色:提取100MB的FLV视频里的音乐时间仅仅需要5秒!(赛扬D的处理器)

                 提取出来的MP3文件体积很小,音质超级保真!

                 系统资源占用极小!

                 完全兼容FLV1 及 FLV4 编码格式的FLV视频

                 完全兼容Windows 98/Me/2000/2003/XP/Vista/2008  完全能正常运行程序!

软件下载地址:http://www.fs2you.com/files/02fdecee-1e34-11dd-a70c-0014221f4662/

 软件使用方法:点击第一个“..”的按钮选择一个要提出音频的FLV视频文件

点击第二个“..”选择提出的音频文件保存路径.后点击“开始”会在目录下自动生成一个名为“AU.MP3”

的音乐MP3文件.用音乐播放器即可打开播放!!

 还有一个MP3分割工具,把MP3文件中提取一段出来,再重新写成一个MP3音频文件!

下载地址:http://www.fs2you.com/files/f3e91075-1e49-11dd-8d4c-0014221f3995/

 FLV专用下载工具:因为“迅雷”等多线程下载工具无法下载来自56、土豆、优酷等网站的FLV视频,所以我搞了这个东西.就是能下载所有网站的FLV视频.速度也比IE自带的快些~~呵呵 ^_^ 下载地址:http://www.fs2you.com/files/032fa221-1e70-11dd-aea0-0014221f3995/

 外加个Windows星号密码查看器下载:http://www.fs2you.com/files/3d31c075-6122-11dd-9e2d-0014221b798a/

 

社会奇闻:腾讯用QQ币为公司员工发工资

搜狐IT在腾讯QQ会员专区看到腾讯两则招聘启事,该启事称,QQ会员记者团将招聘记者和美工共15名,而给予的工资报酬则是Q币。

  根据腾讯的声明,QQ会员记者团隶属腾讯公司QQ会员产品下,负责对腾讯公司QQ会员核心产品的最新动态进行及时、公正、全面的报道与传播,以促进客观活跃的用户交流,让更多用户通过记者团更深入地了解腾讯的产品文化。同时,腾讯的招聘启事对应聘者提出了比较严格的申请要求和能力要求。  而法律界人士则认为,这一招聘行为严重违反国家劳动法。

  长安律师事务所律师张瑛表示,腾讯一旦与员工发生雇佣关系,都必须向其支付法定货币,而Q币不是法定货币,因此这一招聘行为严重违法。

  《劳动法》第50条规定,工资应当以货币形式按月支付给劳动者本人。不得克扣或者无故拖欠劳动者的工资。同时,《工资支付暂行规定》劳部发[1998]489号认为,工资应当以法定货币支付。不得以实物及有价证券替代货币支付。 

  另外,张瑛也认为,即便此次招聘的人员很多是兼职的非全日制员工,根据《劳动法》规定,双方也应当订立口头协议,劳动者在同一用人单位一般平均每日工作时间不超过四小时,每周工作时间累计不超过二十四小时的用工形式;不得约定试用期;计酬标准不得低于用人单位所在地人民政府规定的最低小时工资标准。而腾讯的这一招聘的启示,上述原则几乎都不符合。

  上海市中汇律师事务所律师游云庭认为,如果腾讯没有将兼职人员的收入缴纳个人所得税,也将造成国家税务损失。他认为,Q币不是法定货币,但能购买一些腾讯公司的增值服务,具有一定的价值,发放Q币可以看成是特殊形式的发放实物。腾讯使用特殊的实物——Q币购买了兼职人员的服务,那么兼职人员还有一个缴纳所得税的问题,腾讯作为实物发放人,在法律上属于代扣义务人,应向相关的税务机关进行申报,为这些兼职人员按照Q币的实际价值交税。

  同时,腾讯以Q币代替工资的行为也再次引起了关于“虚拟货币冲击国家金融体系”的争论。

  有网友认为,腾讯向兼职员工发放Q币作为报酬,是变相承认Q币是法定货币;腾讯自己构造了一个虚拟王国,而在这个虚拟王国中的虚拟货币却可以成为现实生活中一种等价的报酬,这会对国家的货币和金融体系造成冲击。

  2006年,一位叫杨涛的学者在2006年第7期的《法制与新闻》上发表文章称,“Q币等网络虚拟货币一旦与人民币可以兑换,其后果不堪设想。因为如果Q币等虚拟货币商家无限发行,势必会冲击我国的金融秩序。”由此,引起“Q币将冲击国家金融体系”的争论。

  但同时, 计世资讯总经理曲晓东则表示,目前不需要对上述事件太过紧张。首先需要搞清楚腾讯的上述招聘行为是集团层面有计划的行为,还是仅仅一个部门的小范围的行为。上述现象的影响还需要继续观望。

 

 

今天给大家提供一个VB写无需COMDLG32.OCX控件弹出打开文件对话框的程序:

控件:TextBox名称:Filename

按钮:FileOpen -- 打开文件

模块代码:Option Explicit

Declare Function GetOpenFileName Lib "comdlg32.dll" Alias _
        "GetOpenFileNameA" (pOpenfilename As OPENFILENAME) As Long
 
Type OPENFILENAME
     lStructSize As Long
     hwndOwner As Long
     hInstance As Long
     lpstrFilter As String
     lpstrCustomFilter As String
     nMaxCustFilter As Long
     nFilterIndex As Long
     lpstrFile As String
     nMaxFile As Long
     lpstrFileTitle As String
     nMaxFileTitle As Long
     lpstrInitialDir As String
     lpstrTitle As String
     flags As Long
     nFileOffset As Integer
     nFileExtension As Integer
     lpstrDefExt As String
     lCustData As Long
     lpfnHook As Long
     lpTemplateName As String
End Type

窗口:Form1代码:

Private Sub FileOpen_Click()
    Dim ofn As OPENFILENAME
    Dim rtn As String

    ofn.lStructSize = Len(ofn)
    ofn.hwndOwner = Me.hWnd
    ofn.hInstance = App.hInstance
    ofn.lpstrFilter = "所有文件"
    ofn.lpstrFile = Space(254)
    ofn.nMaxFile = 255
    ofn.lpstrFileTitle = Space(254)
    ofn.nMaxFileTitle = 255
    ofn.lpstrInitialDir = App.Path
    ofn.lpstrTitle = "打开文件"
    ofn.flags = 6148

    rtn = GetOpenFileName(ofn)

    If rtn >= 1 Then
        Filename.Text = ofn.lpstrFile
    Else
        Filename.Text = "Cancel Was Pressed"
    End If
End Sub

Private Sub Form_Load()
    Move (Screen.Width - Width) \ 2, (Screen.Height - Height) \ 2
End Sub

正在加载博主信息...
正在加载博主日志...
圈内相关日志
正在加载分类相关日志...