Ver Feed RSS

nalvo

NetCob - Sistema de gerenciamento de provedores com recursos de rede - Interação Mikrotik

Avalie este Post de Blog
Bom dia a todos.

Estou disponibilizando o meu sistema de gerenciamento de clientes e rede que desenvolvi para a minha empresa e agora estarei vendendo aos que necessitam de um sistema eficiente para controle de clientes, financeiro, com recursos para inserir informações o cliente no mikrotik.

Baixem a copia demo, e testem.

Estou aberto a opiniões e questionamentos.

http://www.4shared.com/rar/Rk9jP9we/NetCob.html


Att,

Nalvo
NAVINET TECNOLOGIA
Clique na imagem para uma versão maior

Nome:	         netcontrol5.jpg
Visualizações:	1337
Tamanho: 	28,4 KB
ID:      	36177Clique na imagem para uma versão maior

Nome:	         netcontrol6.jpg
Visualizações:	1160
Tamanho: 	47,7 KB
ID:      	36178Clique na imagem para uma versão maior

Nome:	         netcontrol8.jpg
Visualizações:	1159
Tamanho: 	67,2 KB
ID:      	36179Clique na imagem para uma versão maior

Nome:	         netcontrol10.jpg
Visualizações:	1098
Tamanho: 	55,4 KB
ID:      	36180Clique na imagem para uma versão maior

Nome:	         netcontrol9.jpg
Visualizações:	987
Tamanho: 	63,4 KB
ID:      	36181
Categorias
Não Categorizado

