de condicional if
estou com uma duvida como faco para inserir uma condicional if no form conforme demonstro logo abaixo
estou tentando desta maneira
<%if grupo = "" then %> value="<%objRS("autonum")%>" <%else%> value="<%objRS1("codgrupo")%>" <%end if%>
o codigo é assim (um trecho apenas)
<%'Response.Expires = 0On error resume NextDim objConn, codmot, stringSQL, stringSQL1, stringSQL2, stringSQL12, stringSQL3, stringSQL4, stringSQL5, data, stringSQL6, stringSQL7, stringSQL8, stringSQL9, stringSQL10, stringSQL11, strConnection, id, nome, telefone, email, comentario, fantasia, razao, cidade, est, bairro, cep, fone, celular, fax, cnpj, insc, site, endereco, cod, frete, transgrupo = Request.QueryString("codgrupo")forn = Request.QueryString("forn")prod = Request.QueryString("prod1")prod2 = Request.QueryString("prod2")prod3 = Request.QueryString("prod3")prod4 = Request.QueryString("prod4")prod5 = Request.QueryString("prod5")prod6 = Request.QueryString("prod6")prod7 = Request.QueryString("prod7")codmot = Request.QueryString("codmot")comis = Request.QueryString("comis")trans = Request.QueryString("trans")data = Request.QueryString("data")id = Request.QueryString("radio")'On error Resume Next' Conectando com o banco de dados contato.mdbSet objConn = Server.CreateObject("ADODB.Connection")Set objRS = Server.CreateObject("ADODB.Connection")objConn.Open "DBQ=" & "d:\web\localuser\arrozvivamaria\banco\contato.mdb" & ";Driver={Microsoft Access Driver (*.mdb)}"stringSQL = "SELECT * FROM gp WHERE autonum = "&grupoSet objRS = objConn.Execute(stringSQL)stringSQL1 = "SELECT * FROM cp WHERE autonum = "&idSet objRS1 = objConn.Execute(stringSQL1)stringSQL2 = "SELECT * FROM prod WHERE cod = "∏&""Set objRS2 = objConn.Execute(stringSQL2)stringSQL3 = "SELECT * FROM prod WHERE cod = "&prod2&""Set objRS3 = objConn.Execute(stringSQL3)stringSQL4 = "SELECT * FROM prod WHERE cod = "&prod3&""Set objRS4 = objConn.Execute(stringSQL4)stringSQL5 = "SELECT * FROM prod WHERE cod = "&prod4&""Set objRS5 = objConn.Execute(stringSQL5)stringSQL6 = "SELECT * FROM prod WHERE cod = "&prod5&""Set objRS6 = objConn.Execute(stringSQL6)stringSQL7 = "SELECT * FROM prod WHERE cod = "&prod6&""Set objRS7 = objConn.Execute(stringSQL7)stringSQL8 = "SELECT * FROM prod WHERE cod = "&prod7&""Set objRS8 = objConn.Execute(stringSQL8)stringSQL9 = "SELECT * FROM fr WHERE autonum = "&codmotSet objRS9 = objConn.Execute(stringSQL9)stringSQL10 = "SELECT * FROM fr WHERE autonum = "&comisSet objRS10 = objConn.Execute(stringSQL10)stringSQL11 = "SELECT * FROM fr WHERE autonum = "&transSet objRS11 = objConn.Execute(stringSQL11)stringSQL12 = "SELECT * FROM fr WHERE autonum = "&fornSet objRS12 = objConn.Execute(stringSQL12)'Deletando registro da tabela contato onde esta a id%><body><form method="post" action="insert_into.asp" name="form" onsubmit="return valida_campo(); calculaMoeda()"> <div align="center"> <center> <table border="0" width="890" bgcolor="F5F5F5"> <tr bgcolor="#FFFFFF"> <td colspan="9" height="34"> <div align="center"><b> <font face="Verdana, Arial, Helvetica, sans-serif" size="2" color="#000066"> Compras de Qualquer Genero</font></b></div> </td> </tr> <tr> <td width="884" colspan="9"><font face="Verdana" size="2" color="#0000CC">Grupo: </font> <input type="text" name="codgrupo" size="6" onFocus="nextfield ='grupo';" <%if grupo = "" then %> value="<%objRS("autonum")%>" <%else%> value="<%objRS1("codgrupo")%>" <%end if%> style="font-family: Verdana; font-size: 8 pt;COLOR: 0000CC;"><input type="text" name="grupo" size="22" onFocus="nextfield ='data';" value="<%=objRS("nome")%>" style="font-family: Verdana; font-size: 8 pt;COLOR: 0000CC;"> <font face="Verdana" size="2" color="#0000CC">Data: </font>Discussão (2)
Carregando comentários...