netsys

Caríssimos Coléguas! Caso alguem se interesse, ou conheça alguém que faça, temos um cliente em S.Paulo necessitando de: Configuração de um servidor de e-mails e hospedagem em um link ajato 1600 down / 800 up, e IP fixo com win 2003 server e exchange 2003, já tenho as licenças. Peço um segundo orçamento para o caso de fazer a instalação configuração remotamente, considerando o servidor instalado e com os softwares instalados. 1) Instalação do Windows 2003 Server 2) Instalação e Configuração do Active Directory (Servidor e dominio) 3) Configuração do DNS (Master e Slave) (Servidor e dominio) 4) Registro dos domínos (Checar com o provodore (Ajato) a designação de Bloco, e Quando tudo estiver OK Apontar o DNS para os serivdores). 5) Instalação e Configuração do Exchange 2003 (Servidor e dominio) 6) Instalação e Configuração do IIS (Configuração do WebSite) Mutcho Grato Alberto Zamai Vip Netsystem albertozamai@hotmail.com

Caríssimos Coléguas! Caso alguem se interesse, ou conheça alguém que faça, temos um cliente em S.Paulo necessitando de: Configuração de um servidor de e-mails e hospedagem em um link ajato 1600 down / 800 up, e IP fixo com win 2003 server e exchange 2003, já tenho as licenças. Peço um segundo orçamento para o caso de fazer a instalação configuração remotamente, considerando o servidor instalado e com os softwares instalados. 1) Instalação do Windows 2003 Server 2) Instalação e Configuração do Active Directory (Servidor e dominio) 3) Configuração do DNS (Master e Slave) (Servidor e dominio) 4) Registro dos domínos (Checar com o provodore (Ajato) a designação de Bloco, e Quando tudo estiver OK Apontar o DNS para os serivdores). 5) Instalação e Configuração do Exchange 2003 (Servidor e dominio) 6) Instalação e Configuração do IIS (Configuração do WebSite) Mutcho Grato Alberto Zamai Vip Netsystem albertozamai@hotmail.com

Caríssimos Coléguas! Caso alguem se interesse, ou conheça alguém que faça, temos um cliente em S.Paulo necessitando de: Configuração de um servidor de e-mails e hospedagem em um link ajato 1600 down / 800 up, e IP fixo com win 2003 server e exchange 2003, já tenho as licenças. Peço um segundo orçamento para o caso de fazer a instalação configuração remotamente, considerando o servidor instalado e com os softwares instalados. 1) Instalação do Windows 2003 Server 2) Instalação e Configuração do Active Directory (Servidor e dominio) 3) Configuração do DNS (Master e Slave) (Servidor e dominio) 4) Registro dos domínos (Checar com o provodore (Ajato) a designação de Bloco, e Quando tudo estiver OK Apontar o DNS para os serivdores). 5) Instalação e Configuração do Exchange 2003 (Servidor e dominio) 6) Instalação e Configuração do IIS (Configuração do WebSite) Mutcho Grato Alberto Zamai Vip Netsystem albertozamai@hotmail.com

Caríssimos Coléguas! Caso alguem se interesse, ou conheça alguém que faça, temos um cliente em S.Paulo necessitando de: Configuração de um servidor de e-mails e hospedagem em um link ajato 1600 down / 800 up, e IP fixo com win 2003 server e exchange 2003, já tenho as licenças. Peço um segundo orçamento para o caso de fazer a instalação configuração remotamente, considerando o servidor instalado e com os softwares instalados. 1) Instalação do Windows 2003 Server 2) Instalação e Configuração do Active Directory (Servidor e dominio) 3) Configuração do DNS (Master e Slave) (Servidor e dominio) 4) Registro dos domínos (Checar com o provodore (Ajato) a designação de Bloco, e Quando tudo estiver OK Apontar o DNS para os serivdores). 5) Instalação e Configuração do Exchange 2003 (Servidor e dominio) 6) Instalação e Configuração do IIS (Configuração do WebSite) Mutcho Grato Alberto Zamai Vip Netsystem albertozamai@hotmail.com

Só para esclarecer... Quando eu disse "super-amigos" não foi no sentido pejorativo. O pessoal aqui é 100% e eu mesmo aprendi muito aqui no fórum e sou eternamente grato a todos. Só quis sugerir um formato novo para o site... Na boa....sem estresse! Abraços Alberto - SP Fw2.4 + Clip5.2e

E dai? mudou oque? Não foi isso que eu disse....só acho que vcs tem que ver: 1) Fivewin vem batendo de frente com + de 10 linguagens de programação, e está VENCENDO TODAS! 2) A Virtual á o distribuidor oficial Fivewin no Brasil certo? Então está na hora de atualizar o site e abrir opções para "cases" de sucesso, banco de profissionais, editoriais dos criadores, "demos" de produtos, etc... Voce já viu a enquete que consta do lado inferior direito da tela principal??? Eu mesmo já respondi várias vezes!!!

