Ir para conteúdo
Fórum Script Brasil

balduino

Membros
  • Total de itens

    29
  • Registro em

  • Última visita

Tudo que balduino postou

  1. balduino

    logout

    eu sempre uso o firefox, e nunca funcionava, por acaso testei no iexplorer e funcionou. o problema é com o firefox? como corrigir?
  2. balduino

    logout

    tem como chamar a pagina de logout quando o utilizador fechar a janela? é que na pag logout tem o codigo para alterar o status do utilizador no banco de dados já tentei o evento onunload ( <body onunload="document.href='logout.php'") ,mas não funciona helllllllllllllllllllllllllllllllp
  3. balduino

    executar função

    tem como executar uma função antes de fechar janela/aba do browser? ao fechar o browser todos os dados do session são destruidos, porem ao fechar uma aba(separador) esses dados continuam activos. o que quero é destruir esstes dados e forçar o utilizador a fazer login de novo
  4. balduino

    login

    eu estive analisando a opção de criar essa variavel no banco de dados, mas então surgiu uma questão importante. e se o utilizador fechar a janela sem antes fazer logout? não terei como alterar a variavel no banco de dados. então pensei em obter o endereço ip do computador em que fez o login e se tentar logar noutro computador os endereços serão comparados e então saberei que ele já esta logado noutro pc. queria vossa opinião quanto a isso. a função para obter o ip que usei é a seguinte function getRealIpAddr() { if (!empty($_SERVER['HTTP_CLIENT_IP'])) //check ip from share internet $ip=$_SERVER['HTTP_CLIENT_IP']; elseif (!empty($_SERVER['HTTP_X_FORWARDED_FOR'])) //to check ip is pass from proxy $ip=$_SERVER['HTTP_X_FORWARDED_FOR']; else $ip=$_SERVER['REMOTE_ADDR']; return $ip; }
  5. balduino

    login

    muito obrigado pessoal
  6. balduino

    login

    estou desenvolvendo um sistema de gestão documental onde é necessario se fazer o login o que quero saber é como fazer para impedir que um utilizador faça login diversas vezes em computadores diferentes
  7. eu pensava que para a função srand era necessario passar um argumento diferente do tipo null. não sera esse o problema
  8. balduino

    Constantes

    o problema é que em vez de estar sempre digitando por exemplo 3,1415926535 eu quero digitar pi e o programa tem de saber que se trata do valor 3,1415926535 como resolver isso
  9. balduino

    Constantes

    estou criando um codigo em que preciso de definir constantes de acordo com o valor passado pelo utilizador, mas da forma como tou fazendo gera erro porque o compilador não quer nenhuma variavel mas sim um valor private sub DefConst(val as double) const var as double = val ' se fizer deste modo gera erro const var as double = 3.14 'assim já funciona end sub heeeeeeeeeeelp
  10. balduino

    Conversao Ii

    #include<stdio.h> #include<stdlib.h> void main() { long int dec,n=0,total_e,i=0; int temp[20],bin[20]; printf("numero decimal: "); scanf("%ld",&dec); fflush(stdin); if(dec<0) return; if(dec==0) { printf("numero binario: 0\n"); system("pause"); return; } printf("numero binario: "); while(dec>0) { temp[i++]=dec%2; dec=dec/2; } total_e=i; while(n<total_e) { bin[n]=temp[--i]; printf("%d",bin[n]); n++; } printf("\n"); system("pause"); }
  11. rem função para alterar a imagem de um directorio vista em miniatura Public sub FolderImg(LocImg As String, DestImg As String, DelIfExist As Boolean) Dim YN As VbMsgBoxResult On Error GoTo error Set fso = New FileSystemObject DestImg = DestImg & "\Folder.jpg" If (DelIfExist = True) Then If (fso.FileExists(DestImg)) Then SetAttr DestImg, vbNormal Kill DestImg End If GoTo img ElseIf (DelIfExist = False) Then If (fso.FileExists(DestImg)) Then YN = MsgBox("Já existe um ficheiro com esse nome no directório especificado." & vbLf & _ "Deseja eliminar a imagem existente e prosseguir?", vbYesNo) If (YN = vbNo) Then Exit Function ElseIf (YN = vbYes) Then SetAttr DestImg, vbNormal Kill DestImg GoTo img End If End If End If fso.CopyFile LocImg, DestImg SetAttr DestImg, vbHidden + vbSystem error: End sub rem função para alterar a imagem do desktop Public sub AlterarDesktop(DesktopImg As String, ImgPos As String, mosaico As String) On Error GoTo error Set reg = New Registry k_root = HKEY_CURRENT_USER k_name = "Control Panel\Desktop" reg.UpdateKey k_root, k_name, "Wallpaper", DesktopImg reg.UpdateKey k_root, k_name, "WallpaperStyle", ImgPos reg.UpdateKey k_root, k_name, "TileWallpaper", mosaico SystemParametersInfo 20, 0, DesktopImg, 0 error: End sub rem espero que gostem
  12. balduino

    Mcistring

    valeu + 1a vez
  13. balduino

    Icone

    valeu na mesma, obrigado
  14. balduino

    Icone

    o meu codigo é assim [.ShellClassInfo] IconFile=C:\meus icones\4036.ico IconIndex=0 [ExtShellFolderViews] {BE098140-A513-11D0-A3A4-00C04FD706EC}= {BE098140-A513-11D0-A3A4-00C04FD706EC} [{BE098140-A513-11D0-A3A4-00C04FD706EC}] IconArea_Image=C:\Documents and Settings\user\Os meus documentos\As minhas imagens\orion.jpg
  15. balduino

    Icone

    o codigo que eu usei é o seguinte e não funciona. o que tem de errado com ele [.ShellClassInfo] IconFile=localizaçao\ficheiro.ico IconIndex=0 [ExtShellFolderViews] {BE098140-A513-11D0-A3A4-00C04FD706EC}= {BE098140-A513-11D0-A3A4-00C04FD706EC} [{BE098140-A513-11D0-A3A4-00C04FD706EC}] IconArea_Image=localizaçao\imagem.jpg
  16. balduino

    Display.h

    oi galera, tem alguém ai que possa me dizer aonde posso encontrar ajuda sobre como usar as funçoes da biblioteca display.h
  17. valeu pessoal mas mais uma questao sobre o assunto: como faço para obter a dia ,o mês e o ano separadamente
  18. balduino

    Hibernar

    oi galera, alguém podia me mostrar que api devo usar para desligar, reiniciar e hibernar o sistema
  19. o link que voce me indicou não esta funcionando da pra voce mostrar a hiperligação de novo
  20. oi pessoal, alguém podia me ensinar como faço para obter a data e hora do sistema
  21. balduino

    Ficheiros Binarios

    "Mas o mais importante é voce saber a estrutura do arquivo .dat" sera que da pra explicar essa parte da estrutura
  22. como é que eu faço para escrever e ler de um ficheiro *.dat
  23. balduino

    Listview

    eu fiz um programa de armazenamento de registos em que as datas exstentes no listview também se encontram num combo box "cbo_data" e ao clicar num registo do cbo_data o seu equivalente é selecionado no list view Private Sub cbo_data_Click() Dim i As Integer For i = 1 To lst_reg(6).ListItems.Count If (lst_reg(6).ListItems(i).ListSubItems(1).Text = cbo_data.Text) Then lst_reg(6).ListItems(i).Selected = True lst_reg(6).SetFocus End If Next End Sub o problema é que tendo muitos registos se o registo em causa for dos ultimos o registo so é visto deslocando a barra de rolagem como fazer isso automaticamente
  24. é assim tão simples Shell "Graymalkin muito_obrigado", vbMaximizedFocus
×
×
  • Criar Novo...