Douglas Zacharias
Membros-
Total de itens
23 -
Registro em
-
Última visita
Sobre Douglas Zacharias
Perfil
-
Gender
Male
Douglas Zacharias's Achievements
0
Reputação
-
Opa! Consegui resolver o problema! MAS APARECEU OUTRO!!! hauahuahauhau. ngm merece... rs Seguinte: Eu estava declarando funções entre <% e %>. Descobri agora que preciso declarar minhas funções entre <script runat=server> e </script>. Mas estou tendo um problema do além. Coisa do Jason: Server Error in '/' Application. -------------------------------------------------------------------------------- Compilation Error Description: An error occurred during the compilation of a resource required to service this request. Please review the following specific error details and modify your source code appropriately. Compiler Error Message: BC30289: Statement cannot appear within a method body. End of method assumed. Source Error: Line 67: #End ExternalSource Line 68: Line 69: Public Sub New() Line 70: MyBase.New Line 71: Dim dependencies As System.Collections.ArrayList Source File: C:\WINDOWS\Microsoft.NET\Framework\v1.1.4322\Temporary ASP.NET Files\root\61493785\e01aae32\ssallrlb.0.vb Line: 69 Tipo... tá dando erro em um arquivo .vb que o JASON criou, não EU!!! Nem tenho idéia de como arrumar. Segue meu código completo da página: <%@ Import namespace="System.Data" %> <%@ Import namespace="System.Data.OleDb" %> <%@ Page Language="VB" Debug="true" %> <% TERMINAL_ATRASADO("TA BELEM") TERMINAL_ATRASADO("TA OSORIO") %> <script runat=server> Function TERMINAL_ATRASADO(TERMINAL) Dim Conn As OleDbConnection Dim strCaminho As String = Server.MapPath("siscope.mdb") Conn = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & strCaminho & ";") Conn.Open() Dim sql As New OleDbCommand("SELECT TEMPO_AGORA, TEMPO_PREVISTO, PIER, NAVIO, NOR, TEMPO_SOBREESTADIA, CUSTO_SOBREESTADIA From Sobreestadia where TA="& chr(34)&terminal &chr(34)&" ORDER BY TEMPO_SOBREESTADIA DESC", Conn) Dim reader As OleDbDataReader = sql.ExecuteReader() dim PIER, qcar, nterm2, NAVIO as String dim TSOB, CSOB as double reader.Read() response.write("label") QCAR=LEN(TERMINAL) QCAR=QCAR - 3 NTERM2=MID(TERMINAL,4,QCAR) NAVIO = reader(3).ToString() PIER = reader(2).ToString() TSOB = reader(5)*24 CSOB = reader(6) response.write(nterm2 & "= Navio " & NAVIO & " atracado no pier " & PIER & " com tempo de sobreestadia de " & TSOB & " ao custo de " & CSOB & ".&") </script>
-
Falaê kuroi! Malz... Usei como exemplo somente, mas para desencargo de consciência verifiquei meu código e rodei uma página aspx com essa função sem espaço no nome da função. Deu o mesmo erro :( Server Error in '/' Application. -------------------------------------------------------------------------------- Compilation Error Description: An error occurred during the compilation of a resource required to service this request. Please review the following specific error details and modify your source code appropriately. Compiler Error Message: BC30289: Statement cannot appear within a method body. End of method assumed. Source Error: Line 16: Line 17: <% Line 18: function TERMINAL_ATRASADO(TERMINAL) Line 19: dim terminal = "TA OSORIO" Line 20: Dim sql As New OleDbCommand("SELECT TEMPO_AGORA, TEMPO_PREVISTO, PIER, NAVIO, NOR, TEMPO_SOBREESTADIA, CUSTO_SOBREESTADIA From Sobreestadia where TA="& chr(34)&terminal &chr(34)&" ORDER BY TEMPO_SOBREESTADIA DESC", Conn) Source File: E:\wwwroot\Transpetro\Gasoduto\sobreestadia\a01\processamento.aspx Line: 18 Lembrando que minhas funções funcionavam perfeitamente em asp. :/
-
Vlw galera! Esse é só um exemplo de função. Tenho várias funções de pesquisas em banco de dados, contas e etc... O meu maior problema é que ele reclama da linha Function. Segue o Erro: Server Error in '/' Application. -------------------------------------------------------------------------------- Compilation Error Description: An error occurred during the compilation of a resource required to service this request. Please review the following specific error details and modify your source code appropriately. Compiler Error Message: BC30289: Statement cannot appear within a method body. End of method assumed. Source Error: Line 16: Line 17: <% Line 18: function TERMINAL ATRASADO(TERMINAL) Line 19: dim terminal = "TA OSORIO" Line 20: Dim sql As New OleDbCommand("SELECT TEMPO_AGORA From Sobreestadia where TA="& chr(34)&terminal &chr(34)&" ORDER BY TEMPO_SOBREESTADIA DESC", Conn) Source File: E:\wwwroot\Transpetro\Gasoduto\sobreestadia\a01\processamento.aspx Line: 18
-
Mais problemas :( Eu usava muitas funções em ASP, por exemplo a seguinte: FUNCTION FORMATA_DATA_HORA(DATAHORA) if DATAHORA > 0 then valor = DATAHORA /24 dia = FormatNumber(valor,0) hora = valor - dia hora = hora * 24 if hora < 0 then dia = dia -1 hora = 24 + hora end if min = hora hora = FormatNumber(hora,0) min = min - hora min = 60 * min if min < 0 then hora = hora - 1 min = 60 + min end if min = FormatNumber (min,0) if min < 10 then min = "0"&min end if if dia >1 then response.write(dia&" dias") else if dia = 1 then response.write(dia&" dia") end if end if if hora>0 or min>0 then if dia>0 then response.write(", ") end if response.write(hora&":"&min&"h") else end if else response.write("ND") end if END FUNCTION Ela servia para me retornar a data formatada como "X dias, hh:mm" à partir de dias com decimais. Tem algum jeito de eu fazer assim na própria página aspx? como? se não tiver como, como deverei fazer? Abraços galera!
-
Blza! Consegui ler!
-
Vlw meu brother! Mais uma etapa avançada (Já estou começando a me lembrar das aulas de vb 6 da escola técnica... rs) mais uma coisa: Nessas funções, eu puxava os dados dos campos da tabela usando RS2.FIELDS(x).VALUE onde x é a posição do campo na minha query. Como puxo agora? Abração!!!
-
Fala galera! Estou penando aqui pra resolver essa questão da migração para asp.net. Como o tempo tá curto, estou mantendo em vb mas depois vou escrever em c#. Seguindo estou com um problema porque ele não aceita meu "set". A minha query era executada da seguinte forma: Set conn = Server.CreateObject("ADODB.Connection") conn.Open "DRIVER=Microsoft Excel Driver (*.xls); ReadOnly=1; DBQ=" & Server.MapPath("SISCOPE.xls") SQL2 = "SELECT [TEMPO AGORA] From [Plan1$] where TA='"&TERMINAL&"'ORDER BY [TEMPO DE SOBREESTADIA AGORA] DESC" Set rs2 = conn.Execute(SQL2) IF NOT RS2.EOF THEN 'FUNÇÕES END IF Cheguei no seguinte ponto: <%@ Import namespace="System.Data" %> <%@ Import namespace="System.Data.OleDb" %> <% Dim objConn As OleDbConnection Dim strCaminho As String = Server.MapPath("siscope1.mdb") objConn = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & strCaminho & ";") objConn.Open() Dim SQL2 As String = "SELECT [TEMPO AGORA] From [Plan1$] where TA='"&TERMINAL&"'ORDER BY [TEMPO DE SOBREESTADIA AGORA] DESC" Como consigo navegar pelos registros como em destacado em vermelho acima , já que o asp.net não aceita set??? (Compiler Error Message: BC30807: 'Let' and 'Set' assignment statements are no longer supported.)
-
Fala galera! Tenho um mc inserido no meu swf. Nesse mc, o primeiro frame tem um stop();. quero usá-lo como um botão, para que quando eu clique ele dê o play();. já tentei colocar uma action para esse botão mas eu clico e não aparece nada. como eu faço?
-
(Resolvido) Link perdido quando assume texto do asp
pergunta respondeu ao Douglas Zacharias de Douglas Zacharias em Flash & ActionScript
RESOLVIDO!!!!!!!! uma coisinha pequena, mas que fez toda a diferença: em vez de cxtexto01.text, colocquei cxtexto01.htmlText. Valeu pela galera que vem me ajudando!!! Abraços -
(Resolvido) Link perdido quando assume texto do asp
pergunta respondeu ao Douglas Zacharias de Douglas Zacharias em Flash & ActionScript
Falaê!!! esse vai no frame 0: loadVariables("processamento.asp", "_root", "POST"); no frame correspondente vai: cxtexto01.text=label01; sendo cxtexto01 a instância da minha cx de texto e label01 a variável em processamento.asp O estranho é que abrindo o arquivo asp o arquivo está ok, com os links funcionando perfeitamente. já no swf aparece as tags html como texto comum. :/ -
(Resolvido) Link perdido quando assume texto do asp
pergunta respondeu ao Douglas Zacharias de Douglas Zacharias em Flash & ActionScript
opa! consegui colocar aspas duplas. usei chr(34)!!! coloquei mas mesmo assim não funciona. o asp lê certinho mas quando o swf lê ele não entende as tags html e me retorna o código html. O texto que aparece é <a href="asdasda.htm">asdasdasd</a> porque isso? ah... e marquei "Render text as HTM" como você falou! -
(Resolvido) Link perdido quando assume texto do asp
pergunta respondeu ao Douglas Zacharias de Douglas Zacharias em Flash & ActionScript
valeu!!! mas tem duas coisinhas: como faço para retornar aspas duplas no asp? coloquei sem aspas e acontece que no texto aparece todo o código html. o texto ficou assim: <a href=blablabla.htm>dasjndajsdnaskj</a> se eu abrir o asp, os links funcionam perfeitamente, mas no swf nada de funcionar... ajuuudaaaa! hauahua vlw -
de nada! :D concordo... melhor o release. por isso deixei como opção na discriminação da função o release. Aí fica a critério do Rodrigo.
-
É importante saber se é em AS2 ou AS3. Vou fazer um exemplo em AS2: em actions do botão, digitar: on (press){ getURL("http://www.google.com.br","_self"); } em on(press){ o press indica que o evento ocorrerá quando você clicar no botão com o mouse. você pode alterar esse evento para release (o evento acontecerá quando você soltar o botão do mouse após clicar sobre o botão) entre outros. em getURL("http://www.google.com.br","_self"); existe o endereço, no caso o google e depois o método para chamar o link. _self vai abrir o google na própria página. se usasse _blank abriria em uma página nova. OK? Quaisquer dúvidas... Abraços
-
Como faço para esconder um botão. seria algo como visible=false? mas como?