Concordo e Protesto! Concordo com (quase) tudo que o Fluna escreveu! Esse país é governado por bandidos que só beneficiam o sistema financeiro, a grande imprensa e alguns amigos grandes produtores de comodities. Só acho que não dá pra chamar isso de capitalismo, nem de socialismo,,,,ainda estamos no feudalismo aqui....Só que nós vivemos de tecnologia, e isso não pode ser deixado para segundo plano, massacrando as pequenas empresas com impostos e super-fiscais, pois o Brasil está ficando para 2o.,3o.,4o.planos... Também concordo com os colegas que isso é um forum de programação. Aliás, gostaria de solicitar algumas mudanças neste forum, que às vezes parece mais uma sala de bate papo dos (sempre os mesmos) super-amigos....Cadê os 3000 inscritos no grupo de usuários? Certamente lá estão funcionários de grandes empresas, parceiros (e donos) de pequenas software-houses e também os "Dom Quixotes" autônomos da informática, que também querem saber sobre o crescimento do Fivewin nas empresas, como anda o mercado de trabalho (alguém sozinho está conseguindo cobrar 50pratas por hora????). E os usuários de outros países???? Ou então amigos, se é um forum exclusivo de programação, marquem as cervejadas trocando e-mail e dêem mais oportunidade para os demais usuários se expressarem! Desculpe a sinceridade e Obrigado Alberto Zamai - SP Vip Netsystem Info Fw24+Clip5.2e

Ola A variável cCodigo também tem 10 bytes? Alberto - SP Vip Netsystem

A senha é SUPER (maiúscula ou minúscula) Abraços Alberto Zamai Vip Netsystem - SP FW 24 + Clip 5.2e + WS + CDX

Up

Em tempo: Tem que estar HOMOLOGADO! Grato Alberto

Caros coléguas e amigos. Um amigo aqui em SP (Pinheiros) tem um restaurante- pizzaria com grande movimento. Esses dias ele foi intimado a colocar um ECF com TEF. ALGUÉM Jà TEM ALGO PRONTO????? (O ideal seria um sistema já desenvolvido para o ramo de atividade, como controle de comandas, mesas, caixa, etc. Minha "praia" é Industria e náo tenho nem tempo nem intenção de entrar nessa à rea) Quem tiver interesse favor me chamar aqui ou via e-mail ou no hotmail. Mutcho thanks Alberto Zamai Vip Netsystem Info - SP albertozamai@hotmail.com FW24 Clip52e WS CDX

Caros coléguas e amigos. Um amigo aqui em SP (Pinheiros) tem um restaurante- pizzaria com grande movimento. Esses dias ele foi intimado a colocar um ECF com TEF. ALGUÉM Jà TEM ALGO PRONTO????? (O ideal seria um sistema já desenvolvido para o ramo de atividade, como controle de comandas, mesas, caixa, etc. Minha "praia" é Industria e náo tenho nem tempo nem intenção de entrar nessa à rea) Quem tiver interesse favor me chamar aqui ou via e-mail ou no hotmail. Mutcho thanks Alberto Zamai Vip Netsystem Info - SP albertozamai@hotmail.com FW24 Clip52e WS CDX

Ola Alessandro, tudo bem? Amigo, tem razão, este arquivo é de 02/2003, tem 633mil registros e ocupa 74Mb (9mb zipado). É o que eu uso atualmente. Claro que novas ruas foram criadas desde 2003, porém as ja existentes raramente mudam. Vou tentar achar um mais recente, mas este tem atendido a 95% das pesquisas. Grato Alberto Zamai Vip Netsystem - SP FW24 + Clip.5.2e + WS + CDX

Pessoal Vejam em dicas,,,tem uma postagem do Betovsp de um arquivo DBF.... Alberto-SP

Ola Paulo, tudo bem! Por favor retire as linhas antes do inicio da Function e acrescente uma chamada assim: Function Main() *-------------- fEtiqBar1(1) Return Nil *------------ Dentro da função tem um IF que define 2 colunas quando o tipo de etiqueta = 1 (Code 3 de 9) Acho que fiz assim porque este tipo de código de barras é mais largo. Normal- mente os clientes usam mais o EAN-13, mas este só aceita números..... Abraço! Alberto-SP