Comentários

  1. Avatar de 4CJINFOR
    amigo qual a senha pra teste ??
    Ele ja esta sendo executado aqui ;
    caique.4cj@hotmail.com
  2. Avatar de nalvo
    Saudações amigos,
    Usuario: ADMIN
    Senha: 1234
    No sistema, no menu configurações é possivel adicionar novos usuarios, adicionar servidores aos quais o programa terá acesso.

    Qualquer coisa: nalvoje@hotmail.com
  3. Avatar de GivigiRJ
    por qto vc pretende vender o sistema?
  4. Avatar de nalvo
    Valor: R$ 350,00
    Sem custos de manutenção e atualizações gratuitas por 01 ano.
    O sistema esta em constante evolução, e estarei enviando a todos os que adiquirirem as novas versões sem custos adicionais.
  5. Avatar de clicknet
    Amigo se você pretende comercializa-lo deve saber que nem todos usa a mesma configuração de tela, por exemplo na minha configuração nao deu certo, outro detalhe deve flexibilizar o caminho do banco de dabos pois nem todos tem o disco C:, sou programador em delphi tambem... por isso tou de contribuindo com este codigo para seu sistema,

    procedure TFrmPrincipal.FormCreate(Sender: TObject);
    var
    ArquivoIni: TStringList;
    CaminhoDoAplicativo: String;
    begin
    ArquivoIni := TStringList.Create;
    CaminhoDoAplicativo := ExtractFilePath(Application.ExeName);

    try
    if not FileExists(CaminhoDoAplicativo + 'iSComercio.ini') then //Se Arquivo de Inicialização do Aplicativo não existir cria um com o nome
    begin
    ArquivoIni.Add('PATH=' + CaminhoDoAplicativo + 'Base\Dados.mdb'); // Caminho da Base de Dados Padrão
    ArquivoIni.SaveToFile(CaminhoDoAplicativo + 'iSComercio.ini');
    end;


    ArquivoIni.LoadFromFile(CaminhoDoAplicativo + 'iSComercio.ini'); //Se o arquivo existir


    if not FileExists(ArquivoIni.Values['PATH']) then
    begin
    Application.MessageBox('Não foi possível localizar a Base de Dados.','iSComercio', 48);
    if OpenDialog1.Execute then
    begin
    ArquivoIni.Values['PATH'] := OpenDialog1.FileName;
    ArquivoIni.SaveToFile(CaminhoDoAplicativo + 'iSComercio.ini');
    end
    else
    FatalAppExit(0, 'Erro de conexão à Base de Dados.');
    end;


    if FileExists(ArquivoIni.Values['PATH']) then
    begin
    ADOConnection1.Close;
    ADOConnection1.ConnectionString := 'Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source='
    + ArquivoIni.Values['PATH']
    + ';Mode=Share Deny None;Extended Properties="";Persist Security Info=False;'
    + 'Jet OLEDB:System database="";Jet OLEDB:Registry Path="";Jet OLEDBatabase Password=MAGIC;'
    + 'Jet OLEDB:Engine Type=5;Jet OLEDBatabase Locking Mode=1;Jet OLEDB:Global Partial Bulk Ops=2;'
    + 'Jet OLEDB:Global Bulk Transactions=1;Jet OLEDB:New Database Password="";'
    + 'Jet OLEDB:Create System Database=False;Jet OLEDB:Encrypt Database=False;'
    + 'Jet OLEDB:Compact Without Replica Repair=False;'
    + 'Jet OLEDB:SFP=False';
    ADOConnection1.Open;

    end
    else
    FatalAppExit(0, 'Erro de conexão à Base de Dados.');
    finally
    ArquivoIni.Free;
    end;
    end;
  6. Avatar de clicknet
    Onde tem essa carinha é um ": D" Sem o espaço no meio e onde tem Password=MAGIC, você coloca sua senha no lugar de MAGIC..
  7. Avatar de clicknet
    Vi que seu banco de dados não tem senha já é uma vulnerabilidade pois quem quiser pode pegar teu arquivo MDB e acessar todos teus servidores, bastaria abrir o aquivo pelo Access, ir na Tabela Servidor, lá tem o IP, a Porta, o Nome de Usuário, e a Senha em texto puro.. Na Tabela Usuários Tambem tem o nome de usuário e a senha.. Nesse caso pode-se adaptar-se o código fonte acima, onde tem Password=MAGIC; vc bota Password=;
  8. Avatar de clicknet
    Não quero aqui apontar os Defeitos de seu sistema, mas contribuir, por isso vai mais uma diga, cria uma função para criar o campo cod, pois em rede o AutoInc não é recomendado em ADO...
  9. Avatar de nalvo
    Citação Postado originalmente por GivigiRJ
    por qto vc pretende vender o sistema?
    350,00
  10. Avatar de nalvo
    Citação Postado originalmente por clicknet
    Amigo se você pretende comercializa-lo deve saber que nem todos usa a mesma configuração de tela, por exemplo na minha configuração nao deu certo, outro detalhe deve flexibilizar o caminho do banco de dabos pois nem todos tem o disco C:, sou programador em delphi tambem... por isso tou de contribuindo com este codigo para seu sistema,

    procedure TFrmPrincipal.FormCreate(Sender: TObject);
    var
    ArquivoIni: TStringList;
    CaminhoDoAplicativo: String;
    begin
    ArquivoIni := TStringList.Create;
    CaminhoDoAplicativo := ExtractFilePath(Application.ExeName);

    try
    if not FileExists(CaminhoDoAplicativo + 'iSComercio.ini') then //Se Arquivo de Inicialização do Aplicativo não existir cria um com o nome
    begin
    ArquivoIni.Add('PATH=' + CaminhoDoAplicativo + 'Base\Dados.mdb'); // Caminho da Base de Dados Padrão
    ArquivoIni.SaveToFile(CaminhoDoAplicativo + 'iSComercio.ini');
    end;


    ArquivoIni.LoadFromFile(CaminhoDoAplicativo + 'iSComercio.ini'); //Se o arquivo existir


    if not FileExists(ArquivoIni.Values['PATH']) then
    begin
    Application.MessageBox('Não foi possível localizar a Base de Dados.','iSComercio', 48);
    if OpenDialog1.Execute then
    begin
    ArquivoIni.Values['PATH'] := OpenDialog1.FileName;
    ArquivoIni.SaveToFile(CaminhoDoAplicativo + 'iSComercio.ini');
    end
    else
    FatalAppExit(0, 'Erro de conexão à Base de Dados.');
    end;


    if FileExists(ArquivoIni.Values['PATH']) then
    begin
    ADOConnection1.Close;
    ADOConnection1.ConnectionString := 'Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source='
    + ArquivoIni.Values['PATH']
    + ';Mode=Share Deny None;Extended Properties="";Persist Security Info=False;'
    + 'Jet OLEDB:System database="";Jet OLEDB:Registry Path="";Jet OLEDBatabase Password=MAGIC;'
    + 'Jet OLEDB:Engine Type=5;Jet OLEDBatabase Locking Mode=1;Jet OLEDB:Global Partial Bulk Ops=2;'
    + 'Jet OLEDB:Global Bulk Transactions=1;Jet OLEDB:New Database Password="";'
    + 'Jet OLEDB:Create System Database=False;Jet OLEDB:Encrypt Database=False;'
    + 'Jet OLEDB:Compact Without Replica Repair=False;'
    + 'Jet OLEDB:SFP=False';
    ADOConnection1.Open;

    end
    else
    FatalAppExit(0, 'Erro de conexão à Base de Dados.');
    finally
    ArquivoIni.Free;
    end;
    end;

    bom dia amigo,

    O programa já faz isso, dentro da pasta do mesmo tem um arquivo TXT onde o usuario pode definir o caminho do banco de dados, sendo possivel faze-lo rodar em rede...

    Com relação a Tela, realmente, estou fazendo algumas modificações aqui para que ele se encaixe melhor com qualquer resolução definida.

    Att,

    Nalvo
  11. Avatar de clicknet
    Ficou a dica, da forma que você ta expondo os dados, não é seguro. Se alguém alterar incorretamente lá aquele arquivo txt, de alguma forma a base de dados não vai abrir, o código que lhe passei caso o programa não ache o arquivo mdb, abri-se uma caixa de dialogo para que o usuário aponte para o arquivo mdb...


    Quanto à segurança das senhas, não há nenhuma pois qualquer pessoa pode copiar todas as senhas dos servidores mikrotik... Bastando abrir o arquivo Banco.mdb no access e acessar a tabela Servidor.
  12. Avatar de nalvo
    Citação Postado originalmente por 4CJINFOR
    amigo qual a senha pra teste ??
    Ele ja esta sendo executado aqui ;
    caique.4cj@hotmail.com
    Usuario: ADMIN
    Senha: 1234
  13. Avatar de nalvo
    Citação Postado originalmente por GivigiRJ
    por qto vc pretende vender o sistema?
    350,00 sem taxa de manutenção.
  14. Avatar de nalvo
    Citação Postado originalmente por clicknet
    Ficou a dica, da forma que você ta expondo os dados, não é seguro. Se alguém alterar incorretamente lá aquele arquivo txt, de alguma forma a base de dados não vai abrir, o código que lhe passei caso o programa não ache o arquivo mdb, abri-se uma caixa de dialogo para que o usuário aponte para o arquivo mdb...


    Quanto à segurança das senhas, não há nenhuma pois qualquer pessoa pode copiar todas as senhas dos servidores mikrotik... Bastando abrir o arquivo Banco.mdb no access e acessar a tabela Servidor.
    Obrigado pelas dicas pessoal...
    Essa é uma copia DEMO, todas essas alterações eu ja fiz no sistema aqui, estarei postando nova copia de demonstração para apreciação de todos.

    O sistema encontra-se em constante evolução....
  15. Avatar de Acronimo
    o problema é, vende-se, compras-se na hora de suporte some-se

    nao desmerecendo vc o desenvolveu para sua empresa, otimo, louvavel, mas vender um produto sem uma base para quando der os primeiros problemas ter um suporte rapido e eficiente, fica complicado, isso da para provedores de pequena escala, provedores com grande escala fica complicado né
  16. Avatar de Genis
    Citação Postado originalmente por Acronimo
    o problema é, vende-se, compras-se na hora de suporte some-se

    nao desmerecendo vc o desenvolveu para sua empresa, otimo, louvavel, mas vender um produto sem uma base para quando der os primeiros problemas ter um suporte rapido e eficiente, fica complicado, isso da para provedores de pequena escala, provedores com grande escala fica complicado né
    mais lembrando que para provedores de maior porte, eles nem deve pegar programa barato deve ir direto em um bom e que ja esta no mercado a muito mais tempo.
  17. Avatar de davigava
    Amigo Como faço a integração com mikrotik?
  18. Avatar de Poemander
    Amigo, quais as limitações da versão demo do seu programa?
  19. Avatar de ab5x2
    Link quebrado! É Open-Source?
  20. Avatar de hanork
    link off
  21. Avatar de linuxbhz
    link off vai ser opensouce
    me manda o link via email linuxbhz@hotmail.com
  22. Avatar de Poemander
    Link funcionando sem problemas:

    http://www.4shared.com/rar/F761T_Pk/NetCobX.html
  23. Avatar de tecnicoleandrorocha
    eses link nao funciona
  24. Avatar de adaowifi
    esse LINK AI @nalvo nao funciona nao coloca outro por favor quero testa seu sistema

+ Enviar Comentário



Visite: BR-Linux ·  VivaOLinux ·  Dicas-L