Jump to content


Photo

Ajuda Com Calculo Gráfico


  • Faça o login para participar
2 replies to this topic

#1 danilo.max

danilo.max

    12 Horas

  • Usuários
  • 143 posts
  • Sexo:Não informado

Posted 22/07/2003, 22:36

Olá pessoal é o seguinte.
Eu e meu amigo estamos quebrando a cabeça para fazer um pequeno sistema em ASP calcular alguns valores, o sistema é esse abaixo:


<%

varLargura = Request.form("varLargura")
varComprimento = "." & Request.form("varComprimento")
varGramatura = Request.form("varGramatura")
varQtdeFolhas = Request.form("varQtdeFolhas")
varPesoTotal = Request.form("varPesoTotal")

If varGramatura => "3" Then
	varGramatura = "." & varGramatura
Else
	varGramatura = ".0" & varGramatura
End If


Maxx = varLargura*varComprimento*varGramatura*varQtdeFolhas


Response.Write Maxx
%>

Esse sitema faz o seguinte pega quantida de papel, largura, altura etc.... e multiplica e me dá o peso ou quantidade de folhas, gostaria que vcs me auxiliassem a fazer o seguinte.

Se a gramatura for maior ou igual a 3 digitos ele executa o seguinte:
varGramatura = "." & varGramatura
caso contrário ele faz o seguinte

varGramatura = "0." & varGramatura

Gostaria que o resultado viece com as virgulas pois não estamos conseguindo, ele exibe o resultado correto mas sem as virgulas.
Espero resposta.
Obrigados

#2 knoxville

knoxville

    Backdoor Man

  • Usuários
  • 951 posts
  • Sexo:Masculino
  • Localidade:Itajaí - SC

Posted 22/07/2003, 22:49

faiz assim:
if varGramatura > "2" Then
varGramatura = "." & varGramatura
Else
varGramatura = "0." & varGramatura
End If
;)

#3 danilo.max

danilo.max

    12 Horas

  • Usuários
  • 143 posts
  • Sexo:Não informado

Posted 23/07/2003, 08:31

faiz assim:

if varGramatura > "2" Then
varGramatura = "." & varGramatura
Else
varGramatura = "0." & varGramatura
End If
;)

Até aqui beleza mas como colocar isso em casas decimais ou seja centena, dezena, milhar etc...e tc... pois ele aparece tudo junto.????

Sei que tem uma função mas não consigo encontrar se alguem puder me ajudar agradeço.
Obrigado espero resposta.




1 user(s) are reading this topic

0 membro(s), 1 visitante(s) e 0 membros anônimo(s)

IPB Skin By Virteq