Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

NewUser

Converter em Letras Maiusculas antes de gravar!

Recommended Posts

Quero que antes de gravar no BD, converter as letras em maiúsculas.Como fazer?VLW!

ASP:
var = ucase(seu_campo)
java script:
var = seu_campo.toUpper
SQL
update sua_tabela set seu_campo = Upper(sua_variavel)
t+

Compartilhar este post


Link para o post
Compartilhar em outros sites

Não funcionou!

 

Meu cod.:

 

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>

<% Option Explicit

dim strnome, strempresa, stremail, strgrupo, strstatus

dim strfone_com, strcel, strsugest, strddd, strdddc

dim strcidade, struf, strassunto, strproduto, strIP

Dim strselect

Dim stringConexao, stringSQL, objConexao, objRecordSet

 

stremail = Server.HTMLEncode(LCASE(Request.Form("email")))

strempresa = Request.Form(UCASE("empresa"))

strnome = Request.Form(UCASE("nome"))

strfone_com=Request.Form("fone_com")

strcel=Request.Form("cel")

strcidade = Request.Form(UCASE("cidade"))

struf = Request.Form("uf")

strassunto = Request.Form("assunto")

strproduto = Request.Form("sugest")

strddd = Request.Form("ddd")

strdddc = Request.Form("dddc")

strstatus = Trim(Request.Form("status"))

strgrupo = Request.Form("grupo")

strIP = Request.Form("ip")

stringConexao = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("data/dados.mdb")&";Persist Security Info=False"

 

Set objConexao = Server.CreateObject("ADODB.Connection")

 

objConexao.Open stringConexao

 

stringSQL = "INSERT INTO feelins (ddd, telefone, dddc, celular, uf, cidade, empresa, emails, nome, grupo, status, ip)"

stringSQL = stringSQL & "VALUES ('"& strddd &"', '"& strfone_com &"', '"& strdddc &"', '"& strcel &"', '"& struf &"', '"& strcidade &"', '"& strempresa &"', '"& stremail &"', '"& strnome &"', '"& strgrupo &"', '"&strstatus&"', '"&strIP&"')"

strselect = "select * from feelins Where emails='"&stremail&"'"

set objRecordSet=objConexao.execute(stringSQL)

 

objConexao.close

%>

Compartilhar este post


Link para o post
Compartilhar em outros sites

Tenta assim

stringSQL = stringSQL & "VALUES (' "& Ucase(strddd) &" ' , ' " & Ucase(strfone_com) &" ', ' "& Ucase(strdddc) &" ', ' "& Ucase(strcel) &" ', ' "& Ucase(struf) &" ', ' "&
Sei lá...

é o q veio na mente...

nunca precisei disso!

noix

http://forum.imasters.com.br/public/style_emoticons/default/devil.gif

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.