Ola Paulo, Veja amigo, as linhas que antecedem o inicio da Function são somente para explicar os parâmetros passados para ela. Por favor retire (ou comente /*) para compilar. Alberto Vip Netsystem - SP FW24 + Clip 5.2e + WS + CDX

Também tem que incluir no topo: #include "Barcode.ch" Alberto - SP

Precisa linkar a BARLIB.LIB Alberto Zamai Vip Netsystem - SP FW24 + Clip5.2e + WS + CDX

nCodBar= 1=C-39 2=Code128 3=Ean-13 4=Upca (cArqTmp)-> Arquivo temporário com 3 campos: 1=Prod = Código do produto 2=Desc = Descrição 3=Qtde = Qtde de etiquetas para o produto. *--------------------------------------------------------- Function fEtiqBar1(nCodBar) // Impressora padrao do Windows *--------------------------------------------------------- LOCAL oPrinter, oFont LOCAL nFoi:=0 LOCAL nWidth ,; // label Width nHeight ,; // label height nMargin ,; // Printing margin .2 " nLblWid ,; // # labels width 2 " nLblHei // # labels height 6 " LOCAL nCounter ,; // # of lbl per page nRow ,; // current row nCol ,; // current col nOldRow // old row position PRINT oPrinter FROM USER PREVIEW ; NAME "Etiquetas com Codigos de Barras" DEFINE FONT oFont ; NAME "ARIAL" ; SIZE 0, -6 OF oPrinter If nCodBar=1 nLblWid := 2 // Colunas de etiquetas Else nLblWid := 3 End nLblHei := 10 // Etiquetas na altura do papel nMargin := Int(oPrinter:nLogPixelX()*0.40) nWidth := Int(oPrinter:nHorzRes()/nLblWid) nHeight := Int(oPrinter:nVertRes()/nLblHei) nCounter := 0 CursorWait() (cArqTmp)->(DbGotop()) While !(cArqTmp)->(Eof()) If (cArqTmp)->Qtde=0 (cArqTmp)->(DbSkip()) Loop End IF nCounter == 0 nRow := Int(nMargin) nCol := Int(nMargin) oPrinter:StartPage() END nOldRow := nRow oPrinter:Say(nRow,nCol+15, Alltrim((cArqTmp)->Desc), oFont) nRow += oFont:nHeight Do Case Case nCodBar=1 ; @ nRow+5,nCol+15 Code3_9 Alltrim((cArqTmp)->Cor)+Alltrim((cArqTmp)->Prod) OF oPrinter Case nCodBar=2 ; @ nRow+5,nCol+15 Code128 Alltrim((cArqTmp)->Cor)+Alltrim(+(cArqTmp)->Prod) OF oPrinter Case nCodBar=3 ; @ nRow+5,nCol+15 Ean13 Alltrim((cArqTmp)->Cor)+Alltrim(+(cArqTmp)->Prod) OF oPrinter SIZE 0.9 Case nCodBar=4 ; @ nRow+5,nCol+15 Upca Alltrim((cArqTmp)->Cor)+Alltrim(+(cArqTmp)->Prod)+"0" OF oPrinter SIZE 0.8 End nRow += oFont:nHeight nRow += oFont:nHeight nRow += oFont:nHeight nRow += oFont:nHeight oPrinter:Say(nRow+10,nCol+40 ,Left((cArqTmp)->Prod,7)+" "+Right((cArqTmp)->Prod,8), oFont) nRow := nOldRow + (nHeight*0.98) Select('E100') nFoi++ If (cArqTmp)->Qtde = 1 .or. nFoi > (cArqTmp)->Qtde nFoi:=0 (cArqTmp)->(Dbskip()) End IF nCounter > 0 .AND. nCounter%nLblHei == 0 nRow := nMargin nCol += nWidth END IF nCounter == (nLblHei*nLblWid) .AND. !(cArqTmp)->(eof()) nCounter := 0 oPrinter:EndPage() ELSE nCounter++ END ENDDO CursorArrow() oPrinter:EndPage() oPrinter:Preview() RETURN (NIL) *------------------------------------------- Pode usar que funciona bem em qq impressora laser ou jato de tinta. Neste exemplo ele coloca a descrição primeiro, o código de barras no meio e o código mesmo no rodapé da etiqueta. Não serve para impressão em Argox ou Eltron. Boa sorte! Alberto Zamai Vip Netsystem - SP Fw24 + Clip 5.2e + Ws + CDX

Ola Anderson Obrigado pela atenção, mas não consegui entrar no forum da Bematech pois não tenho senha de acesso. Alberto Fw24 + Clip 5.2e + xHarbour São Paulo

Ola Pessoal Conversando com um amigo que tem um posto de gasolina, fiquei sabendo que esta impressora não será mais homolo- gada após 31/03/2007.....Alguém sabe mais a respeito??? Grato Alberto FW24 + Clipper 5.2e + xHarbour São Paulo

Ola Pessoal Conversando com um amigo que tem um posto de gasolina, fiquei sabendo que esta impressora não será mais homolo- gada após 31/03/2007.....Alguém sabe mais a respeito??? Grato Alberto FW24 + Clipper 5.2e + xHarbour São Paulo

Ai pessoal O Sérgio tem razão, vc pode capturar uma impressora local com NET USE LPTn:= \\Maquina\NomedaImpressora, desde que seja no XP. Alberto São Paulo FW 2.6 + Clip 5.2e

Calma! Antes de formatar, desligue o avast, avg, etc, vá em www.pandasoftware.com e baixe e rode o ACTIVESCAN. Alberto SP