找回密码
 加入
搜索
AUTOIT CN»论坛 › AU3交流 › 『 提问交流 』 › 可以用AU3编在线TV直播吗
返回列表 发新帖
查看: 3019|回复: 10

[AU3基础] 可以用AU3编在线TV直播吗

 火.. [复制链接]
hz2004cj
发表于 2013-3-31 01:11:26 | 显示全部楼层 |阅读模式
有个做这个，效果很好，但不知道怎么做出来的，用AU3可以做吗？

效果, 在线

本帖子中包含更多资源

您需要 登录 才可以下载或查看，没有账号？加入

×

相关帖子
回复

举报

Au3代码高亮发贴标签： [AU3] 你的代码 [/AU3]                   支持论坛的发展，请添加此》》网址导航《《为您的主页          
huangwei
发表于 2013-3-31 08:37:59 | 显示全部楼层
应该可以吧！这里高手那么多
回复

举报

guland
发表于 2013-3-31 18:03:36 | 显示全部楼层
可以做的
回复

举报

lygwsc
发表于 2013-4-16 12:57:08 | 显示全部楼层
可以的,,,,,
回复

举报

32714107
发表于 2013-4-16 21:13:38 | 显示全部楼层
哪个高手写个源码出来大家学习一下！
回复

举报

zzbtlc
发表于 2013-4-16 21:55:59 | 显示全部楼层
这个当然是可以的
回复

举报

骗子
发表于 2013-4-17 14:46:02 | 显示全部楼层
窗口内嵌网页就可以了吧
回复

举报

netegg
发表于 2013-4-19 00:38:56 | 显示全部楼层
本帖最后由 netegg 于 2013-4-19 00:40 编辑

用wmp对象做就行了，或者直接flash对象可能也行
回复

举报

lxzan
发表于 2013-4-23 06:46:46 | 显示全部楼层
可以,但我不会.
回复

举报

