<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% Dim rsnews Dim rsnews_numRows Set rsnews = Server.CreateObject("ADODB.Recordset") rsnews.ActiveConnection = MM_connmvz2_STRING rsnews.Source = "SELECT * FROM news ORDER BY id DESC" rsnews.CursorType = 0 rsnews.CursorLocation = 2 rsnews.LockType = 1 rsnews.Open() rsnews_numRows = 0 %> <% Dim rssecao Dim rssecao_numRows Set rssecao = Server.CreateObject("ADODB.Recordset") rssecao.ActiveConnection = MM_connmvz2_STRING rssecao.Source = "SELECT * FROM cadastro" rssecao.CursorType = 0 rssecao.CursorLocation = 2 rssecao.LockType = 1 rssecao.Open() rssecao_numRows = 0 %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = 6 Repeat1__index = 0 rsnews_numRows = rsnews_numRows + Repeat1__numRows %> <% Dim MM_paramName %> <% ' *** Validate request to log in to this site. MM_LoginAction = Request.ServerVariables("URL") If Request.QueryString<>"" Then MM_LoginAction = MM_LoginAction + "?" + Request.QueryString MM_valUsername=CStr(Request.Form("txtlogin")) If MM_valUsername <> "" Then MM_fldUserAuthorization="nivel" MM_redirectLoginSuccess="default.asp" MM_redirectLoginFailed="login_erro.asp" MM_flag="ADODB.Recordset" set MM_rsUser = Server.CreateObject(MM_flag) MM_rsUser.ActiveConnection = MM_connmvz2_STRING MM_rsUser.Source = "SELECT login, senha" If MM_fldUserAuthorization <> "" Then MM_rsUser.Source = MM_rsUser.Source & "," & MM_fldUserAuthorization MM_rsUser.Source = MM_rsUser.Source & " FROM cadastro WHERE login='" & Replace(MM_valUsername,"'","''") &"' AND senha='" & Replace(Request.Form("txtsenha"),"'","''") & "'" MM_rsUser.CursorType = 0 MM_rsUser.CursorLocation = 2 MM_rsUser.LockType = 3 MM_rsUser.Open If Not MM_rsUser.EOF Or Not MM_rsUser.BOF Then ' username and password match - this is a valid user Session("MM_Username") = MM_valUsername If (MM_fldUserAuthorization <> "") Then Session("MM_UserAuthorization") = CStr(MM_rsUser.Fields.Item(MM_fldUserAuthorization).Value) Else Session("MM_UserAuthorization") = "" End If if CStr(Request.QueryString("accessdenied")) <> "" And true Then MM_redirectLoginSuccess = Request.QueryString("accessdenied") End If MM_rsUser.Close Response.Redirect(MM_redirectLoginSuccess) End If MM_rsUser.Close Response.Redirect(MM_redirectLoginFailed) End If %> <% ' *** Go To Record and Move To Record: create strings for maintaining URL and Form parameters Dim MM_keepNone Dim MM_keepURL Dim MM_keepForm Dim MM_keepBoth Dim MM_removeList Dim MM_item Dim MM_nextItem ' create the list of parameters which should not be maintained MM_removeList = "&index=" If (MM_paramName <> "") Then MM_removeList = MM_removeList & "&" & MM_paramName & "=" End If MM_keepURL="" MM_keepForm="" MM_keepBoth="" MM_keepNone="" ' add the URL parameters to the MM_keepURL string For Each MM_item In Request.QueryString MM_nextItem = "&" & MM_item & "=" If (InStr(1,MM_removeList,MM_nextItem,1) = 0) Then MM_keepURL = MM_keepURL & MM_nextItem & Server.URLencode(Request.QueryString(MM_item)) End If Next ' add the Form variables to the MM_keepForm string For Each MM_item In Request.Form MM_nextItem = "&" & MM_item & "=" If (InStr(1,MM_removeList,MM_nextItem,1) = 0) Then MM_keepForm = MM_keepForm & MM_nextItem & Server.URLencode(Request.Form(MM_item)) End If Next ' create the Form + URL string and remove the intial '&' from each of the strings MM_keepBoth = MM_keepURL & MM_keepForm If (MM_keepBoth <> "") Then MM_keepBoth = Right(MM_keepBoth, Len(MM_keepBoth) - 1) End If If (MM_keepURL <> "") Then MM_keepURL = Right(MM_keepURL, Len(MM_keepURL) - 1) End If If (MM_keepForm <> "") Then MM_keepForm = Right(MM_keepForm, Len(MM_keepForm) - 1) End If ' a utility function used for adding additional parameters to these strings Function MM_joinChar(firstItem) If (firstItem <> "") Then MM_joinChar = "&" Else MM_joinChar = "" End If End Function %> MVZ Web Hosting, Hospedagem e desenvolvimento de site em Balsas Maranhão
<% While ((Repeat1__numRows <> 0) AND (NOT rsnews.EOF)) %> <% Repeat1__index=Repeat1__index+1 Repeat1__numRows=Repeat1__numRows-1 rsnews.MoveNext() Wend %>
" class="link1p"><%=(rsnews.Fields.Item("titulo").Value)%>
Hospedagem
Desenvolvimento
Registro de domínios
Inscrição
livro de visitas
Fórum
Chat
Crônica
Imagens
Tele Busca
 

