Codigo da Empresa

[fabiosc80 0]

mas é isto que estou tentando mostrar...O campo é autonumeração, mas o que você está usando naqule codigo é uma variavel qeu precisa pegar o valor que esta no banco senão vai ficar vazia...

entendi. mas como eu faço isso ?crio uma variavel assim?codigoempresa = codigoempresa?

[Mário Monteiro 179]

como você sabe qual a empresa???se tiver alguma informação, manda buscar este codigo a partir dela

[fabiosc80 0]

como você sabe qual a empresa???se tiver alguma informação, manda buscar este codigo a partir dela

Mas cara ta acabando de cadastrar. como vou saber isso?Como buscar isso?

[fabiosc80 0]

como você sabe qual a empresa???se tiver alguma informação, manda buscar este codigo a partir dela

Mas cara ta acabando de cadastrar. como vou saber isso?Como buscar isso?

Help me

[Mário Monteiro 179]

pra não ter erro eu faria isso se fosse você...1- Criar um novo campo numerico (inteirolongo) em seu bd2- Sempre antes de gravar verifica qual o maior valor deste campo (MAX campo) e no novo registro insere este valor mais 13- Com isso você tem um dos campos do registro anterior que assim como a autonumeração não se repete, com uma diferença este você sabe o valor, então usa este valor pra buscar o campo autonumeração4- pode usar o valor na sua variavel5- trabalho encerrado e emprego temporariamente salvo..

[fabiosc80 0]

pra não ter erro eu faria isso se fosse você...1- Criar um novo campo numerico (inteirolongo) em seu bd2- Sempre antes de gravar verifica qual o maior valor deste campo (MAX campo) e no novo registro insere este valor mais 13- Com isso você tem um dos campos do registro anterior que assim como a autonumeração não se repete, com uma diferença este você sabe o valor, então usa este valor pra buscar o campo autonumeração4- pode usar o valor na sua variavel5- trabalho encerrado e emprego temporariamente salvo..

Mas MarioufpaVeja se minha logica ta certo.Vai dar o mesmo problema pois como vou recuperar esse valor se é a primeira vez que to inserindo. vai cair no mesmo problema. nao precisa de mais um campo.

[Mário Monteiro 179]

cara pensa comigovocê tem uma tabela com dois campos assimID | EMPRESA1 | A2 | B7 | CO campo ID é autonumeração, você não pode pegar o maior, pois poderia dar pau, mas se você poe mais um campoID | EMPRESA | Cotrole1 | A | 12 | B | 27 | C | 3que não necessecitam serem iguais pois você pode excluir valores, mas você pode selecionar o maior deles que será 3 antes de inserir o proximoai você insereINSERT INTO TABELA (EMPRESA,CONTROLE) VALUES (EMPRESA,4)ou seja sei quanto é o controle antes de inserir, e deposi de inserir pego a IDSELECT ID FROM TABELA WHERE CONTROLE = 4Ai você usa este valor na variavel problemaCodigoEmpresa = RS("ID")pronto você tem o ID da empresa

[fabiosc80 0]

cara pensa comigovocê tem uma tabela com dois campos assimID | EMPRESA1 | A2 | B7 | CO campo ID é autonumeração, você não pode pegar o maior, pois poderia dar pau, mas se você poe mais um campoID | EMPRESA | Cotrole1 | A | 12 | B | 27 | C | 3que não necessecitam serem iguais pois você pode excluir valores, mas você pode selecionar o maior deles que será 3 antes de inserir o proximoai você insereINSERT INTO TABELA (EMPRESA,CONTROLE) VALUES (EMPRESA,4)ou seja sei quanto é o controle antes de inserir, e deposi de inserir pego a IDSELECT ID FROM TABELA WHERE CONTROLE = 4Ai você usa este valor na variavel problemaCodigoEmpresa = RS("ID")pronto você tem o ID da empresa

Acho que entendi , mas agora pensa comigo.Ele inseriu la bonitinho beleza?Mas a inserçao ta vindo depois do upload ou seja ele ta mandano pro upload o arquivo antes de cadastrar com id certa pra eu usar depois. eu tenho que recuperar essa id antes de poder mandar pro upload ai ela cai no banco no campo logotipo como uma luva depois tb.Se eu nao pegar antes nao adianta nada. e se eu nao cadastrar nao vai ter id. ai complicou nao é?

[Mário Monteiro 179]

não complicou nada...grava normal o arquivo, faz tuydo que tiver que fazer no db e verifica qual nome deve ficar pro arquivo depois de tudo isso, ai é so renomear pro novo nome...realmente alguma coisa você tinha que fazer antes, mas no problems quanto a isso...

[fabiosc80 0]

não complicou nada...grava normal o arquivo, faz tuydo que tiver que fazer no db e verifica qual nome deve ficar pro arquivo depois de tudo isso, ai é so renomear pro novo nome...realmente alguma coisa você tinha que fazer antes, mas no problems quanto a isso...

Mas nao vai ficar meio sujo alterar o banco de dados e o update depois de ter cadastrado ja no banco e enviado o arquivo pra pasta uplaod??

[fabiosc80 0]

Vai ter mais de uma pessoa cadastrando uma empresa ao mesmo tempo ? pq se não tiver manda buscar o último códito da empresa e soma + 1 se for um campo autonumeração e manda ver

stumpy nao entendi nada do que você faloupra que eu vou somar mais um num campo autonumeracao?

[Mário Monteiro 179]

