Ir para conteúdo

Arquivado

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

Arrasted

Somar

Recommended Posts

pessoal

Fiz uma página para Inserir alimentos "AddAlimento.asp" outra para visialização

ViewAliments.asp...tem uns 200 registros aginados belezinha. ainda estou cadastrando os intens.uns 5000 aprox.

Meu problema é: na pag. "AddAlimento.asp" eu tenho o codigo do alimento, um campo do Database.. no MSDEReLA nao da para usar o AUTOINCREMENT.

Como poderia fazer para somar +1 no codigo do alimento?

Trazer o ultimo registro do campo atraves de um rs ? e montar uma função para somar +1? Nao tenho ideia de como fazer ...Iniciantes....rs

 

Abraço

Compartilhar este post


Link para o post
Compartilhar em outros sites

mais ou menos tiozinhoseleciona o maior MAX(ID) e soma um depois

Compartilhar este post


Link para o post
Compartilhar em outros sites

Desculpe a ignorancia Mario, ma poderia me ajudar, nao imagino onde e como ira o valor +1...como poderia montar essa &¨¨%...sei que é facil, mas tenho minhas limiações e estou querendo aprender..Muito Obrigado.

 

ASP

[*]<%

 

[*]Set Conn Server.CreateObject("ADODB.CONNECTION")

 

[*]Conn.Open "Driver={SQL Server};server=localhost;database=NutInfantil;UID=sa;PASS=00000000", Conn

 

[*]Set rs Conn.Execute("SELECT MAX(ID)"), Conn

 

[*]%>

 

[*]<%

 

[*]Do Whie Not rs.EOF

 

[*]%>

 

[*]<body>

 

[*]<table width="500" border="0" align="center" cellpadding="0" cellspacing="0">

 

[*]<tr><td>

 

[*]<form name="AddAlimento" method="post" action="AddAlimentoOk.asp">

 

[*]<input type="text" value="<%=rs("ID")%>" name="ID" class="Forms1">

 

[*]</form>

 

[*]</td></tr>

 

[*]</table>

<%

rs.Movenext

Loop

Conn.Close

Set Conn = Nothing

%>

</body>

</html>

Compartilhar este post


Link para o post
Compartilhar em outros sites

Seria isso?

 

Preciso somar +1 ao ID qdo abrir minha pag de inclusao...e caraca o MAX nao funfa no SQLSERVER?

 

ASP

[*]--------------------------------------------------------------------

 

[*]<%

 

[*]Set Conn Server.CreateObject("ADODB.CONNECTION")

 

[*]Conn.Open "Driver={SQL Server};server=localhost;database=NutInfantil;UID=sa;PASS=00000", Conn

 

[*]Set rs Server.Createobject("ADODB.RECORDSET")

 

[*]Set rs.ActiveConnection = Conn

 

[*]rs.CursorType = 3

 

[*]rs.Open "SELECT MAX ID FROM Alimentos "

 

[*]%>

 

[*]<%

 

[*]Do While Not rs.EOF

 

[*]%>

 

[*]<form name="AddAlimento" method="post" action="AddAlimentoOk.asp">

 

[*]<input type="text" value="<%=rs("ID")+1%>" name="ID">

 

[*]</form>

 

[*]<%

 

[*]rs.Movenext

 

[*]Loop

 

[*]Conn.Close

 

[*]Set Conn = Nothing

 

[*]%>

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.