Bem-vindo, hoje é <% = date %> e agora são <% = time %> horas
<% If (Session("MM_UserAuthorization")) = "user" Then %> Você está logado no sistema como <%= Session("MM_username") %> <% end if %> <% If (Session("MM_Username")) = "" Then %>  Você não está logado no sistema! <% end if %> <% If (Session("MM_UserAuthorization")) = "admin" Then %> Você está logado no sistema como <%= Session("MM_username") %> <% end if %>

Dúvidas freqüentes

Voltar para página anterior

 

...........Desenvolvimento de site

 

O que é preciso para desenvolver um site?
Para o desenvolvimento do site, é essencial que a empresa tenha um planejamento das metas e principalmente, tenha definido se o site será para apresentação de produtos/serviços ou venda. Organizar a separação do material necessário, como textos explicativos para as páginas do site, fotos e etc...Um site de apresentação pode servir para divulgar e informar, já um site de venda, terá o propósito de alcançar o consumidor diretamente e fazer com que ele entre em contato por meio de formulários de pedidos ou outro meio como um "carrinho de compra" para efetuar a compra on-line.
Voltar

Qualquer pessoa ou empresa pode ter um site?
Sim, se você possui empresa e CNPJ, pode registrar um domínio ".com.br", caso não possua CNPJ, pode registrar um domínio internacional, como ".net" ou ".com". Um site pode servir apenas como "portfólio" para um profissional liberal ou a principal forma de contato com clientes, este seria o caso de uma loja virtual ou um site imobiliário que tenha como meta alcançar mercados externos ou mesmo clientes de qualquer parte do mundo.
Voltar

Como é feita a avaliação para desenvolver um site?
O valor para desenvolvimento de um web site pode variar muito, mas podemos citar como fatores importantes na avaliação dos serviços alguns aspectos, como:
*Tecnologia utilizada no desenvolvimento
*Tamanho (quantidade de páginas)
*Recursos disponibilizados
*Tempo previsto para o desenvolvimento
*Forma de pagamento
Os aspectos Tecnologia utilizada e recursos disponibilizados são os mais importantes para a definição do valor final. Em geral o valor pode ser fixado no primeiro contato com o cliente (salvo alguns casos que requerem maiores estudos para definição do tempo de entrega do site)
voltar

Quem faz a manutenção e alterações necessárias?
Dependendo da tecnologia utilizada, as alterações de dados como preço de produtos, disponibilidade, informações diversas, notícias e etc... podem ser realizadas diretamente pelo responsável ou proprietário do site. Manutenção de problemas técnicos no servidor ou da ordem de falha na programação do site, serão realizadas sem custos adicionais pela MVZ Web Hosting. Manutenção das informações ou design, são serviços que podem fazer parte do contrato ou não, no caso de não estar definido no contrato, o valor cobrado por tal alterações será combinado separadamente do valor de implantação do site. vale lembrar que se o site sofrer alterações do código fonte por terceiros, este automaticamente perderá a sua garantia e após isso se confirmar, todas as intervenções de reparo serão cobradas.
Voltar

A MVZ Web Hosting possui contrato de prestação de serviços?
Sim. Nosso contrato baseia-se em "Contrato de prestação de serviços", onde fica definido e ajustado os principais dados e tópicos relevantes ao desenvolvimento do site, como: Tecnologia utilizada, recursos disponibilizados, quantidade média de páginas, tempo de entrega do site, delegação de responsabilidades, valores dos serviços, definição de valor de mensalidade para atualização (se houver) e etc.... O contrato pode sofrer alterações se for de comum acordo.
O procedimento geralmente utilizado é este:
Após a "contratação verbal" é apresentado um modelo de design ao cliente, (sem compromisso), se aprovado, assinamos o contrato e damos início realmente nos serviços.
Voltar

Por que minha empresa deveria ter um site?
A internet está se tornando cada vez mais popular e imprescindível no cotidiano da vida das pessoas, hoje você encontra mais informações na rede virtual que nos seus livros, porque praticamente todas as informações de todos os livros já se encontram na internet assimilados das mais diversas formas, isso faz com que cada vez mais um número maior de pessoas realizem buscas pelos sites de procura como Goolgle, Cadê, Yahoo, Alta Vista e etc... A sua empresa não pode ficar de fora desta que é a maior rede mundial de comunicação, informação, marketing e divulgação. Outro bom motivo que serve como exemplo, é que os detentores das maiores fortunas do mundo são pessoas e empresas ligadas à internet, isso prova a consolidação, senão dos negócios on-line, mas da divulgação e marketing das marcas e produtos oferecidos na internet.
Falando de praticidade...sua empresa terá um site para divulgar produtos e serviços oferecidos, mostrar a sua imagem para pessoas de toodo o mundo, vender produtos on-line, angariar novos clientes e fornecedores, mostrar atravéz de fotos de qualidade tudo o que você só pode explicar por telefone ou passar por fax para seu cliente e uma infinidade de vantagens e aplicações para o web site de sua empresa.
Voltar

Em quanto tempo a MVZ Web Hosting entrega meu site?
O tempo para "entrega" do site varia de acordo com o tamanho do mesmo e tecnologias utilizadas, além de depender das informações passadas pelo proprietário, (isto inclusive é o mais importante). Em média, podemos dizer que um site fica pronto em 30 dias
Voltar

Voltar para página anterior
Login:
Senha:
 
<% end if %>
 


Copyright © 2005 MVZ WEB HOSTING - Todos os direitos reservados - Design e desenvolvimento: MAURO V. ZANCHIN
Página principal <% rsnews.Close() Set rsnews = Nothing %> <% rssecao.Close() Set rssecao = Nothing %>