Search the Community

Bom dia pessoal, Alguém pode postar um modelo de script que conte a quantidade de registros de uma tabela chamada comércios e imprima na tela desta forma: Restaurantes - (6) Lanchonetes - (5) Bares - (10) Agradeço demais

Boa tarde tudo bem? Tenho um relatório desenvolvido em asp onde a base está em sql server. Como que posso fazer para que quando vou puxar o relatório e caso eu queira parar a execução? Ter um botão PARAR. Podem me ajudar por favor? Obrigado desde já.

Olá amigos, estou sempre navegando pelo forum e sempre encontro a resposta para o que preciso, mas dessa vez não encontrei e estou aqui pedindo um Help. Tenho um script em Asp Classico para pagamentos em cartão de crédito. no carrinho o usuário pode colocar varios cursos, sendo que cada um tem um limite de parcelas sem juros diferente ou não. Sendo assim, precisava encontrar uma forma de encontrar os arrays que tem o mesmo valor para fazer a cobrança noi cartão juntos. o sistema fará uma, duas ou mais cobranças diferentes no cartão conforme o numero de parcelas. Ex: parcelas(1) = 3 parcelas(2) = 6 parcelas(3) = 5 parcelas(4) = 3 preciso montar uma forma de saber quais parcelas são iguais para somar o valor e fazer uma cobrança só com esse numero de parcelas. OBS: com essas variaveis acima, o sistema faria 3 cobranças no cartão do cliente, 1 cobrança do valor somado dos itens que tem 3 parcelas selecionadas, 1 cobrança do valor do item que tem 6 parcelas selecionadas e 1 cobrança do item que tem 5 parcelas selecionadas. Vocês podem dar um HELP???

Bom dia gente, estou aqui brincando com o ASP Clássico mas me deparei com um problema antigo mas que eu não lembro como corrigir que é a acentuação eu tentei uma dica mais cedo mas não deu certo ai fiz uma função para fazer o replace mas não ta rolando alguém tem alguma ideia ? o testo esta na base como " Proximo " porém quando vai pra tela aparece assim próximo obrigado pela força

Pessoal, Boa Tarde. Precisando criar uma aplicação em ASP Clássico para envio de mensagens SMS, me deparei com alguns códigos e tutoriais mais antigos de outras linguagens, para envio de mensagens via WhatsApp em C, PHP, .NET, etc.... Seria possível fazer isso via ASP Clássico? Se sim, como? Agradeço a ajuda!

