kuroi

marque a opcao e salve o projeto. depois é so abrir o mesmo .vbp de novo

se não imprime, acontece o que?

ou você cria um endereco pra ela em cada pc (entrando nas propriedadaes da pasta -> Compartilhamento da Web) ou você cria um endereco pelo servidor.

que ele o que?

d tudo não, você ainda não tentou ASC

50 mil e você acha muito?? eu trabalhava com 6 milhoes no access que suporta menos que o mysql. e pra falar a verdade acho que o limite de quanto o mysql suporta nem é contado em registros e sim em bytes. não sei direito qual o limite, mas acho que já saiu alguma coisa sobre isso aqui no forum, de uma pesquisada.

Response.Write "mensagem de retorno para o usuario"? e o seu script não está atualizando nd, já que você não executa o sql nenhuma hora

porque antes tinha dois selects e agora tem so um?? qual o codigo td que você está usando agora?? você tentou executar isso: select distinct mês from Comentario como consulta pra ver o que ele selecionava?? aparece valor em branco?? você olhou na tabela pra ver se não tem mesmo??

e assim? <%set rs2= server.CreateObject("ADODB.Recordset") set rs5= server.CreateObject("ADODB.Recordset") sql3= "select distinct mês from Comentario Where Not IsNull(mês)" sql5= "select distinct Ano from Comentario Where Not IsNull(Ano)" rs2.open sql3,con,3,3 rs5.open sql5,con,3,3 %> <%rs2.movefirst%> <option>Mês</option> <% do while rs2.eof = false%> <option><%=rs2("mês")%> </option> <% rs2.movenext %> <%loop%> </select></td> <td width="86" class="style1"> <select name="ano" style="width: 84px; height: 23;background:#8F0001;font:11px arial, helvetica, sans-serif;color:#ffffff;;scrollbar-face-color: #dddddd;scrollbar-highlight-color: #FFFFFF;scrollbar-shadow-color: #dddddd;scrollbar-arrow-color: #000000;scrollbar-dark-shadow-color: #cccccc;scrollbar-3d-light-color: #cccccc;"> <%rs5.movefirst%> <option>Ano</option> <% do while rs5.eof = false%> <option><%=rs5("Ano")%></option> <% rs5.movenext %> <%loop %> </select></td> <td width="33" height="37" align="center"> <input name="submit" type="Submit" value="Ok"style = "color:#ffffff; background-color:#8F0001; border:1pt solid #8F0001;font-size:12px;border:1pt solid #8F0001; font-family:arial; font-weight:700" > </td> </form>[/code] os campos mês e Ano são de que tipo?

você fez assim? <%set rs2= server.CreateObject("ADODB.Recordset") set rs5= server.CreateObject("ADODB.Recordset") sql3= "select distinct mês from Comentario Where Trim(mês) <> ''" sql5= "select distinct Ano from Comentario Where Trim(Ano) <> ''" rs2.open sql3,con,3,3 rs5.open sql5,con,3,3 %> <%rs2.movefirst%> <option>Mês</option> <% do while rs2.eof = false%> <option><%=rs2("mês")%> </option> <% rs2.movenext %> <%loop%> </select></td> <td width="86" class="style1"> <select name="ano" style="width: 84px; height: 23;background:#8F0001;font:11px arial, helvetica, sans-serif;color:#ffffff;;scrollbar-face-color: #dddddd;scrollbar-highlight-color: #FFFFFF;scrollbar-shadow-color: #dddddd;scrollbar-arrow-color: #000000;scrollbar-dark-shadow-color: #cccccc;scrollbar-3d-light-color: #cccccc;"> <%rs5.movefirst%> <option>Ano</option> <% do while rs5.eof = false%> <option><%=rs5("Ano")%></option> <% rs5.movenext %> <%loop %> </select></td> <td width="33" height="37" align="center"> <input name="submit" type="Submit" value="Ok"style = "color:#ffffff; background-color:#8F0001; border:1pt solid #8F0001;font-size:12px;border:1pt solid #8F0001; font-family:arial; font-weight:700" > </td> </form>[/code]

tenta assim: <div style="padding: 5px 5px 5px 0;" id="direito"> <div class="content" style="border: 1px solid red;"> Coluna da Direita1<br /> Coluna da Direita2<br /> Coluna da Direita3<br /> Coluna da Direita4<br /> Coluna da Direita5<br /> </div> </div>[/code] por algum motivo, da esse pau se você poe o padding-left. acho que acontece o que o cara ai em cima falou, ele passa do tamanho, mas o padding-left não é necessario já que ele esta com float right. vê que aqui deu certo.

executa esse codigo direto no banco de dados, como uma consulta pra ver o que ele retorna, porque acho que esta vindo sim uma linha em branco. ou tenta assim: sql3= "select distinct mês from Comentario Where Trim(mês) <> ''"

então fica mais facil. o esquema é você pegar no visual basic 6 e fazer um projeto que seja um ActiveX Control. ai você monta uma ferramenta que faz a impressao do jeito que você quer, ate usando crystal reports se quiser. depois disso não faco ideia cara, sei que tem como você acessar sua ferramenta via browser integrando na sua pagina, mas é muito foda. já vi gente fazendo isso e os caras faz uns esquema que eu não entendi nd. tipo se você não tem mta nocao vai ser bem foda pra você fazer isso. mas tipo se você pesquisar bastante e se você tiver alguém pra quem você possa perguntar você consegue com certeza. no que você precisar poste aí, não que eu va saber o que fazer...

