Colocar Codigo automatico

[cerburus 0]

Ola tenho o seguinte formulario de inclusão abaixo! porém o campo "Codigo" ele tem que ser gerado automatico por exemplo: a pessoa só digita o nome e o sistema insere o codigo automatico tipo: BRRO51026350000, esse "BRRO" tem que ficar padrao! segue em anexo o codigo! Se alguem puder me ajudar eu agradeço!

 

<center><font face="Arial" size="4"><b>Formulário de Inclusão</b></h2></center><%If IsEmpty( Request.Form("submit") ) Then%><form method=post action="<%=Request.ServerVariables("script_name")%>"><table border=0 width="80%" align=center>  <tr>    <td align=right valign=top><font face="Arial" size="2">codigo:</font></td>    <td align=left valign=top>      <font face="Arial" size="2">    <input type=text name="codigo" value="" size=15 maxlength=50 style="{<font-family:Arial; font-size:12}">    </td>  </tr>  <tr>    <td align=right valign=top><font face="Arial" size="2">nome:</font></td>    <td align=left valign=top>      <font face="Arial" size="2">    <input type=text name="nome" value="" size=15 maxlength=50 style="{<font-family:Arial; font-size:12}">    </td>  </tr>  </font></table><center><input type=submit name=submit value=Incluir style="{<font-family:Arial; font-size:12}"></center></form><%Else  If Not IsEmpty(Request.Form("submit")) AND Trim(Request.Form("codigo")) <> ""  AND Trim(Request.Form("nome")) <> ""  Then    Set Conexao = Server.CreateObject("ADODB.Connection")    Conexao.Open "DBQ=E:\db1.mdb;Driver={Microsoft Access Driver (*.mdb)};"    ComandoSQL = "INSERT INTO cliente (codigo, nome)"    ComandoSQL = ComandoSQL & " VALUES ("    ComandoSQL = ComandoSQL & "'" & Server.HTMLEncode(Request.FORM("codigo")) & "',"    ComandoSQL = ComandoSQL & "'" & Server.HTMLEncode(Request.FORM("nome")) & "')"    Set bd = Conexao.Execute(ComandoSQL)    Conexao.Close    Set bd = Nothing    Set Conexao = Nothing%>   <font face="Arial" size="2">   <center><br>   <br><a href="index.asp"><b>Clique aqui</b></a> para continuar</font></center><%  Else%>   <font face="Arial" size="2">   <center><br>   <br><a href="javascript:history.go(-1)"><b>Clique aqui</b></a> para voltar</font></center><%  End IfEnd If%></body></html>

[rOcKLoCo 0]

tenta colocar isso no value do campo código<%="BRRO"&Session.SessionID%>ou você pode ir no site abaixo q tem umas funções na parte de asp para gerar nº aleatórioswww.clubemasters.com.br/forum/vê se resolve alguma coisa.........até mais