Fala ai galera, Estou precisando de uma ajuda no seguinte caso: Eu fiz a migracao de dados de um firebird para o sql 2008, mas não estou conseguindo fazer a aplicacao conectar no banco. Alguem poderia me ajudar?? PS: MANJO NADA DE ASP CLASSICO :(

Olá Existe a necessidade de matar um objeto XMLHTTP depois de aberto e usado ? ou após o uso da propriedade Send o objeto é destruído automaticamente ?

Boa tarde! Não sei se seria o lugar correto mas queria deixar uma pequena colaboração, em meio a pesquisa na internet não achei uma forma para o asp clássico de fazer replace entre duas variáveis definida e tentei estudar um pouco sobre replace e não consegui entender ao certo, então apelei. Em meio ao texto pode ser que precise remover algo que está entre o determinada parte do conteúdo, ex: Abacaxi <0,1111> desidratado, para Abacaxi desidratado. Criei a função abaixo: FUNCTION REPLACE_ENTRE(VARIAVEL,INICIO,FIM) TEXTO=VARIAVEL INICIA=split(TEXTO,INICIO) IF Ubound(INICIA)>"0" Then FINALIZA=split(INICIA(1),FIM) REPLACE_ENTRE=INICIA(0)&""&FINALIZA(1) ELSE REPLACE_ENTRE=TEXTO END IF END FUNCTION Para fazer o replace chama ela dessa forma, caso queira pode fazer a alteração dos caracteres para qualquer um que deseja (desde que haja diferença entre elas tipo: [ , ], <,>, sx, xs): REPLACE_ENTRE("Variavel que deseja fazer replace","caractere que identifica inicio","caractere que identifica o final") Quero retirar uma parte do texto onde fica entre os caracteres "[" e "]". Há quem o faça [mas não o aconselha] por isso não o farei. FUNCTION REPLACE_ENTRE(VARIAVEL,INICIO,FIM) TEXTO=VARIAVEL INICIA=split(TEXTO,INICIO) IF Ubound(INICIA)>"0" Then FINALIZA=split(INICIA(1),FIM) REPLACE_ENTRE=INICIA(0)&""&FINALIZA(1) ELSE REPLACE_ENTRE=TEXTO END IF END FUNCTION TEXTO="Há quem o faça [mas não o aconselha] por isso não o farei." TEXTO=REPLACE_ENTRE(TEXTO,"[","]") Imprimindo a variável ela ficará assim: Há quem o faça por isso não o farei. É isso ai

Boa Tarde a todos, Sou novo no fórum e na área de desenvolvimento de software. Atualmente estou sozinho em projeto na qual tenho que migrar aplicações presentes no Windows Server 2003 para o windows Server 2012 e muitas dessas aplicações utilizam Asp Clássico. Não é possível realizar a migração do código para .NET ou uma outra tecnologia mais recente. A maioria dos problemas de compatibilidade foram resolvidos, porém algumas aplicações emitem relatórios utilizando componentes do Crystal Reports 7 que já não é mais suportado a 10 anos. Gostaria de saber quais são as alternativas que tenho para realizar a compatibilização destes relatórios dentro do ASP Clássico. Instalando uma versão mais recente do Crystal ele consegue processar os arquivos .rpt escritos no Crystal Reports 7? É necessário realizar a conversão dos relatórios para a versão mais recente do Crystal de maneira rápida ou eles terão que ser reescritos? Me ajudem pessoal

Galera que puder responder. A hospedagem windows do godaddy possui que tipo de componentes para upload, manipulação de arquivos, envio de email ??? Tipo Persits Upload e Persits JPeg... No site da godaddy não informa nada sobre esses componentes.

Boa tarde pessoal. Peguei um projeto pra fazer uma manutenção em Asp clássico e me deparei com um problema que ainda não encontrei solução. Ao passar uma variável do tipo text muito longa para salvar no banco (postgres), vejo que ela passa sem probemas, mas quando dou o commit (no postgre), parte do texto é simplesmente cortado. Alguém já se deparou com algum problema como esse? Fiz o mesmo procedimento em C# e não cortou. Mas o projeto inteiro está em Asp e não posso mudar. Obrigado.

Bom Dia!!! Preciso que ao digitar um número do processo e clicar na lupa, o processo vá pra caixa do select multiple, conforme imagem em anexo. Porém preciso esse processo várias vezes e ir populando o select multiple e depois clicar no botão selecionar e esses valores selecionados apareçam numa caixa de texto na tela principal, pois essa caixinha é um modal. Hj só consigo inserir um processo, se eu procurar por outro processo e clicar na lupa, ele substitui o que já está na caixa, ao invés de acrescentar.

Olá Alguém aqui sabe como eu posso testar o tamanho de um array multidimensional no ASP ? Ou transformar esse array em uma string só separada por um caractere qualquer ? Obrigado

Erro de tempo de execução do Microsoft VBScript erro '800a01b6' O objeto não dá suporte para a propriedade ou método: 'RecordCount' Estou obtendo esse erro ao tentar descobrir quantos registros foram retornados, O estranho é que em outras ocasiões, eu mesmo já usei método e não tive problemas Set objCommand= Server.CreateObject("ADODB.Command") Set objRecordset = Server.CreateObject("ADODB.Recordset") if not IsNull(Connection) then With objCommand .CommandText = "SELECT * FROM Usuario NOLOCK" .CommandType = 1 .ActiveConnection = Connection Set objRecordset = .Execute() End With end if

Qual a diferença entre Set e Let em classes Asp ? Public Property Let NomePessoa(params) nome = params End Property Public Property Set NomePessoa(params) nome = params End Property

Alguem tem uma luz Set Con = CreateObject("ADODB.Connection") Con.ConnectionString = "Provider=SQLOLEDB;Data Source=(Local);Initial Catalog=MyBank;Persist Security Info=False;Integrated Security=SSPI" OpenConnection = Con.Open Mensagem de erro Microsoft OLE DB Provider for SQL Server erro '80004005' Não é possível abrir o banco de dados "SimpleCrudWithBoostrap" solicitado pelo logon. Falha de logon.

function RecebeJson(VarJson) { novoJson = JSON.parse(VarJson); } Exemplo: stringTeste = "Eu estou estudando "Asp Clássico" Estou achando muito legal" <input type="button" value="chamar" onclick="RecebeJson('<%=stringTeste%>')"> Mas aí o ASP não entende a aspa dupla e da erros variados (Invalid tokens, Invalid strings, etc) Alguém sabe como posso contornar isso, ou seja, fazer o ASP ou JavaScript entender isso, estou tendo vários problemas com isso quando preciso enviar Json para uma função javascript. É um parto toda vez que o JavaScript possui várias aspas duplas e simples tudo misturado. Desde já muito obrigado!

Bom dia pessoal, Estou com um problema na utilização de certificados IIS no windows server 2003, instalei o certificado segundo alguns tutoriais que encontrei na internet porém meu código está retornando o seguinte erro: "msxml6.dll erro '80072f0c' É necessário um certificado para concluir a autenticação do cliente /teste2.asp, linha 31" Instalei o certificado da seguinte maneira: executei o comando mmc no windows, na janela de console que foi aberta cliquei no menu Adicionar/remover snap in, na lista de snap-ins disponíveis adicionei "certificados", e importei meu certificado em todas as pastas. Obs: A linha 31 se refere a: "objXMLHTTP.send strRequest" Obrigado desde já. Segue código para maior entendimento: <% set objXMLHTTP = Server.CreateObject("MSXML2.ServerXMLHTTP.6.0") strRequest = "<soapenv:Envelope xmlns:soapenv=""http://schemas.xmlsoap.org/soap/envelope/"" xmlns:not=""http://o2p.processware.com.pt/WebServices/NotaFiscal"">" strRequest = "<soapenv:Header/>" strRequest = "<soapenv:Body>" strRequest = "<not:ImportDanfeXMLString>" strRequest = "<!--Optional:-->" strRequest = "<not:sFileName/>" strRequest = "<!--Optional:-->" strRequest = "<not:sXml><![CDATA[<?xml version=""1.0"" encoding=""UTF-8""?><nfeProc xmlns=""http://www.portalfiscal.inf.br/nfe"" versao=""3.10""><NFe xmlns=""http://www.portalfiscal.inf.br/nfe""><infNFe versao=""3.10"" Id=""NFe35150856840077000124550010000378361307308063""><ide><cUF>35</cUF><cNF>30730806</cNF><natOp>Industrializ</natOp><indPag>1</indPag><mod>55</mod><serie>1</serie><nNF>37836</nNF><dhEmi>2015-08-14T00:00:00-03:00</dhEmi><tpNF>1</tpNF><idDest>1</idDest><cMunFG>3549904</cMunFG><tpImp>1</tpImp><tpEmis>1</tpEmis><cDV>3</cDV><tpAmb>1</tpAmb><finNFe>1</finNFe><indFinal>0</indFinal><indPres>0</indPres><procEmi>0</procEmi><verProc>3.10</verProc><NFref><refNFe>35150707689002000189550040010342471862322584</refNFe></NFref></ide><emit><CNPJ>56840077000124</CNPJ><xNome>TECPLAS INDUSTRIA E COMERCIO LTDA EPP</xNome><xFant>TECPLAS</xFant><enderEmit><xLgr>RUA SERRA DO RONCADOR</xLgr><nro>377</nro><xBairro>JD ANHEMBI</xBairro><cMun>3549904</cMun><xMun>SAO JOSE DOS CAMPOS</xMun><UF>SP</UF><CEP>12235240</CEP><cPais>1058</cPais><xPais>BRASIL</xPais><fone>1239315233</fone></enderEmit><IE>645106684114</IE><CRT>3</CRT></emit><dest><CNPJ>07689002000189</CNPJ><xNome>EMBRAER S.A</xNome><enderDest><xLgr>AV. BRIGADEIRO FARIA LIMA,</xLgr><nro>2170</nro><xBairro>PUTIM</xBairro><cMun>3549904</cMun><xMun>SÃO JOSÉ DOS CAMPOS</xMun><UF>SP</UF><CEP>12227901</CEP><cPais>1058</cPais><xPais>BRASIL</xPais><fone>1239451884</fone></enderDest><indIEDest>1</indIEDest><IE>645999990110</IE><email>xml.embraer@embraer.com.br</email></dest><det nItem=""1""><prod><cProd>000000000563387</cProd><cEAN></cEAN><xProd>DEFLETOR PN:550-16872-403 PO:901653854/00130</xProd><NCM>88033000</NCM><CFOP>5124</CFOP><uCom>PÇ</uCom><qCom>1.0000</qCom><vUnCom>409.2700000000</vUnCom><vProd>409.27</vProd><cEANTrib></cEANTrib><uTrib>PÇ</uTrib><qTrib>1.0000</qTrib><vUnTrib>409.2700000000</vUnTrib><indTot>1</indTot><xPed>901653854</xPed><nItemPed>130</nItemPed></prod><imposto><ICMS><ICMS40><orig>0</orig><CST>50</CST></ICMS40></ICMS><IPI><cEnq>999</cEnq><IPINT><CST>55</CST></IPINT></IPI><PIS><PISNT><CST>06</CST></PISNT></PIS><COFINS><COFINSNT><CST>06</CST></COFINSNT></COFINS></imposto></det><det nItem=""2""><prod><cProd>000000000560985</cProd><cEAN></cEAN><xProd>PERFIL REFORÇO DO LT:C014659638 NF:1034247</xProd><NCM>88033000</NCM><CFOP>5902</CFOP><uCom>UM</uCom><qCom>1.0000</qCom><vUnCom>72.1700000000</vUnCom><vProd>72.17</vProd><cEANTrib></cEANTrib><uTrib>UM</uTrib><qTrib>1.0000</qTrib><vUnTrib>72.1700000000</vUnTrib><indTot>0</indTot><xPed>00901653854</xPed><nItemPed>8</nItemPed></prod><imposto><ICMS><ICMS40><orig>0</orig><CST>50</CST></ICMS40></ICMS><IPI><cEnq>999</cEnq><IPINT><CST>55</CST></IPINT></IPI><PIS><PISNT><CST>08</CST></PISNT></PIS><COFINS><COFINSNT><CST>08</CST></COFINSNT></COFINS></imposto></det><total><ICMSTot><vBC>0.00</vBC><vICMS>0.00</vICMS><vICMSDeson>0.00</vICMSDeson><vBCST>0.00</vBCST><vST>0.00</vST><vProd>409.27</vProd><vFrete>0.00</vFrete><vSeg>0.00</vSeg><vDesc>0.00</vDesc><vII>0.00</vII><vIPI>0.00</vIPI><vPIS>0.00</vPIS><vCOFINS>0.00</vCOFINS><vOutro>0.00</vOutro><vNF>409.27</vNF></ICMSTot></total><transp><modFrete>1</modFrete><transporta><CNPJ>53982542001145</CNPJ><xNome>TRANSPORTADORA AQUARIUN LTDA</xNome><IE>645648325117</IE><xEnder>R JAGUARAO, 276</xEnder><xMun>SAO JOSE DOS CAMPOS</xMun><UF>SP</UF></transporta><veicTransp><placa>AQU0097</placa><UF>SP</UF></veicTransp><vol><qVol>1</qVol><esp>VOLUME</esp><pesoL>0.066</pesoL><pesoB>0.066</pesoB></vol></transp><cobr><fat><nFat>000037836</nFat><vOrig>409.27</vOrig></fat><dup><nDup>000037836 01</nDup><dVenc>2015-09-20</dVenc><vDup>409.27</vDup></dup></cobr><infAdic><infCpl>ICMS SUSP. CONF. ART. 403 º 1 INC. II RICMS/00. IPI SUSP. CONF. ART. 42 INC VII DO RIPI/02. BC ICMS RED CONV.75/91, ATO COTEPE/ICMS N 84-DEZ/2006 - VL ENERGIA ELÉT. APLIC.=R$ 7,86/VL ICMS DIF.=R$ 0,31TOT. RET:R$ 72,17000</infCpl></infAdic></infNFe><Signature xmlns=""http://www.w3.org/2000/09/xmldsig#""><SignedInfo><CanonicalizationMethod Algorithm=""http://www.w3.org/TR/2001/REC-xml-c14n-20010315"" /><SignatureMethod Algorithm=""http://www.w3.org/2000/09/xmldsig#rsa-sha1"" /><Reference URI=""#NFe35150856840077000124550010000378361307308063""><Transforms><Transform Algorithm=""http://www.w3.org/2000/09/xmldsig#enveloped-signature"" /><Transform Algorithm=""http://www.w3.org/TR/2001/REC-xml-c14n-20010315"" /></Transforms><DigestMethod Algorithm=""http://www.w3.org/2000/09/xmldsig#sha1"" /><DigestValue>oJ/ZttztLJCTy+Bn6cDbaduPU6w=</DigestValue></Reference></SignedInfo><SignatureValue>YjYzW/EUVur+p/5feKTtncV7sFPfCTy1hMx0HgfPlHHpGM/gtp4DzPiU1aXZnkpZfgZPCcQ7yBZuYzkWEIr7RqmYZrxiDThoSOUoJSvBZ3EaoY6EXK44qjs7w3g3IAXVKJcVQN3widt4NpfUJRYCPOUT2sCbyPq6/qG69xhjl8SVoIUNBQp3ZDzhXs5Nar83pQ/DudoKa9xCnsR4Tkc45YGyq4EgrU8oFfVuHHJQlNen9o1kdLVw67+J19kx7AM7D9CIl5xx82aKQJY+ymXXZtsy/JXP500C30DZGyNQyDxBA7dsFL22cwVh52AqL+mGBSs2H/nQ6vGB7HyMhoOdqw==</SignatureValue><KeyInfo><X509Data><X509Certificate>MIIHyTCCBbGgAwIBAgIIZy0B437ooQMwDQYJKoZIhvcNAQELBQAwTDELMAkGA1UEBhMCQlIxEzARBgNVBAoTCklDUC1CcmFzaWwxKDAmBgNVBAMTH1NFUkFTQSBDZXJ0aWZpY2Fkb3JhIERpZ2l0YWwgdjIwHhcNMTUwNTI3MTMwOTAwWhcNMTgwNTI2MTMwOTAwWjCB7DELMAkGA1UEBhMCQlIxEzARBgNVBAoTCklDUC1CcmFzaWwxFDASBgNVBAsTCyhFTSBCUkFOQ08pMRgwFgYDVQQLEw8wMDAwMDEwMDYwOTU5ODQxFDASBgNVBAsTCyhFTSBCUkFOQ08pMRQwEgYDVQQLEwsoRU0gQlJBTkNPKTEUMBIGA1UECxMLKEVNIEJSQU5DTykxFDASBgNVBAsTCyhFTSBCUkFOQ08pMRQwEgYDVQQLEwsoRU0gQlJBTkNPKTEqMCgGA1UEAxMhVEVDUExBUyBJTkRVU1RSSUEgRSBDT01FUkNJTyBMVERBMIIBIjANBgkqhkiG9w0BAQEFAAOCAQ8AMIIBCgKCAQEA50llrp9AHvz2oQZJfPX0hinW9u5vjY9GlGPKk0BEWLIsBSfna028rDFmpvZyImfY3ZUj5h5FfUeVon+Oow4Qfin9HyV9wJLdWNz4Cdpv+I8aH3bnMEE5gFrfi4p0AYybaZ0sVfjOqx845jp01cSGoiE6aYcQkvL1uYPmpUkc9QrZc5HYjT4FRpI8tWGOFPzZdhQiVv+E/ddyZeav4yHyb+deM71WDOEnRJMdaNSoOWf5UvUgKTRehNbWEJuqmYAnx4CprwH6OCttCyeG/tQyBiJMs9pOr8K6DNVUTn5u4SrtRYrc5jBuEQ/oppSm4jjMvsKTjXF++oPHY33ChBYp7wIDAQABo4IDDDCCAwgwgZcGCCsGAQUFBwEBBIGKMIGHMEcGCCsGAQUFBzAChjtodHRwOi8vd3d3LmNlcnRpZmljYWRvZGlnaXRhbC5jb20uYnIvY2FkZWlhcy9zZXJhc2FjZHYyLnA3YjA8BggrBgEFBQcwAYYwaHR0cDovL29jc3AuY2VydGlmaWNhZG9kaWdpdGFsLmNvbS5ici9zZXJhc2FjZHYyMB8GA1UdIwQYMBaAFJrggxDXJpvputqCsoHOORrTh3CGMHEGA1UdIARqMGgwZgYGYEwBAgMDMFwwWgYIKwYBBQUHAgEWTmh0dHA6Ly9wdWJsaWNhY2FvLmNlcnRpZmljYWRvZGlnaXRhbC5jb20uYnIvcmVwb3NpdG9yaW8vZHBjL2RlY2xhcmFjYW8tc2NkLnBkZjCB8AYDVR0fBIHoMIHlMEmgR6BFhkNodHRwOi8vd3d3LmNlcnRpZmljYWRvZGlnaXRhbC5jb20uYnIvcmVwb3NpdG9yaW8vbGNyL3NlcmFzYWNkdjIuY3JsMEOgQaA/hj1odHRwOi8vbGNyLmNlcnRpZmljYWRvcy5jb20uYnIvcmVwb3NpdG9yaW8vbGNyL3NlcmFzYWNkdjIuY3JsMFOgUaBPhk1odHRwOi8vcmVwb3NpdG9yaW8uaWNwYnJhc2lsLmdvdi5ici9sY3IvU2VyYXNhL3JlcG9zaXRvcmlvL2xjci9zZXJhc2FjZHYyLmNybDAOBgNVHQ8BAf8EBAMCBeAwHQYDVR0lBBYwFAYIKwYBBQUHAwIGCCsGAQUFBwMEMIG1BgNVHREEga0wgaqBFlRBS0FTSElAVEVDUExBUy5DT00uQlKgPgYFYEwBAwSgNRMzMzAxMjE5NTA0NzI2ODQwOTgzNDAwMDAwMDAwMDAwMDAwMDAwMFcyMDM0OTMwRFBGIERGoBwGBWBMAQMCoBMTEVRBS0FTSEkgVFNVUlVNQUtJoBkGBWBMAQMDoBATDjU2ODQwMDc3MDAwMTI0oBcGBWBMAQMHoA4TDDAwMDAwMDAwMDAwMDANBgkqhkiG9w0BAQsFAAOCAgEAGVmz0j+q6P+BkdxShi1+5hs8rxpY00NgrGLXuuhVRI2ufKTwiwyjdv2ndljvSbUhYMGxiaEwKChJ/l/YcCuH+4rcMSBRJyF+cOm2R9gz04vXl/yFrM9VwBmUJYcU3LdM+2vox3Qb+XM5OEGlL17DHve4L44gNllEgO+U1omXSspi1XdSPMIQZFnFHMzT6cXRlBxf7Wz5rP/ziZPZrIOdshLSPw59O+Dwik6RPmjGAUuNU8wWURvGCtyBssfo44iQCYQLcQzDWizOxCblGnX97Rq5bR1VjHwS9N99Zf/6dZEfjz10pQpPB5nrav/vx1/PB8e9LsoK61AXE5Ji6FqJNZ5B8CxSRuHpqyM6qYjcSrDMX68H4QdjX6Js42rZlbT0/a2vnI8mYnHcvnnVeXzwQCzUeMwI+xnMB/XT6MZ8A5jW0MWpi4LkFAkuD8KcgwmMMU3iqBWSPhvK+vOXmzSu0haEK+2UNUSixD9OlXoxJogLP84iA1jrvA4CdFmG6rxFvQ/I18PdNPOhEu63oEm1U/Db3sE7C8bijHvwzcMAZKxxjYhtr/RPcPG1oL7CgH96nARx0R9kZHjFjpQhpfw2UES/LZzWC4CDAwn0sglZ66e9GdPZ/jRTrOZnLsSp5OdP96NXu1hBZz00BtcjnvrkYzfXW6XQvHIBOVNs5MAqLBM=</X509Certificate></X509Data></KeyInfo></Signature></NFe><protNFe versao=""3.10""><infProt Id=""NFe135150502857971""><tpAmb>1</tpAmb><verAplic>SP_NFE_PL_008f</verAplic><chNFe>35150856840077000124550010000378361307308063</chNFe><dhRecbto>2015-08-14T15:06:53-03:00</dhRecbto><nProt>135150502857971</nProt><digVal>oJ/ZttztLJCTy+Bn6cDbaduPU6w=</digVal><cStat>100</cStat><xMotivo>Autorizado o uso da NF-e</xMotivo></infProt></protNFe></nfeProc>]]></not:sXml>" strRequest = "</not:ImportDanfeXMLString>" strRequest = "</soapenv:Body>" strRequest = "</soapenv:Envelope>" objXMLHTTP.open "post", "https://piqas.embraer.com.br:51001/XISOAPAdapter/MessageServlet?channel=LANMAR:LANMAR_P7Q:CC_LANMAR_SOAP", False objXMLHTTP.setRequestHeader "Content-Type", "text/xml; charset=utf-8" objXMLHTTP.setRequestHeader "Username", "SISTETCP" objXMLHTTP.setRequestHeader "Password", "Vatow034" 'objXMLHTTP.setRequestHeader "POST ", "/OTA/service.asmx HTTP/1.1" 'objXMLHTTP.setRequestHeader "HOST: ", "www5.trendoperadora.com.br" 'objXMLHTTP.setRequestHeader "Content-Length: ", "length" 'objXMLHTTP.setRequestHeader "SOAPAction", "http://tempuri.org/Request" objXMLHTTP.send strRequest strResult = objXMLHTTP.responseText %>

Tenho um sistema em ASP Classico, com um datepicker (Jquery), e quero que algumas datas sejam desabilitadas automaticamente. Essas datas devem popular automaticamente o array que desabilita as datas. (Hoje está manual como mostra a função abaixo) var disableddates = ["10-12-2015", "11-20-2015", "12-21-2015", "12-22-2015", "12-23-2015", "12-24-2015", "12-25-2015", "12-28-2015", "12-29-2015", "12-30-2015", "12-31-2015", "1-1-2016"]; Tenho uma procedure SQL Server que traz uma lista com todas essas datas. Como chamá-la antes de chamar o datepicker desabilitando essas datas?

Olá, estou com os seguintes problemas: Tenho um formulário em ASP Clássico, que possui um campo de data preenchido automaticamente com o valor recebido pela seleção no Datepicker. Embaixo dessa data, existem alguns campos que quero deixar ocultos e somente mostrar quando selecionar uma data. 1) Quando mostrar a data os campos (um combo e um botão que chama uma função) devem vir com os valores padrão deles (o combo com o Selecione habilitado, e o botão sem mostrar nenhum horário) 2) Se eu mudar a data, os valores desses campos devem ser novamente zerados Tem uma função de zerarhorario, quando tento colocar o combo nessa seleção (com os valores padrões), desaparece a opção pra selecionar o datepicker. Se eu deixar pra zerar ele aparece o combo sem nada dentro. Então pensei em colocar uma div que abra os campos com eles nos valores padrão (sem nada selecionado). Não sei se é a melhor opção possível, mas... Alguém tem alguma ideia?! Obrigada!

Olá, Tenho um sistema de agendamento desenvolvido em Asp clássico e SQL Server, com um datepicker. E preciso desabilitar datas vindas de tabelas SQL Server das seguintes formas: 1) Desabilitar algumas datas específicas (como feriados por exemplo) desse datepicker, datas estas que estão em uma tabela SQL Server (id e data); 2) O sistema tem uma procedure que verifica a disponibilidade dos dias, caso não haja disponibilidade, desabilitar a data. Alguém poderia me ajudar?? Tô quebrando a cabeça procurando uma solução para esse problema e não tô conseguindo!!! :wacko: Obrigada!!!