Ajuda com verificação em db

    A.J
    By A.J,

    Olá, estou com um impasse

    como posso/devo realizar de maneira correta a verificação de que se um usuário já estiver cadastrado no db eu não conseguir cadastrar outro

    meu code para registrar: como posso adptar?

      Private Sub kRegistraUsuario()
            Using con As OleDbConnection = GetConection()
                Try
                    con.Open()
                    Dim sql As String = "INSERT INTO tbl_Kan (Usuario,Senha,Perfil) VALUES (?,?,?)"
                    Dim cmd As OleDbCommand = New OleDbCommand(sql, con)
    
                    cmd.Parameters.Add(New OleDb.OleDbParameter("@Usuario", txbUsuario.Text))
                    cmd.Parameters.Add(New OleDb.OleDbParameter("@Senha", txbSenha.Text))
                    cmd.Parameters.Add(New OleDb.OleDbParameter("@Perfil", cmbPerfil.Text))
                    cmd.ExecuteNonQuery()
                    MsgBox("Usuário cadastrado no sistema com sucesso!", MsgBoxStyle.Information, "Informativo")
                Catch ex As Exception
                    MsgBox(ex.Message)
                Finally
                    con.Close()
                End Try
            End Using
        End Sub

    Agradeço desde já!

    att 'A.J

    • 0 replies

    Re: Nmap de IP externo

    apocsantos
    By apocsantos,

    Boa noite,

    Aproveita e dá uma olhada em "Router Punch-thru", que te vai ajudar a fazer o que pretendes.

    Cordiais cumprimentos,

    Apocsantos

    • 3 replies

    Re: Apagar ficheiro em FTP com data de criação x dias, download de ficheiro e sua descompactar

    apocsantos
    By apocsantos,

    Boa noite,

    Creio que por esse caminho não seja assim tão fácil de conseguir. Cheguei a experimentar e optei por comprar um componente para o fazer, para não estar a perder tempo a escrever um cliente FTP para executar comandos FTP no servidor.

    De qualquer das formas fica aqui um exemplo de um cliente FTP:

    'Baseado em codigo de um livro'
    Imports System.Net.Sockets
    
    Private Function enviaCommando (_
      ipAddress As String, ipPort As Integer, _
      ftpUser As String, ftpPassword As String, _
      CommandoDeFTP as String) As Boolean
    
      enviaCommando = False
      
      Try
        Dim tcpClient As New TcpClient()
        tcpClient.Connect(ipAddress, ipPort)
        Flush(tcpClient) 'limpa a porcaria do welcome do servidor'
    
        Dim response As String = transmiteCommando(tcpClient, "utilizador " & ftpUser)
        If response.IndexOf("331") >= 0 Then
          response = transmiteCommando(tcpClient, "password " & ftpPassword)
          If response.IndexOf("230") >= 0 Then
            response = transmiteCommando(tcpClient, CommandoDeFTP)
            If response.IndexOf("200") >= 0 Then
              enviaCommando = True
            End If
          End If
        End If
        tcpClient.Close()
    
      Catch ex As Exception
        MsgBox("Erro: " & ex.Message)
      End Try
    
    End Function
      
    Private Function transmiteCommando(ByVal tcpClient As TcpClient, ByVal cmd As String) As String
    
      transmiteCommando = ""
      Try
        Dim networkStream As System.Net.Sockets.NetworkStream = tcpClient.GetStream()
        If networkStream.CanWrite And networkStream.CanRead Then
          Dim sendBytes As [Byte]() = System.Text.Encoding.ASCII.GetBytes(cmd & vbCrLf)
          networkStream.Write(sendBytes, 0, sendBytes.Length)
          Dim oReader As New System.IO.StreamReader(networkStream)
          transmiteCommando = oReader.ReadLine()
        End If
      Catch ex As Exception
        MsgBox("Erro: " & ex.Message)
      End Try
    
    End Function
    
    Private Sub Flush(ByVal tcpClient As TcpClient) 
    
      Try
    
        Dim networkStream As System.Net.Sockets.NetworkStream = tcpClient.GetStream()
        If networkStream.CanWrite And networkStream.CanRead Then
          Dim recvBytes(tcpClient.ReceiveBufferSize) As Byte
          networkStream.ReadTimeout = 10000
          networkStream.Read(recvBytes, 0, CInt(tcpClient.ReceiveBufferSize))
          Dim returnData As String = System.Text.Encoding.ASCII.GetString(recvBytes)
        End If
    
      Catch ex As Exception
    
      End Try
    
    End Sub
    
    private sub apagaZips()
    	Try
    		enviaCommando ("127.0.0.1", 20, "utilizador", "password", "rm -rf *.zip")
    	Catch ex As Exeption
    End Sub

    Cordiais cumprimentos,

    Apocsantos

    • 3 replies

    Re: Nmap de IP externo

    Anonymouskiller
    By Anonymouskiller,

    Sim, sao para fins meramente de aprendizagem. Irei estudar entao esse protocolo.

     

    Obrigado apocsantos

    • 3 replies

    Página simples responsiva

    oamador
    By oamador,

    Boas pessoal,

    Estive a tentar criar uma página simples apenas informativa com umas imagens e texto,

    O resultado foi este http://websportstv.orgfree.com/outro/responsive-full-background-image-demo.html

    Mas no telemóvel em vertical o background não preenche tudo, no tablet já preenche.

    Alguém me pode dar uma ajuda a finalizar isto?

    Cumprimentos.

    • 0 replies

    Re: Apagar ficheiro em FTP com data de criação x dias, download de ficheiro e sua descompactar

    gastao
    By gastao,

      tou a colocar o seguinte codigo e nao me apaga nada no ftp alguem me consegue dar uma ajuda sff

       Dim FTPRequest As System.Net.FtpWebRequest = DirectCast(System.Net.WebRequest.Create("ftp://127.0.0.1/*.zip"), System.Net.FtpWebRequest)
       FTPRequest.Credentials = New System.Net.NetworkCredential("username", "password")
       FTPRequest.Method = System.Net.WebRequestMethods.Ftp.DeleteFile

     

    • 3 replies

    Re: Passar várias linhas para uma só

    Rui Carlos
    By Rui Carlos,

    Isso pode ser feito com um join da tabela com ela própria.  Algo deste género:

    select a.id, a.username, a.userlevel,
            a.name_image as name_image_profile,
            b.name_image as name_image_header
    from t as a inner join t as b
    	on a.id = b.id
    where a.location = 'profile' and b.location = 'header';

    Isto assume que as linhas aparecem sempre aos pares.  As que não tiverem par, não irão aparecer no resultado final.  Se quiseres incluir todas as entradas, precisas de um full outer join em vez de um inner join.  (O full outer join não é suportado nativamente pelo MySQL, mas pode ser implementado com uma union de um left join com um right join.)

    (Possivelmente essa tabela também precisava aí de uma normalização :).)

    • 1 reply

    Re: Temporizador em python

    Rui Carlos
    By Rui Carlos,

    Em Python o while pode ter else.  O problema não deveria ser esse.

    • 19 replies

    Re: Temporizador em python

    simbamix
    By simbamix,

    Por acaso ao escrever agora, fiquei parvo comigo mesmo, obrigado na mesma xD

    • 19 replies

    Re: Temporizador em python

    M6
    By M6,

    Ah, está desvendado o mistério. O While não tem Else, isso é do If.

    O While é um ciclo que executa o código interno do mesmo enquanto a condição é verdadeira. Quando a condição é falsa, sai do ciclo.
    Vê aqui: https://wiki.python.org/moin/WhileLoop

    • 19 replies

    Re: Temporizador em python

    simbamix
    By simbamix,

    Ou seja, ele chega a esta parte do código, e faz um temporizador: 

    tempoo = int(sys.argv[2])
    t_end = time.time() + tempoo

    Depois, vai para uma classe, que está a dizer: while time.time() < t_end:

    quando o tempo acabar ele vai para o else:

     sys.exit(0)

    Estarei a fazer algo de errado? O while usa-se com o else? 

    • 19 replies

    Re: Temporizador em python

    M6
    By M6,

    Eu diria que tens um erro de lógica nesse código ou então o programa está à espera de algo externo (e.g. ligação http).

    Coloca uns prints com os valores da variáreis para verificar se efetivamente estás a obter os valores que estavas à espera. Pode estar a dar-se o caso de que o código nunca chega ao exit().

    • 19 replies

    Re: Temporizador em python

    simbamix
    By simbamix,

    Quando executo o código ele fica aberto e não fecha, ficando com a ultima mensagem dada no ecrã 

    • 19 replies

    Re: Temporizador em python

    M6
    By M6,

    Não sei se percebi bem.
    Quando executas o código através de linha de comando ele fecha?
     

    • 19 replies

    Re: Temporizador em python

    simbamix
    By simbamix,

    Sim, já testei tudo e funciona corretamente, é so mesmo a parte do fechar

    • 19 replies

    Re: Temporizador em python

    Bernardo Vieira
    By Bernardo Vieira,

    Então estás a fazer um bom uso (só perguntei porque por vezes, algumas pessoas usam de forma incorreta)

    E já tentaste executar só o código python ? Se recebe variáveis, enviar para lá uns valores aleatórios, que funcionem.
    PS. não sei exatamente como funciona, mas não terás de retornar uma variável para php ? Talvez por tentares fechar assim é que não funciona. Não sei :/ Provavelmente o código python pára mas o php não sabe o que fazer!

    • 19 replies

    Re: Temporizador em python

    simbamix
    By simbamix,

    Essa parte do código está numa classe, e há muito código pela frente 

    Já tentei muitas coisas mas o programa não quer fechar :/

    • 19 replies

    Re: Temporizador em python

    Bernardo Vieira
    By Bernardo Vieira,

    Sim, eu percebo que fecha sozinho e percebo também a preocupação com os recursos (é importante) mas existe possibilidade de fechar logo a seguir a esse "if:else" ou ainda existe muito código pela frente ? No caso de isso ser tio uma classe que está a iniciar conexão á base de dados ou assim, será necessário esse "exit", mas se o programa fechar poucas linhas, então não é necessário.

    • 19 replies

    Re: Temporizador em python

    simbamix
    By simbamix,

    O script python vai ser executado pelo php, e sendo que ele terá de fechar sozinho, ou consumirá mais recursos... penso eu

    • 19 replies

    Re: Temporizador em python

    Bernardo Vieira
    By Bernardo Vieira,

    Não entendi o que disseste acima mas, não tens forma de sair do programa sem forçar um "exit" ?

    • 19 replies

  1. Load more activity
Portal by DevFuse · Based on IP.Board Portal by IPS