Hiho leute gibt es eine möglichkeit flashvideos einzubinden also nicht nur von youtube sondern auch von anderen seite also sevenload usw ich versuche die ganze zeit dieses video einzubinden also das nur das video angezeigt wird: HIER DIESES VIDEO
Flash Videos einbinden?
-
- [ offen ]
-
slash -
9. Juni 2008 um 13:35 -
Geschlossen -
Erledigt
-
-
- Offizieller Beitrag
gibt es eine möglichkeit flashvideos einzubinden
Wo möchtest du das Video einbinden? -
in mein autoit gui xD
-
- Offizieller Beitrag
Ah, Problem erkannt. Das wird wohl nicht gehen, da kein Link zum Video selber existiert, sondern nur zur Website mit eingebettetem Video. Die Website kpl. kannst du natürlich in eine Oberfläche einbetten, aber ich denke, das ist nicht was du willst.
-
Mhh wie meinst des könntest villt ein beispiel machen?
-
- Offizieller Beitrag
Ja, das Bsp. aus der Hilfe etwas abgewandelt:
Spoiler anzeigen
[autoit]#include <GUIConstantsEx.au3>
[/autoit] [autoit][/autoit] [autoit]
#include <IE.au3>
#include <WindowsConstants.au3>_IEErrorHandlerRegister ()
[/autoit] [autoit][/autoit] [autoit]$oIE = _IECreateEmbedded ()
[/autoit] [autoit][/autoit] [autoit]
GUICreate("Embedded Web control Test", 640, 580, (@DesktopWidth - 640) / 2, _
(@DesktopHeight - 580) / 2, $WS_OVERLAPPEDWINDOW + $WS_VISIBLE + $WS_CLIPSIBLINGS)
$GUIActiveX = GUICtrlCreateObj($oIE, 10, 40, 600, 360)
$GUI_Button_Start = GUICtrlCreateButton("Start", 10, 420, 100, 30)GUISetState()
[/autoit] [autoit][/autoit] [autoit]
While 1
$msg = GUIGetMsg()
Select
Case $msg = $GUI_EVENT_CLOSE
ExitLoop
Case $msg = $GUI_Button_Start
_IENavigate ($oIE, "http://de.sevenload.com/videos/KzvjaXn-Book-1-04")
EndSelect
WEndGUIDelete()
[/autoit]
Exit -
naa so mein ich nich xD wollte nur das vid haben ohne die komplette seite xD.... also man kann auch des video wo anders einbinden mom.
einma damit:<script type="text/javascript" src="http://flash.sevenload.com/pl/8IgnykM/455x364"></script><p>Link: <a href="http://flash.sevenload.com/videos/8IgnykM-Book-1-01" title="Book 1 | 01">sevenload.com</a></p>
und einma damit:
<object type="application/x-shockwave-flash" data="http://flash.sevenload.com/pl/8IgnykM/455x364/swf" width="455" height="364"><param name="allowFullscreen" value="true" /><param name="allowScriptAccess" value="always" /><param name="movie" value="http://flash.sevenload.com/pl/8IgnykM/455x364/swf" /></object><p>Link: <a href="http://flash.sevenload.com/videos/8IgnykM-Book-1-01" title="Book 1 | 01">sevenload.com</a></p>
villt hilft es somit weiter?
-
- Offizieller Beitrag
Na dann könnte dir das weiterhelfen: http://www.autoitscript.com/forum/index.php?showtopic=65027&hl=embedded++flash
(Allerdings sind die von dir angegebenen SWF-Links wohl nicht verfügbar, ich kann mit keinem Player unter Angabe des Links darauf zugreifen)
-
Also ich hab jetz was hinbekommen aber meine frage wie kann ich des machen also zb von einer combo box wenn da 10 filme drinne sind und ich jetz zb film 1 auswähle das es den film dann anzaigt und wenn ich film 2 aus der combo box wähle das er den anzeigt usw^^
aber man soll vorher also man wählt jetz aus der combo box ein film aus dann muss man aber erst auf nen button klicken der "Stream It" heist dann streamt er den film...
mein jetziges script.Spoiler anzeigen
[autoit]#Include <File.au3>
[/autoit] [autoit][/autoit] [autoit]
#include <GUIConstants.au3>
#Include <Array.au3>
#include <IE.au3>$Sommer = "http://cdn1.fliqz.com/fliqz/production/content/41bb6f7c746d47e19b27e55e80283914.flv"
[/autoit] [autoit][/autoit] [autoit]
$21 = "http://cdn1.fliqz.com/fliqz/production/content/b6b1e534e0d544339f32b9c5c760693c.flv"#Region ### START Koda GUI section ### Form=
[/autoit] [autoit][/autoit] [autoit]
$IEGUI = GUICreate("....", 625, 448, 249, 206)
GUISetBkColor(0xA6CAF0)
$oAFP = _flashcreate(1, 10, 5, 604, 380);~ _flashvalue($oAFP, "Play")
[/autoit] [autoit][/autoit] [autoit]_flashloadmedia($oAFP, "http://www.jeroenwijering.com/embed/player.swf")
[/autoit] [autoit][/autoit] [autoit];~ $oIE = _IECreateEmbedded()
[/autoit] [autoit][/autoit] [autoit];~ $GuiIE = GUICtrlCreateObj($oIE,0,0,100,100)
[/autoit] [autoit][/autoit] [autoit]
GUISetState()
_flashvalue($oAFP, "Play")
;~ GUICtrlCreateObj($oIE,0,0)$Vars = ""
[/autoit] [autoit][/autoit] [autoit]$File = $Sommer
[/autoit] [autoit][/autoit] [autoit]
$w = 604
$h = 380
$image = ""If $file Then $Vars &= "&file=" & $file
[/autoit] [autoit][/autoit] [autoit]
If $w Then $Vars &= "&width=" & $w
If $h Then $Vars &= "&height=" & $h
If $image Then $Vars &= "&image=" & $image; Weiter Eigenschaften nach diesem Schema von http://www.jeroenwijering.com/?item=Supported_Flashvars adden
[/autoit] [autoit][/autoit] [autoit]$oAFP.FlashVars = StringTrimLeft($Vars,1)
[/autoit] [autoit][/autoit] [autoit]
$Combo = GUICtrlCreateCombo("", 16, 408, 169, 25)
GUICtrlSetData(-1,"Sommer|21|3|4|5|6|7|8|9|10","")
$Group1 = GUICtrlCreateGroup("....", 8, 392, 185, 49)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Button1 = GUICtrlCreateButton("Stream It", 200, 400, 129, 41, 0)
$Button2 = GUICtrlCreateButton("Exit", 488, 400, 129, 41, 0)
$Button3 = GUICtrlCreateButton("...", 336, 400, 129, 41, 0)
ProgressSet(100)
ProgressOff()
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###While 1
[/autoit] [autoit][/autoit] [autoit]
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd;----------------------------------
[/autoit] [autoit][/autoit] [autoit]
;------Adobe Flash Functions-------
;----------------------------------#cs
[/autoit] [autoit][/autoit] [autoit]
_flashcreate($show, $left, $top, $width = 100, $height = 100)
$show: 1 = creates the control
2 = doesn't create the controlReturn: The object for the control
[/autoit] [autoit][/autoit] [autoit]
#ce
Func _flashcreate($show, $left, $top, $width = 100, $height = 100)
If FileFindFirstFile(@SystemDir & "\Macromed\Flash\flash*.ocx") = -1 Then
$Value = MsgBox(20, "Error", "It seems that you don't have Flash Player installed. Please download" & @CRLF & "it from http://www.adobe.com. Do you want to go there now?")
If $Value = 6 Then
ShellExecute("www.adobe.com")
EndIf
Exit
EndIf
$i = 10
Do
$i -= 1
$oFlash = ObjCreate("ShockwaveFlash.ShockwaveFlash." & $i)
Until Not @error Or $i < = 0
If $oFlash = 0 Then Return 0
If $show = 1 Then
GUICtrlCreateObj($oFlash, $left, $top, $width, $height)
EndIf
Return $oFlash
EndFunc
#cs
_flashloadmedia($object, $URL)
$object: Object returned from the _flashcreate()
$URL: Path or URL of the media
Return: None
#ce
Func _flashloadmedia(ByRef $object, $URL)
$object.LoadMovie(0, $URL)
EndFunc
#cs
_flashsetvalue($object, $setting)
$object: Object returned from the _flashcreate()
$setting: "play"
"stop"Return: None
[/autoit]
#ce
Func _flashvalue(ByRef $object, $setting)
Select
Case $setting = "play"
$object.play()
Case $setting = "stop"
$object.stop()
EndSelect
EndFunc -
- Offizieller Beitrag
[autoit]#Include <GuiComboBox.au3>
[/autoit]
$Text = ''
$index = _GUICtrlComboBox_GetCurSel($hComboBox) ; Index der aktuellen Auswahl
_GUICtrlComboBox_GetLBText($hComboBox, $index, $Text) ; Text der aktuellen Auswahl wird in $Text geschrieben -
könntest du das villt in meinen quell text einbauen?
-
- Offizieller Beitrag
Also ich weise dir gerne den Weg, aber ich bin kein Taxifahrer, der dich auch noch fährt, weil du nicht laufen möchtest.
-
ja ich weis aber nich wo ich es einbauen soll bzw ich hab es ja drinnen wie du siehst aber es geht iwie nich bzw weis nich weiter