Erro no insert

[enrrike 0]

oi

 

pessoal estou com um pequeno problema, veja:

 

For Each UploadedFile in objUpload.Files   caminho = UploadedFile.Path   Next  		quebra = split(caminho,"\")		nom_arq = quebra(ubound(quebra))

depois eu fiz assim:

 

bd.Execute("INSERT INTO imagem ( nome_img , nome_img_ren , cod_func ) VALUES ('" & nom_arq & "' , " & "null" & " , " & vcod_func & " )")

mas ta aparecendo este erro:

 

Microsoft JET Database Engine error '80040e57'The field is too small to accept the amount of data you attempted to add. Try inserting or pasting less data./outros/funcionarios/grava_func.asp, line 129

linha 129:

bd.Execute("INSERT INTO imagem ( nome_img , nome_img_ren , cod_func ) VALUES ('" & nom_arq & "' , " & "null" & " , " & vcod_func & " )")

 

 

????????

 

t+

[«« mµr¡£ø »» 0]

Tente esta linha de comando e vê o que dá.... <_<

 

bd.Execute("INSERT INTO imagem (nome_img , nome_img_ren , cod_func ) VALUES ('" & nom_arq & "', 'null', '" & vcod_func & "')")

[enrrike 0]

NAO ESTA DANDO ERRO NO "NULL" NAOELE ESTÁ GRAVANDO "NULL" NO BANCO ESTA CORRETOO PROBLEMA É MESMO NO "NOM_ARQ"TEM ALGUMA ERRADAT+

[Alex_ps 0]

enrrikeVeja se o problema não está no tamanho que você deu para a coluna no banco de dados.Aparentemente você está querendo enviar para o banco, uma informação que não cabe na "célula". Tipo no Access, texto = 50 e você quer colocar um texto de 70, 80 ou qualquer outro maior que 50.alex_ps

[enrrike 0]

NO BANCO TEM ESPAÇO DE "50"ACREDITO QUE O ERRO NAO SEJA DE TAMANHO, POIS AKI SE você REPARAR ELE SÓ ESTA PEGANDO O NOME DA FIGURA QUE TEM MAIS OU MENOS UNS 8 LETRAS (EX: HENRIQUE.JPG)TEM ALGUMA OUTRA COISA ERRADAMAS NAO SEI O QUE É, MAS NÃO É CONCERTEZA QUANTO AO TAMANHO NO BANCO , POIS ESTÁ COM 50 CARACTERES DE ESPAÇOT+

[Mário Monteiro 179]

escreve na tela o resultado da string SQL fica mais facil de ver o erro