play avi file u vb

play avi file u vb

offline
  • Pridružio: 11 Feb 2006
  • Poruke: 166
  • Gde živiš: Loznica

ovaj kod sam skinuo na
support.microsoft.com/kb/171981
      Private Declare Function mciSendString Lib "winmm.dll" Alias _         "mciSendStringA" (ByVal lpstrCommand As String, ByVal _         lpstrReturnString As Any, ByVal uReturnLength As Long, ByVal _         hwndCallback As Long) As Long      Sub Command1_Click()         '// --- Modify FILE_TO_OPEN constant as appropriate ---     '    Const FILE_TO_OPEN = "C:\winnt\clock.avi"          Const FILE_TO_OPEN = "D:\Filmovi\MrBeen\been1.avi"                 Dim strCmdStr As String         Dim lngReturnVal As Long         strCmdStr = "play " & FILE_TO_OPEN & " fullscreen "         lngReturnVal = mciSendString(strCmdStr, 0&, 0, 0&)       End Sub


winmm.dll postoji ali se nista ne desava ne izbacuje ni gresku
sta je problem



Registruj se da bi učestvovao u diskusiji. Registrovanim korisnicima se NE prikazuju reklame unutar poruka.
Ko je trenutno na forumu
 

Ukupno su 996 korisnika na forumu :: 29 registrovanih, 4 sakrivenih i 963 gosta   ::   [ Administrator ] [ Supermoderator ] [ Moderator ] :: Detaljnije

Najviše korisnika na forumu ikad bilo je 3466 - dana 01 Jun 2021 17:07

Korisnici koji su trenutno na forumu:
Korisnici trenutno na forumu: Aleksandar Tomić, babaroga, Brok, Dimitrise93, djboj, Djokislav, drimer, esx66, Fog of War, Gall, HrcAk47, ikan, Kibice, kobaja77, Koridor, laurusri, Lazarus, marsovac 2, NoOneEver Dreams, operniki, procesor, Srky Boy, Srle993, Sumadija34, Trpe Grozni, vandrej, VP6919, zlaya011, 125