txen548
发表于 2013-4-25 14:17:32 | 显示全部楼层 
#Region ;**** 統杅斐膘衾 ACNWrapper_GUI ****
#AutoIt3Wrapper_icon=ico.ico
#AutoIt3Wrapper_outfile=厙釐萇弝.exe
#AutoIt3Wrapper_Compression=4
#EndRegion ;**** 統杅斐膘衾 ACNWrapper_GUI ****
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
Opt('MustDeclareVars', 1)
Local $oIE,$Form1,$GUIActiveX,$M1,$M2,$M3,$M4,$M5,$M6,$M7,$M8,$M9,$M10,$nMsg,$M11,$exit,$M12,$M13,$M14,$Radio1 ,$Radio2,$qj,$blog,$szzd,$qxzd,$sz
Local $M20,$c6,$c5,$c8,$M21,$M22,$M23,$M24,$M25,$M26,$M27,$M28,$M29,$M210,$M211,$M212,$M213,$M214,$M215,$M216,$m217
Local $m30,$m311,$m312,$m313,$m314,$m315,$m316,$m317,$m318,$m319,$m320,$m321,$m322,$m323,$m324,$m325
Local $m40,$M411,$m412,$m413,$m414,$m415,$m416,$m417,$m418,$m419,$m420,$m421,$m422,$m423,$m424,$m425,$m426
$oIE = ObjCreate("Shell.Explorer.2")
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("CCTV網絡電視播放器", 622, 534,(@DesktopWidth - 640) / 2, (@DesktopHeight - 580) / 2, BitOR($WS_OVERLAPPEDWINDOW, $WS_CLIPSIBLINGS, $WS_CLIPCHILDREN))
$GUIActiveX = GUICtrlCreateObj ($oIE, 0, 0, 622, 534)
$M1 = GUICtrlCreateMenu("文件操作")
$blog=GUICtrlCreateMenuItem("注意事項", $M1)
$qj=GUICtrlCreateMenuItem("央視插件", $M1)
$exit=GUICtrlCreateMenuItem("退出軟件", $M1)
;---------------梓羲宎---------------------------
$M2 = GUICtrlCreateMenu("央視標清")
$M3 = GUICtrlCreateMenuItem("標清CCTV-1", $M2)
$M4 = GUICtrlCreateMenuItem("標清CCTV-2", $M2)
$M5 = GUICtrlCreateMenuItem("標清CCTV-3", $M2)
$M6 = GUICtrlCreateMenuItem("標清CCTV-4", $M2)
$c5 = GUICtrlCreateMenuItem("標清CCTV-5", $M2)
$c6 = GUICtrlCreateMenuItem("標清CCTV-6", $M2)
$M7 = GUICtrlCreateMenuItem("標清CCTV-7", $M2)
$c8 = GUICtrlCreateMenuItem("標清CCTV-8", $M2)
$M8 = GUICtrlCreateMenuItem("標清CCTV-9", $M2)
$M9 = GUICtrlCreateMenuItem("標清CCTV-10", $M2)
$M10 = GUICtrlCreateMenuItem("標清CCTV-11", $M2)
$M11 = GUICtrlCreateMenuItem("標清CCTV-12", $M2)
$M12 = GUICtrlCreateMenuItem("標清CCTV新聞", $M2)
$M13 = GUICtrlCreateMenuItem("標清CCTV音樂", $M2)
$M14 = GUICtrlCreateMenuItem("標清CCTV少兒", $M2)
;---------------梓賦旰---------------------------
;---------------詢羲宎---------------------------
$M20 = GUICtrlCreateMenu("央視高清")
$M21 = GUICtrlCreateMenuItem("高清CCTV-1", $M20)
$M22 = GUICtrlCreateMenuItem("高清CCTV-2", $M20)
$M23 = GUICtrlCreateMenuItem("高清CCTV-3", $M20)
$M24 = GUICtrlCreateMenuItem("高清CCTV-4", $M20)
$M25 = GUICtrlCreateMenuItem("高清CCTV-5", $M20)
$M26 = GUICtrlCreateMenuItem("高清CCTV-6", $M20)
$M27 = GUICtrlCreateMenuItem("高清CCTV-7", $M20)
$M28 = GUICtrlCreateMenuItem("高清CCTV-8", $M20)
$M29 = GUICtrlCreateMenuItem("高清CCTV-9", $M20)
$M210 = GUICtrlCreateMenuItem("高清CCTV-10", $M20)
$M211 = GUICtrlCreateMenuItem("高清CCTV-12", $M20)
$M212 = GUICtrlCreateMenuItem("高清CCTV-12", $M20)
$M213 = GUICtrlCreateMenuItem("高清CCTV新聞", $M20)
$M214 = GUICtrlCreateMenuItem("高清CCTV音樂", $M20)
$M215 = GUICtrlCreateMenuItem("高清東方衛視", $M20)
$M216 = GUICtrlCreateMenuItem("高清CCTV少兒", $M20)
$M217 = GUICtrlCreateMenuItem("CCTV高清頻道", $M20)
;---------------詢賦旰---------------------------
;---------------坻耋詢---------------------------
$M30 = GUICtrlCreateMenu("頻道-1")
$M311 = GUICtrlCreateMenuItem("安徽衛視", $M30)
$M312 = GUICtrlCreateMenuItem("北京衛視", $M30)
$M313 = GUICtrlCreateMenuItem("重慶衛視", $M30)
$M314 = GUICtrlCreateMenuItem("東南衛視", $M30)
$M315 = GUICtrlCreateMenuItem("甘肅衛視", $M30)
$M316 = GUICtrlCreateMenuItem("廣東衛視", $M30)
$M317 = GUICtrlCreateMenuItem("廣西衛視", $M30)
$M318 = GUICtrlCreateMenuItem("貴州衛視", $M30)
$M319 = GUICtrlCreateMenuItem("河北衛視", $M30)
$M320 = GUICtrlCreateMenuItem("河南衛視", $M30)
$M321 = GUICtrlCreateMenuItem("黑龍江衛視", $M30)
$M322 = GUICtrlCreateMenuItem("湖北衛視", $M30)
$M323 = GUICtrlCreateMenuItem("湖南衛視", $M30)
$M324 = GUICtrlCreateMenuItem("吉林衛視", $M30)
$M325 = GUICtrlCreateMenuItem("江蘇衛視", $M30)
;---------------坻耋賦旰---------------------------
;---------------坻耋詢---------------------------
$M40 = GUICtrlCreateMenu("頻道-2")
$M411 = GUICtrlCreateMenuItem("江西衛視", $M40)
$M412 = GUICtrlCreateMenuItem("遼寧衛視", $M40)
$M413 = GUICtrlCreateMenuItem("旅遊衛視", $M40)
$M414 = GUICtrlCreateMenuItem("內蒙古衛視", $M40)
$M415 = GUICtrlCreateMenuItem("寧夏衛視", $M40)
$M416 = GUICtrlCreateMenuItem("青海衛視", $M40)
$M417 = GUICtrlCreateMenuItem("山東衛視", $M40)
$M418 = GUICtrlCreateMenuItem("山西衛視", $M40)
$M419 = GUICtrlCreateMenuItem("陜西衛視", $M40)
$M420 = GUICtrlCreateMenuItem("四川衛視", $M40)
$M421 = GUICtrlCreateMenuItem("天津衛視", $M40)
$M422 = GUICtrlCreateMenuItem("西藏衛視", $M40)
$M423 = GUICtrlCreateMenuItem("夏門衛視", $M40)
$M424 = GUICtrlCreateMenuItem("新疆衛視", $M40)
$M425 = GUICtrlCreateMenuItem("雲南衛視", $M40)
$M426 = GUICtrlCreateMenuItem("浙江衛視", $M40)
;---------------坻耋賦旰---------------------------
$sz = GUICtrlCreateMenu("窗口設置")
$szzd = GUICtrlCreateMenuItem("設置置頂",$sz)
$qxzd = GUICtrlCreateMenuItem("取消置頂",$sz)
$oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?")
GUISetState(@SW_SHOW)

