Olha amigos eu consequi resolver alguns erros do webcall.
Chego ate me loco como operador libero operador me loco como ussuario ele me pede o nome departamento e operador tudo bem. Ai eu tc em entrar ai ele ficxa na pagina de conectando com o operador aquarde e não se conecta
Pergunta
arldin
Olha amigos eu consequi resolver alguns erros do webcall.
Chego ate me loco como operador libero operador me loco como ussuario ele me pede o nome departamento e operador tudo bem. Ai eu tc em entrar ai ele ficxa na pagina de conectando com o operador aquarde e não se conecta
O link e este http://www.arldinartfest.com.br/chat/default.asp
O script da pagina e este abaixo
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <!--#include file="common.asp" --><!--#include file="check.asp" --><% 'On Error Resume Next Dim strQ,login_o strQ = Request.querystring("Q") IF strQ = "1" THEN strQ = strTxtAdminRequest ELSE strQ = "" END IF %><% 'Set some variables Dim rsChatRequest2 'Chat request record sheet 'Open a new connection to the database adoCon.Open cString 'Create new SQL string StrSQL="SELECT * FROM tblActiveUsers WHERE IP='" & strIPAddress & "';" 'StrSQL="SELECT * FROM tblActiveUsers;" 'Create new record sheet set rsChatRequest2 =Server.CreateObject("ADODB.Recordset") 'Set cursor and locktypes rsChatRequest2.CursorType = 2 rsChatRequest2.LockType = 3 'Open row data where the logged in users IP equals the IP in the database rsChatRequest2.open StrSQL, CString 'Set rsChatRequest2.fields("ChatRequest")=0 rsChatRequest2.Update 'Close record sheet and clean up rsChatRequest2.Close Set rsChatRequest2 = Nothing 'set rs1 = server.createobject("ADODB.RecordSet") 'StrSq1="SELECT * FROM tblSettings" 'rs1.open StrSq1,cString,3,3 'if rs1.recordcount <= CInt("3") then 'NomeOperador = rsp("OperatorName") 'login_o = rsp("login") 'end if 'if rs1.recordcount => CInt("1") then 'set rs0 = server.createobject("ADODB.RecordSet") 'StrSq0_0="SELECT TOP 1 * FROM tblSettings where o_ocupado <> 1 AND o_online = 1 order by id desc " 'rs0.open StrSq0_0,cString 'if rs0.EOF then 'response.redirect "una.asp" 'end if 'NomeOperador = rs0("OperatorName") 'login_o = rs0("login") 'end if %><% 'Redirect the administrator if the password in query string matches the one in the database IF strAdminPass = QstrAdminPass THEN Response.redirect("http://www.arldinartfest.com.br/chat/chat.asp?addpass="&strAdminPass&"&ID="&intUsrID) %><HTML><HEAD><TITLE><%=strTxttitulosite%></TITLE> <META http-equiv=Content-Type content="text/html; charset=iso-8859-1"><LINK href="style.css" type=text/css rel=stylesheet> <script language=javascript> function centraliza(x,y) { window.resizeTo(x,y); window.moveTo((window.screen.width-x)/2,(window.screen.height-y)/2); centraliza(410,350);} </SCRIPT> <script language=javascript> function centraliza(x,y) { window.resizeTo(x,y); window.moveTo((window.screen.width-x)/2,(window.screen.height-y)/2); centraliza(410,350);} </SCRIPT> <STYLE type=text/css> <!-- .style1 { font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 10px; } .formulario { font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 10px; color: #000000} --> </STYLE> <script> function carregar(){ var url; url = 'remote1.asp?aux=1&depto='+document.form1.Departamento[document.form1.Departamento.selectedIndex].valu e; document.form1.login_o.options.length = 0; if (document.form1.Departamento.value=="semdepto"){ window.location.href='default.asp'; }else{ addItem(document.form1.login_o,"Aguarde...carregando", "",false,document.form1.login_o.length) } myIframe.location = url; //document.form1.login_o.focus() } function inicia(){ local1 = new Array(); var maximo1, i, campo1; local1 = myIframe.org; campo1 = document.form1.login_o; maximo1 = local1.length; document.form1.login_o.options.length = 0; //addItem(campo1,'TODAS','',false,campo1.length); for (i=0;i<maximo1;i++){ addItem(campo1,local1[i][1],local1[i][0],false,campo1.length); } } function addItem(obj,strText,strValue,blSel,intPos){ var newOpt,i,ArTemp,selIndex; selIndex = (blSel)?intPos:obj.selectedIndex; newOpt = new Option(strText,strValue); Len = obj.options.length+1 if (intPos > Len) return obj.options.length = Len if (intPos != Len) { ArTemp = new Array(); for(i=intPos;i<obj.options.length-1;i++) ArTemp[i] = Array(obj.options[i].text,obj.options[i].value); for(i=intPos+1;i<Len;i++) obj.options[i] = new Option(ArTemp[i-1][0],ArTemp[i-1][1]); } obj.options[intPos] = newOpt; if (selIndex > intPos) obj.selectedIndex = selIndex+1; else if (selIndex == intPos) obj.selectedIndex = intPos; } function validar(){ if ((document.form1.login.value=="")||(document.form1.Departamento.value=="semdepto")||(document.form1.login_o.value=="0")){ ; return; } } </SCRIPT> <META content="MSHTML 6.00.2900.3354" name=GENERATOR></HEAD> <BODY text=#000000 vLink=#176093 aLink=#176093 link=#176093 bgColor=#ffffff leftMargin=0 background=images/image306.gif topMargin=0 onload="java script:document.all.operadores.style.visibility = 'hidden'" marginwidth="0" marginheight="0"> <DIV style="DISPLAY: none; POSITION: absolute" align=left><IFRAME id=myIframe name=myIframe marginWidth=0 marginHeight=0 src="<%=strTxtDominio%>" width=100 height=remote1.asp chat Arldinartfest></IFRAME></DIV> <TABLE height=300 cellSpacing=0 cellPadding=0 width=400 border=0> <TBODY> <TR> <TD vAlign=top><IMG src="images/topo.gif"></TD></TR> <TR> <TD height=200> <TABLE cellSpacing=0 cellPadding=2 width="98%" align=center border=0> <TBODY> <TR> <TD class=main align=middle> <FORM id=form1 name=form1 onsubmit=java script:validar(); action=chat_sort.asp method=post> <DIV align=center> <TABLE cellSpacing=0 cellPadding=0 width="98%" align=center border=0> <TBODY> <TR> <TD align=middle> </TD></TR> <TR> <TD align=middle><FONT face="Verdana, Arial, Helvetica, sans-serif" size=1><%=strTxtWelcome%></FONT></TD></TR> <TR> <TD align=middle> </TD></TR> <TR> <TD align=middle><FONT face="Verdana, Arial, Helvetica, sans-serif" size=1>Seu nome:</FONT> <INPUT class=form size=15 name=login> </TD></TR> <TR> <TD align=middle><IMG height=5 src="#" width=8></TD></TR> <TR> <TD align=middle><SELECT class=form onchange="java script:carregar();document.all.operadores.style.visibility = 'visible' " name=Departamento> <OPTION value=semdepto selected>Escolha o departamento:</OPTION> <OPTION value=Atendimento>Atendimento</OPTION></SELECT> </TD></TR> <TR> <TD align=middle><IMG height=5 src="#" width=8></TD></TR> <TR> <TD id=operadores align=middle><SELECT class=form size=1 name=login_o></SELECT> </TD></TR> <TR> <TD align=middle><IMG height=5 src="#" width=8></TD></TR> <TR> <TD align=middle><INPUT class=form type=submit value=entrar name=Submit></TD></TR> <TR> <TD align=middle> </TD></TR></TBODY></TABLE></DIV></FORM></TD></TR></TBODY></TABLE></TD></TR> <TR> <TD height=25> <TABLE cellSpacing=0 cellPadding=0 width="98%" align=center border=0> <TBODY> <TR> <TD align=middle><FONT face="Verdana, Arial, Helvetica, sans-serif" color=#666666 size=1>Powered by <A href="http://www.arldinartfest.com.br" target=_blank>Arldinartfest </A></FONT></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE></BODY></HTML> Ai ele vai para este outro <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <!--#include file="common.asp" --><% Dim addpass Dim strUsername Dim usrID Dim rs_q Dim login_o usrID = CLng(Request.querystring("ID")) username = Request.querystring("username") addpass = Request.querystring ("addpass") login_o = Request.querystring ("login_o") set rs_q = server.createobject("ADODB.RecordSet") 'rs_q.open "SELECT * FROM tblActiveUsers WHERE ID = " & usrID & " AND login = '" & login_o & "' ",cString rs_q.open "SELECT * FROM tblActiveUsers WHERE ID = " & usrID & " ",cString chat = rs_q("ChatRequest") if chat = "5" then response.redirect("http://www.arldinartfest.com.br/chat/chat.asp?addpass="&addpass&"&ID="&usrID&"&event=login&username="&username&"&login_o="&rs_q("Login")) 'response.redirect("http://www.arldinartfest.com.br/chat/chat.asp?addpass="&addpass&"&ID="&usrID&"&event=login&username="&username) else ' nada end if %><HTML><HEAD><TITLE><%=strTxttitulosite%></TITLE> <META http-equiv=Content-Type content="text/html; charset=iso-8859-1"> <STYLE type=text/css> <!-- .form { font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 10px; color: #CC3300} --> </STYLE> <META content="MSHTML 6.00.2900.3354" name=GENERATOR></HEAD> <BODY text=#000000 bgColor=#ffffff leftMargin=0 background=images/image306.gif topMargin=0 marginwidth="0" marginheight="0"> <META http-equiv=refresh content=3> <TABLE cellSpacing=0 cellPadding=0 width=400 border=0> <TBODY> <TR> <TD><IMG src="images/topo.gif"></TD></TR> <TR> <TD> </TD></TR> <TR> <TD> </TD></TR> <TR> <TD> </TD></TR> <TR> <TD align=middle><FONT face="Verdana, Arial, Helvetica, sans-serif" size=1><!--#include file="inc_aguarde.asp" --></FONT></TD></TR></TBODY></TABLE> <P><IMG style="WIDTH: 464px; HEIGHT: 268px" height=309 src="images/image428.jpg" width=430></P></BODY></HTML>Se alguém poder me da uma ajuda eu agradeço a toddos
Link para o comentário
Compartilhar em outros sites
10 respostass a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.