Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

GnomO!

WScript.Sheel + FFMPEG

Recommended Posts

Fala galera!

Seguinte.. Estou com problemas com o wscript.shell

mais somente no servidor web, pois no servidor local

o codigo roda perfeitamente. Já comuniquei ao pessoal

do servidor mais eles disseram q todas as permissoes

estao setadas. Fiz alguns testes e verifiquei que o objecto

é criado mais quando o script tenta rodar o ffmpeg.exe o servidor

fica carregando pra sempre.

 

Faça o teste em http://www.onjob.com.br/crea/empregos/TesteUploadPodcast.asp

 

Cheguei a testar outro codigo de um post que encontrei aqui

http://forum.imasters.com.br/index.php...mp;#entry848878

e o mesmo acontece, veja: www.onjob.com.br/crea/ping.asp

 

O script q fiz funciona da seguinte maneira, o usuario envia o arquivo

e o script executa o ffmpeg que converte arquivos de audio como wav e

wma para mp3. Segue o código:

 

<!--#include file="../inc/DBAbre.asp" -->
<!--#include file="../inc/Comum.asp" -->
<!--#include file="../inc/Upload.asp" -->
<!--#include file="../inc/Library.asp" -->
<%
Set Uploader = New FileUploader
If Uploader.Form("action") = "addpodcast" Then
	strPodcast = "podcast"


lngCurriculoID = "11225216608652678542"
lngPodcastCodigo = 4

	  strExtencao = LCase(Mid(Uploader.Files(strPodcast).FileName, InStrRev(Uploader.Files(strPodcast).FileName, ".")))
		  strNomeArquivo = lngCurriculoID&"-"&lngPodcastCodigo& strExtencao
		  Uploader.Files(strPodcast).FileName = strNomeArquivo
		  Uploader.Files(strPodcast).SaveToDisk PASTA_PROF_PODCASTS_VIRTUAL_VERIFICA				


		  'Converte audio para *.MP3
		  dim sExecuteable
		  dim oShell
		  dim sOutputFilepath
		  dim cmd

		  sExecuteable = "ffmpeg.exe"
		  sPodcastFilepath = PASTA_PROF_PODCASTS_VIRTUAL_VERIFICA&strNomeArquivo
		  sOutputFilepath = PASTA_PROF_PODCASTS_VIRTUAL&"\"&lngCurriculoID&"\"&lngCurriculoID&"-"&lngPodcastCodigo&".mp3"

		  cmd = server.mappath(sExecuteable) & " -i """ & sPodcastFilepath & """ -b 128 """ & sOutputFilepath & """"
		  set oShell = server.createobject("Wscript.Shell")
		  oShell.Run cmd
		  set oShell = nothing

End If
%>

	<form action="TesteUploadPodcast.asp" method="post" enctype="multipart/form-data">
	<input type="hidden" name="action" value="addpodcast" />
	<label>Arquivo:</label><input class="file" size="40" type="file" name="podcast" /> <br />
	<input type="submit" style="font-size:11px;" value="enviar" /><br /><br />
	</form>

Alguem pode dar um help?

 

Desde já agradeço. http://forum.imasters.com.br/public/style_emoticons/default/grin.gif

Compartilhar este post


Link para o post
Compartilhar em outros sites

chega a mostrar alguma mensagem de erro?

verificou se o caminho onde salva o arquivo enviado está correto?

o caminho onde salva o audio/video está correto?

o caminho da variavel cmd está correto?

os caminhos estão com permissões de escrita?

Compartilhar este post


Link para o post
Compartilhar em outros sites

Cara não retorna erro nenhum...

a pagina so fica carregando e carregando e carregando e

nada.. chega fazer o upload tranquilo, eu olho la na pasta

do ftp e o arquivo esta la.. so na parte da

conversão que fica assim carregando...

 

valeu!!

Compartilhar este post


Link para o post
Compartilhar em outros sites

Não é limite de tempo não ate pq eu estava testando com um arquivo de 64kb

e tbm setei o Server.ScriptTimeout = 3600 que é igual a 60 minutos..

 

valeu!

Compartilhar este post


Link para o post
Compartilhar em outros sites

verificou os caminhos? possivelmente não tem permissão de escrita ou esqueceu de trocar alguma das variaveis quando subiu os arquivos

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.