Incluindo mais de um registro...

[mkboy 1]

Eu fiz um campo, onde você digita um numero e ele exibe a respectiva quantidade de campos com o nome c_fotos<input type="text" name="c_foto">Se eu digitar 3, ele ira exibir 3 campos, todos com o mesmo nome.E tenho um campo com o id que será inserido junto com o conteudo do campo.Então eu envio os 3 campos mas o ID para um INSERTNo insert eu faço assim:

c_idc = Request.form("c_idc")  'Aqui pego o IDc_fotos = Request.form("c_fotos")  'Aqui pego o conteudo do  c_fotos, no caso dos 3 campos

E faço o insert

SQLa = "Insert into tb_boletim_fotos"SQLa = SQLa  & "(b_categoria, b_fotos)"SQLa = SQLa  & " values('"&c_idc&"' , '"&c_fotos&"')"'response.write(SQLa)'response.endRSa = conexao.execute(SQLa)

Como já era de esperar, ele criou um registro no bando, que preencheu normal o campo ID, e no campo b_fotos e ele incluiu assim:foto01.jpg, foto02.jpg, foto03.jpgSó que eu queria que fosse criado tres registros no banco, um para cada fotoTIPO:ID - FOTO35 - foto01.jpg35 - foto02.jpg35 - foto03.jpgComo devo proceder?

[Salgado 4]

Dá uma olhada no "Perguntas Frequentes", no tópico sobre "Duvidas com Checkboxes" nele tem uma explicação que te ajudará nesse caso.

 

Qualquer coisa poste de novo.

[mkboy 1]

Num intindi! :huh: Veja o que fiz:

<% if Request("cod") = "11" then %><% screnn = Request.QueryString("screnn")r = Request.QueryString("r")c_idc = Request.form("c_idc")For i = 1 To Request.form("c_foto")SQLa = "Insert into tb_boletim_fotos"SQLa = SQLa  & "(b_categoria, b_fotos)"SQLa = SQLa  & " values('"&c_idc&"' , '"&c_fotos&"')"'response.write(SQLa)'response.endRSa = conexao.execute(SQLa)Nextresponse.redirect "boletim.asp?screnn="&screnn&"&r="&r&"&edit=01"end if %>

Passa direto e nao faz o insert!

[Salgado 4]

Teste agora:

<% if Request("cod") = "11" then %>

<%

 

screnn = Request.QueryString("screnn")

r = Request.QueryString("r")

c_idc = Request.form("c_idc")

 

For i = 0 To Request.form("c_foto").COUNT

 

SQLa = "Insert into tb_boletim_fotos "

SQLa = SQLa & "(b_categoria, b_fotos)"

SQLa = SQLa & " values('"& c_idc &"' , '"& Request.Form("c_fotos")(I) &"')"

'response.write(SQLa)

'response.end

RSa = conexao.execute(SQLa)

 

Next

 

response.redirect "boletim.asp?screnn="&screnn&"&r="&r&"&edit=01"

 

end if %>

[/tr]

[mkboy 1]

ERRO:

 

Tipo de erro:

Objeto Request, ASP 0105 (0x80004005)

Qualquer índice de matriz está fora do intervalo.

/galery/Comercial/Ballyhoo/testes/01/admin/insert.asp, line 195

ASP [/tr][tr]

<% if Request("cod") = "11" then %>

<%

 

screnn = Request.QueryString("screnn")

r = Request.QueryString("r")

c_idc = Request.form("c_idc")

 

For i = 0 To Request.form("c_foto").COUNT

 

193. SQLa = "Insert into tb_boletim_fotos "

194. SQLa = SQLa & "(b_categoria, b_fotos)"

195. SQLa = SQLa & " values('"& c_idc &"' , '"& Request.Form("c_fotos")(I) &"')"

 

RSa = conexao.execute(SQLa)

 

Next

 

response.redirect "boletim.asp?screnn="&screnn&"&r="&r&"&edit=01"

 

end if %>

[/tr]

[Salgado 4]

Ops corrige no request que está na SQL, está C_Fotos no lugar de C_Foto.

[mkboy 1]

O nome do campo form é c_fotos

 

 

Fiz assim:

 

ASP [/tr][tr]<% if Request("cod") = "11" then %>

<%

 

screnn = Request.QueryString("screnn")

r = Request.QueryString("r")

c_idc = Request.form("c_idc")

 

For i = 0 To Request.form("c_fotos").COUNT

 

SQLa = "Insert into tb_boletim_fotos "

SQLa = SQLa & "(b_categoria, b_fotos)"

SQLa = SQLa & " values('"& c_idc &"' , '"& Request.Form("c_fotos")(I) &"')"

RSa = conexao.execute(SQLa)

 

Next

 

response.redirect "boletim.asp?screnn="&screnn&"&r="&r&"&edit=01"

 

end if %>

[/tr]

 

Erro:

 

Objeto Request, ASP 0105 (0x80004005)Qualquer índice de matriz está fora do intervalo./galery/Comercial/Ballyhoo/testes/01/admin/insert.asp, line 195

[Marhault 1]

Tenta assim:

 

ASP [/tr][tr]<% if Request("cod") = "11" then %>

<%

 

screnn = Request.QueryString("screnn")

r = Request.QueryString("r")

c_idc = Request.form("c_idc")

 

For Each Foto in Request.form("c_fotos")

 

SQLa = "Insert into tb_boletim_fotos "

SQLa = SQLa & "(b_categoria, b_fotos)"

SQLa = SQLa & " values('"& c_idc &"' , '"& Foto &"')"

RSa = conexao.execute(SQLa)

 

Next

 

response.redirect "boletim.asp?screnn="&screnn&"&r="&r&"&edit=01"

 

end if %>

[/tr]

 

;)

[mkboy 1]

Fico muito agradecido aos amigos Salgado e Marhault pela atenção!Esse ultimo funcionou muito bem, ótimo mesmO!Voces poderiam me explicar sobre este for Each, queria entender um pouquinho!BRIGADU!

[Marhault 1]

O For Each funciona da mesma forma, so q você vai setar uma nova string q vai ter um novo valor a cada "Volta"...Como no seu codigo, a cada "Volta" do For o valor da string Foto vai ser um valor do Array... Entendeu?Axu q naum consegui explicar direito ^_^ mas eh moleza...Flwz