Ir para conteúdo
Fórum Script Brasil

cwarez

Membros
  • Total de itens

    153
  • Registro em

  • Última visita

Sobre cwarez

  • Data de Nascimento 25/12/1992

Contatos

  • MSN
    mateus@centralwarez.com
  • Website URL
    http://www.centralwarez.com/
  • ICQ
    0

Perfil

  • Location
    Espirito Santo

cwarez's Achievements

0

Reputação

  1. Pelo o que eu entendi, você não quer comparar. Você quer filtrar as datas em que o aluno faltou, certo?
  2. Em primeiro lugar, este tópico não é relacionado a PHP Em segundo lugar, não entendi sua pergunta.... Mas, tente algo assim: <a href="editar.php?id=' . $row['id'] . '" class="btn btn-warning">Enviar</a>
  3. Se é pra saber só se tem registro ou não, use o LIMIT 1
  4. os valores das combobox Morada, codigo posta, e localidade. Eles são preenchidos dinamicamente? ou fixo no código? Usa um jquery ai
  5. posta aí o conteudo do arquivo funcoes.php
  6. Queria saber se é possível passar uma @Fomula como um link para outro command. Pois eu faço a conta toda pelo Crystal através de uma @Formula. dai com o resultado eu faço uma consulta em outra tabela. Será que tem alguma manha pra fazer isso? será que eu consigo criar um parametro do command e alimentar ele pelo codigo? valeoo
  7. Fala galerinha, tudo certo? vamos la.... vou começar do zero tenho uma <div> escondida na pagina, dai quando eu clico no link #nomedadiv ela abre em uma modal... até ai tudo bem. esta modal ela é um formulario de cadastro, para cadastrar tudo segue normal. o problema esta é na hora de EDITAR o cadastro.... se fosse uma popup eu chamaria assim pagina.php?id=ID , dai eu fazia uma consulta no topo e botar os ECHOS em cada INPUT. só que não consigo passar o parametro, então o que eu fiz? simplesmente coloquei um campo ID do tipo HIDDEN dentro da modal, isto funciona, so que tenho que trabalhar outra forma para aparecer os dados já pre-digitados nos devidos inputs. o que eu fiz? no link de EDITAR eu coloquei no evento ONCLICK uma funcao javascript ONCLICK="copiadados(valor1, valor2, valor3, valor4)" function editarPlano(ivalor1, valor2, valor3, valor4) { document.getElementById('DIV TAL1').value = valor; document.getElementById('DIV TAL2').value = valor; document.getElementById('DIV TAL3').value = valor; document.getElementById('DIV TAL4').value = valor; } até ai tudo bem, esta foi a gambiarra que arrumei para resolver meu problema. só que agora o bicho pegou! porque? porque o VALOR4 é um MENU SELECT qual o problema? nenhum....ele realmente aparece CHECKADO, porem não aparece como TEXT...viajem ne? aparece la o primeiro option mas quando você lista o valor certo esta marcado. Oque posso fazeR?
  8. pessoal, tenho este código abaixo que é o UPDATE do meu programa ele lista os arquivos do ftp e copia para a maquina. só que o problema é q ele copia tambem as subpastas, e isso faz com que a atualização de erro. por favor, alguém me da uma ideia de como alterar o codigo para que ele não copie as subpastas, copiar somente os arquivos da raiz. obrigado segue o codigo: Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick 'return a simple list of filenames in directory Timer1.Stop() Try ProgressBar1.Value = 25 Dim buffer(20000000) As Byte Dim read As Integer = 0 Dim i As Integer Dim FileNames As String Dim Aux As String Dim ftp As FtpWebRequest = CType(FtpWebRequest.Create("ftp://SSA-RS-ACF01/"), FtpWebRequest) 'CaminhoAplicacao.Text = Application.ExecutablePath.Replace("SGR_Update.EXE", "") CaminhoAplicacao.Text = Application.ExecutablePath.Remove(Application.ExecutablePath.Length - 14, 14) 'CaminhoAplicacao.Text = "C:\DADOS\Teste\" '' read de files at ftp folder ftp.Method = Net.WebRequestMethods.Ftp.ListDirectory Dim sr As New StreamReader(ftp.GetResponse.GetResponseStream()) FileNames = sr.ReadToEnd() FTPFiles.Text = "Arquivos encontrados ..." & vbCrLf & FileNames Me.Update() FileNames = FileNames.Replace(vbCrLf, "|") FTPFiles.Text = FTPFiles.Text & vbCrLf & vbCrLf & "Copiando arquivos..." & vbCrLf ftp = Nothing StatusUpdate.Text = "Baixando arquivos." Me.Update() For i = 0 To FileNames.Split("|").Count - 2 FTPFiles.Text = FTPFiles.Text & vbCrLf & FileNames.Split("|")(i) Aux = CaminhoAplicacao.Text & FileNames.Split("|")(i) ProgressBar1.Value = i * 100 / (FileNames.Split("|").Count - 2) Dim targetFI = New FileInfo(Aux) Dim ftp2 As FtpWebRequest = CType(FtpWebRequest.Create("ftp://SSA-RS-ACF01/SGR/" & FileNames.Split("|")(i)), FtpWebRequest) ftp2.Method = Net.WebRequestMethods.Ftp.DownloadFile ftp2.UseBinary = True Using response As FtpWebResponse = CType(ftp2.GetResponse, FtpWebResponse) Using responseStream As Stream = response.GetResponseStream Using fs As FileStream = targetFI.OpenWrite 'Try Do read = responseStream.Read(buffer, 0, buffer.Length) fs.Write(buffer, 0, read) Loop Until read = 0 responseStream.Close() fs.Flush() fs.Close() 'Catch ex As Exception ' 'catch error and delete file only partially downloaded ' fs.Close() ' 'delete target file as it's incomplete ' targetFI.Delete() ' Throw 'End Try End Using responseStream.Close() End Using response.Close() End Using FTPFiles.Text = FTPFiles.Text & vbCrLf & targetFI.ToString() Me.Update() 'targetFI = Nothing Next StatusUpdate.Text = "Atualização concluída." Timer2.Interval = 5000 Timer2.Start() Catch ex As Exception If MsgBox("Não foi possível atualizar a versão do SGR. Deseja continuar com a versão antiga?", MsgBoxStyle.YesNo, "Erro") = MsgBoxResult.Yes Then Process.Start(CaminhoAplicacao.Text & "SGR.EXE") End If Me.Close() End Try
  9. Pessoal Tenho um data grid chamado OSGrid preciso pegar cada celula dela e adicionar ' %, ' no final de cada celular e salvar para a area de transferencia Exemplo: OSGrid 20000 5858 548454 10000 2458 545454 40000 5858 548454 76000 2458 545454 Dai clicar no botao copiar e ir para o clipboard assim: 20000%, 2458% Fix o seguinte codigo e não tive sucesso Dim QtdRows As Integer = OSGrid.SelectedCells.Count Dim OsCopy(QtdRows) As String Dim Copiados As String = Nothing Dim i As Integer = 0 'vamos obter as células selecionadas no DataGridView Dim selecionadas As DataGridViewSelectedCellCollection selecionadas = OSGrid.SelectedCells 'vamos percorrer as células selecionadas While i < selecionadas.Count Dim celula As DataGridViewCell = selecionadas(i) Dim linha As Integer = celula.RowIndex Dim coluna As Integer = celula.ColumnIndex 'armazena as celulas selecionadas no array OsCopy If celula.Value <> Nothing Then OsCopy(i) = OSGrid.Rows(linha).Cells(coluna).Value Copiados = Copiados & OsCopy(i) & "%," End If i = i + 1 End While 'retira a ultima virgula e 'copia para Area de Transferencia Clipboard.Clear() Clipboard.SetText(Mid(Copiados, 1, Len(Copiados) - 1))
  10. infelizmente aconteceu :( agora tenho que comprar um netbook samsung np-n140 sabe aonde vende? :(
  11. valeu man, muito obrigado mas, vocês não sabem da maior......... roubaram o net do cliente aqui em casa :s serve de lição pra galera Cuidado com quem vocês colocam dentro de casa! valeu galeraa e nois
  12. galera, não sei se é bem aqui q tenho q perguntar...mas vamos la eu ganhei um netbook da samsung n140, instalei o windows 7 mas não consigo encontrar o idioma certo do meu teclado já tentei de tudo ingles internacional... já tentei tudoo meu teclado é assim: no 2, ao invez de @ tem " não tem Ç, e embaixo do ESC tem ¬ ' | alguém que tenha um net samsung n series, pode me ajudar? valeu
  13. Faça o agendamento do download do arquivo http://ftp.de.debian.org/debian/pool/main/...ty_1.3.12-6.dsc para as 23:00 de hoje (dica: use o comando wget) . Após o término do download, a máquina deverá ser desligada. to tentando fazer assim: crontab -e 00 23 22 6 4 mateus wget -c http://ftp.de.debian.org/debian/pool/main/...ty_1.3.12-6.dsc não deu, alguém me ajuda ae no erro?
  14. ta tenso, ate agora nada de conseguir =/
×
×
  • Criar Novo...