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:	1433
Tamanho: 	28,4 KB
ID:      	36177Clique na imagem para uma versão maior

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

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

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

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

Comentários

Página 1 de 5 12345 ÚltimoÚltimo
  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;
Página 1 de 5 12345 ÚltimoÚltimo

+ Enviar Comentário




Visite: BR-Linux ·  VivaOLinux ·  Dicas-L