#EndRegion ### END Koda GUI section ###

While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case $GUI_EVENT_CLOSE
                        Exit
                Case $exit
                        exit
                Case $qj
                        $oIE.navigate("http://t.live.cctv.com/ieocx/CCTVRegOcx.exe")
                Case $blog
                        MsgBox(64,"注意","首次使用請安裝央視插件,否則無法播放")
                Case $szzd
                        WinSetOnTop("CCTV網絡電視播放器", "", 1)
                Case $qxzd
                        WinSetOnTop("CCTV網絡電視播放器", "", 0)
        ;--------梓羲宎-----------------------------------------------------------------------------------------------------------
        Case $M3
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_cctv1")
                Case $M4
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_cctv2")
                Case $M5
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_c3#toyota@cctv_3")
                Case $M6
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_cctv4#haier_kfc@cctv_4")
                Case $c5
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_ec_c5")
                Case $c6
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_cctv6")
                case $M7
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_cctv7")
                Case $c8
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_cctv8")
                case $M8
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_cctv9")
                Case $M9
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_cctv10")
                Case $M10
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_cctv11")
                case $M11
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_cctv12#haier_kfc@cctv_12")
                Case $M12
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_cctvnews#haier_kfc@cctv_new")
                Case $M13
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_cctvmusic#haier_kfc@cctv_song")
                Case $M14
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_cctvkids#haier_kfc@cctv_yang")
        ;--------梓賦旰-----------------------------------------------------------------------------------------------------------
        ;--------詢羲宎-----------------------------------------------------------------------------------------------------------
                case $M21
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_hdcctv1")        
                case $M22
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_hdcctv2")        
                case $M23
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_hdcctv3")
                case $M24
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_hdcctv4")
                case $M25
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_hdcctv5")        
                case $M26
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_hdcctv6")                
                case $M27
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_hdcctv7")        
                case $M28
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_hdcctv8")        
                case $M29
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_hdcctv9")
                case $M210
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_hdcctv10")
                case $M211
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_hdcctv11")
                case $M212
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_hdcctv12")
                case $M213
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_hdcctvnews")
                case $M214
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_hdcctvmusic")                
                case $M215
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_hdshanghaikatong")
                case $M216
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_hdcctvkids")
                case $M217
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_hd700_cctvgaoqing")
    ;--------詢賦旰-----------------------------------------------------------------------------------------------------------                        
        ;--------坻-1羲宎-----------------------------------------------------------------------------------------------------------                
                Case $m311
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_hdanhui")
            Case $m312
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_hdbeijing")
                Case $m313
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_hdchongqing")
                Case $m314
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_hddongnan")
                Case $m315
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_hdgansu")  
                Case $m316
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_hdguangdong")
                Case $m317
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_hdguangxi")
                Case $m318
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_hdguizhou")
                Case $m319
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_hdhebei")
                Case $m320
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_hdhenan")
                Case $m321
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_hdheilongjiang")
                Case $m322
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_hdhubei")
                Case $m323
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_hdhunan")
                Case $m324
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_hdjilin")
                Case $m325
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_hdjiangsu")
        ;--------坻-1賦旰-----------------------------------------------------------------------------------------------------------        
            Case $m411
                $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_hdjiangxi")
                Case $m412
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_hdliaoning")
                Case $m413
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_hdlvyou")
                Case $m414
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_hdneimeng")
                Case $m415
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_hdningxia")
                Case $m416
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_hdqinghai")
                Case $m417
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_hdshandong")
                Case $m418
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_hdshan-xi")
                Case $m419
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_hdshanvxi")
                Case $m420
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_hdsichuan")
                Case $m421
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_hdtianjin")
                Case $m422
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_hdxizang2")
                Case $m423
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_xiamenweishi")
                Case $m424
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_hdxinjiang")
                Case $m425
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_hdyunnan")
                Case $m426
                        $oIE.navigate("http://t.live.cctv.com/cctvwebplay/cctvplayer.html?channel=cctv_p2p_hdzhejiang")
                
        EndSwitch
WEnd
回复

举报

txen548
发表于 2013-4-25 14:18:55 | 显示全部楼层
希望可以幫到你
回复

举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-12-25 12:38 , Processed in 0.080558 second(s), 24 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表