cara não vai ficar sujo, você não vai ter que alterar nada no db, só selecionar e inserir uma vez, depois selciona o que inseriu e só então alterará o nome do arquivo..

[fabiosc80 0]

cara não vai ficar sujo, você não vai ter que alterar nada no db, só selecionar e inserir uma vez, depois selciona o que inseriu e só então alterará o nome do arquivo..

ve se eu entendi marioufpaé um select aquilo dentro de um insert certo?é melhor eu fazer o upload depois do insert?

[Mário Monteiro 179]

não cara você az o opload normal...ai antes de inserir você pergunta qual o maior indiceai na hora de inserir poe valor que consultou mais 1 no controledepois seleciona denovo usando o valor do controle que voce inseriu(este voce conhece) pra pegar o autonumeração que você não conhecee alterar o nome do arquivo que veio no upload...

[fabiosc80 0]

não cara você az o opload normal...ai antes de inserir você pergunta qual o maior indiceai na hora de inserir poe valor que consultou mais 1 no controledepois seleciona denovo usando o valor do controle que voce inseriu(este voce conhece) pra pegar o autonumeração que você não conhecee alterar o nome do arquivo que veio no upload...

Só que o ID vai ter que ser igual ao numero do autonumeracao....

[FabricioGomes 0]

Fabio... o seu problema está na variavel codigoempresa....seu campo é autonumeracao, logo ele nao vai repetir,nao precisa criar um campo para isso....se ele tá cadastrando agora a empresa, voce nao podera utilizar codigoempresa...entenda que isso é uma variavel --> codigoempresaisso é um campo --> recordset("codigoempresa")ok?voce tera que fazer um SQL antes de renomear o arquivo"select max(id) as maximo from empresa"depois colocar codigoempresa = recordset("maximo") + 1depois renomear o arquivo...pra facilitar vou postar o codigo como ficaria....--------------------------------------------------------------------<!--#include file="conexao.asp"--><%Dim Nome,Logotipo,TB' Variaveis' *********Dim mySmartUploadDim intCount' Criando Objeto' ***************Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload")mySmartUpload.AllowedFilesList = "gif,jpg,zip,cdr,psd,jpeg,tif,doc,txt,html,htm,png"mySmartUpload.MaxFileSize = 2000000' Upload' ******mySmartUpload.UploadNome = mySmartUpload.form("Nome")For Each file In mySmartUpload.FilesLogotipo = File.FileNamenext ' Salva o arquivo em um caminho virtual' ****************************************************************************intCount = mySmartUpload.Save("Upload" )Set fso = CreateObject("Scripting.FileSystemObject") Set fileObject = fso.GetFile(Server.MapPath("UPLOAD/"&Logotipo))Dim BC : AbreBancoSET TB = BC.Execute("select max(id) as maximo from empresa")CodigoEmpresa = TB("maximo")Logotipo = "A_" & CodigoEmpresa & "_" & Logotipo fileObject.Name = LogotipoSet fileObject = Nothing Set fso = Nothing %><%Dim SQSQ = ""SQ = SQ & "INSERT INTO Empresa"SQ = SQ & "(Nome,Logotipo)"SQ = SQ & "VALUES( "SQ = SQ & "'" & Nome & "',"SQ = SQ & "'" & Logotipo & "')"SET TB = BC.Execute(SQ)Response.Redirect("empresainc.asp")%>--------------------------------------espero que consiga entender...

[fabiosc80 0]

Fabio... o seu problema está na variavel codigoempresa....seu campo é autonumeracao, logo ele nao vai repetir,nao precisa criar um campo para isso....se ele tá cadastrando agora a empresa, voce nao podera utilizar codigoempresa...entenda que isso é uma variavel --> codigoempresaisso é um campo --> recordset("codigoempresa")ok?voce tera que fazer um SQL antes de renomear o arquivo"select max(id) as maximo from empresa"depois colocar codigoempresa = recordset("maximo") + 1depois renomear o arquivo...pra facilitar vou postar o codigo como ficaria....--------------------------------------------------------------------<!--#include file="conexao.asp"--><%Dim Nome,Logotipo,TB' Variaveis' *********Dim mySmartUploadDim intCount' Criando Objeto' ***************Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload")mySmartUpload.AllowedFilesList = "gif,jpg,zip,cdr,psd,jpeg,tif,doc,txt,html,htm,png"mySmartUpload.MaxFileSize = 2000000' Upload' ******mySmartUpload.UploadNome = mySmartUpload.form("Nome")For Each file In mySmartUpload.FilesLogotipo = File.FileNamenext ' Salva o arquivo em um caminho virtual' ****************************************************************************intCount = mySmartUpload.Save("Upload" )Set fso = CreateObject("Scripting.FileSystemObject") Set fileObject = fso.GetFile(Server.MapPath("UPLOAD/"&Logotipo))Dim BC : AbreBancoSET TB = BC.Execute("select max(id) as maximo from empresa")CodigoEmpresa = TB("maximo")Logotipo = "A_" & CodigoEmpresa & "_" & Logotipo fileObject.Name = LogotipoSet fileObject = Nothing Set fso = Nothing %><%Dim SQSQ = ""SQ = SQ & "INSERT INTO Empresa"SQ = SQ & "(Nome,Logotipo)"SQ = SQ & "VALUES( "SQ = SQ & "'" & Nome & "',"SQ = SQ & "'" & Logotipo & "')"SET TB = BC.Execute(SQ)Response.Redirect("empresainc.asp")%>--------------------------------------espero que consiga entender...

Pessoal vou fazer em casa , minha mina ta me esperando . Depois cponto oque deu.