a está, é que eu aprendi a nunca usar br. quanto ao seu problema, tenta tirar essa linha: <div id="direito"> <div class="content" style="border: 1px solid red"> Coluna da Direita1<br /> Coluna da Direita2<br /> Coluna da Direita3<br /> Coluna da Direita4<br /> Coluna da Direita5<br /> </div> Tira esse br daqui e tenta --> <br /> <!-- hack para IEca, mas não funcionou --> </div>[/code] a esta é foda, meu ainda so 100% contra esse corretor do forum, p*** que pariu

não manjo muito, mas acho que da pra fazer um controle activex em vb que faca isso. mas ai no caso, acho que você vai ter que hospedar o site no seu proprio pc, dependendo do controle que você fizer, acho que ele deve estar registrado no pc onde esta o site e ai não pode ser em qualquer servidor. mas esse negocio de activex normalmente é usado quando se faz sites para intranet. porque os navegadores sempre bloqueiam os downloads de activex e ninguém vai ser loco de autorizar o download de um controle de um site que não conhece (ou mesmo se conhecesse).

pode ate servir... desde que você programe direitinho

seu projeto deve usar alguns controles (ocx) ou dlls que não sejam do visual basic. tipo se no projeto você usar crystal reports ou outro software ou tenha baixado alguma ocx da internet, você vai ter que instala-la de novo.

O amon-ra beraldo já teve esse mesmo problema mas não achei o tópico em que ele falava sobre isso (e falava a solucao), troca uma ideia com ele. está estranho mesmo, porque você poe uma barra no final do br (<br />)? nunca vi isso, isso é normal??

você esta usando bd access, não? então a data tem que estar entre jogo da velha. otra coisa é que você não esta concatenando as variaveis na string, e sim escrevendo-as por extenso. o certo deve ser assim, veja se funciona: cmd.CommandText = "SELECT * FROM [TbAtividade] WHERE [departamento] = '" & CboDepto & "' AND [data_inicial] >= #" & DtInicial & "# AND [data_inicial] <= #" & DtFinal & "#"

poste o codigo td da sp_atualDiariaSE1VerificaDebitosReneg do jeito que tava antes: set @atual = EXEC (sp_atualDiariaSE1VerificaDebitosReneg @matricula='100010057',@datainicio='20060601',@datafim'20061130',@vencimento'20060717') faltaram dois sinais de igual, sera que não funciona assim: set @atual = EXEC (sp_atualDiariaSE1VerificaDebitosReneg @matricula='100010057',@datainicio='20060601',@datafim='20061130',@vencimento='20060717')?

<% dim n n = 30 n = Right("00000" & n, 5) Response.Write(n) %>[/code] a qtd de zeros varia de acordo com qts digitos você quer que o numero tenha. a qtd de zeros deve ser o mesmo valor do right.

poste o codigo da sp_atualDiariaSE1VerificaDebitosReneg inteira. esse erro é so na hora de executar?? quando você poe check syntax, ele não acusa nada? e se você pusesse select @atual = EXEC (sp_atualDiariaSE1VerificaDebitosReneg @matricula='100010057',@datainicio='20060601',@datafim='20061130',@vencimento='20060717')? esses parametros @datainicio, etc estao em que formato?? se for datetime, ele aceita mesmo essa data sem formatacao??

o problema (acho) está aqui. você acho que esta passando mais parametros do que a procedure realmente pode receber. tipo, todos esses valores que você passou são mesmo parametros dessa procedure sp_atualDiariaSE1VerificaDebitosReneg? da uma olhada se você não passou a mais, ou esqueceu de declarar o parametro na propria sub sp_atualDiariaSE1VerificaDebitosReneg. ou talvez o erro esteja na sub sp_atualDiariaSE1VerificaDebitosReneg mesmo, tente testar ela direto no query analizer pra ver se não da problema. otra coisa, o que faz o OUTPUT no final da linha??

como hj eu to bozinho, resolvi todos, veja se funciona: sql = "Select * from Tabela Where Month(DataNasc) = Month(Date)" considerando que a semana comeca no domingo, faca assim: Data1 = DateAdd("d", (Weekday(Date) - 1) * -1, Date) Data2 = DateAdd("d", (Weekday(Date) - 7) * -1, Date) sql = "Select * from Tabela Where DataNasc Between #" & Data1 & "# And #" & Data2 & "#"[/code] [code]sql = "Select * from Tabela Where Day(DataNasc) = Day(Date) And Month(DataNasc) = Month(Date)" sql = "Select * from Tabela Where Day(DataNasc) = Day(DateAdd('d', 1, Date)) And Month(DataNasc) = Month(DateAdd('d', 1, Date))" sql = "Select * from Tabela Where Day(DataNasc) = Day(DateAdd('d', -1, Date)) And Month(DataNasc) = Month(DateAdd('d', -1, Date))"

deu uma pesquisada sobre winsock?