não sei como fazer pra colocar TRUE ou FALSE

não sei se expliquei direito para os companheiros

mais acho que só de vcs terem uma idéia do q é vcs irão saber

O CAMPO FLOG, É UMA CHECKBOX, ONDE TEM QUE ENVIAR O VALOR DE CHECKED OU UNCHECKED.... acho que não estou passando isso pelo INSERT

insert into users (nome,pass,email,fone,flog,url,aniversario) values('"& nome & "',"& PasswordTemp & ", '"& email & "', '"& fone & "', '"& flog & "', '"& url & "', '"& aniversario & "')"  

<%response.buffer = trueFunction rndit()'generate password from randomize number Dim RndTemp Randomize RndTemp = Rnd * 1000000 RndTemp= Int(RndTemp) rndit = RndTemp End Function 'declerationdim useraction,conn,rs,sql,sql1,nome,pass,email,fone,flog,url,aniversariouseraction = request("action")select case useraction	case "login" 'generate the function PasswordTemp = rndit() 'collect data from form nome = request.form("nome") email = request.form("email") fone = request.form("fone") flog = request.form("flog") url = request.form("url") aniversario = request.form("aniversario") 'response.write user & email & rndit'***debug 'database objects Set Conn = Server.CreateObject("ADODB.Connection") Set Rs = Server.CreateObject("ADODB.Recordset") 'sql query sql = "select pass from users where pass='"&PasswordTemp&"' or email='"& email & "'" Conn.Open dsn rs.open sql,conn if rs.eof and rs.bof then sql1 = "insert into users (nome,pass,email,fone,flog,url,aniversario) values('"& nome & "',"& PasswordTemp & ", '"& email & "', '"& fone & "', '"& flog & "', '"& url & "', '"& aniversario & "')" conn.execute(sql1) response.write "<script>alert('Seu registro foi enviado para seu e-mail!');location.href='index.asp';</script>" Dim objCDO Set objCDO = Server.CreateObject("CDONTS.NewMail") body = "Site.com.br [http://www.site.com.br/](http://www.site.com.br/) " & vbCrLf body = body & " Seu LOGIN: " & email & vbCrLf body = body & " Sua SENHA: " & PasswordTemp & vbCrLf objCDO.To = email objCDO.From = "email.com.br" objCDO.Subject = "Senha para acesso...!" objCDO.Body = body objCDO.Send else response.write "<script>alert('e-mail já cadastrado');</script>" end if rs.closeset rs = nothingconn.closeset conn = nothingend select%>  

obrigado pela atenção