Bueno, se que debe tratarse de un simple objeto

Bueno, si alguien sabe mas sobre este tema... muchas gracias

Un saludo!!
| ||||
Pues mira, en mis favoritos tengo esta liga desde hace uuuuuuhhhhhhh, pero nunca lo he programado para probarlo http://forum.mess.be/index.php?showtopic=357 |
| ||||
Acabo de encontrar este sitio, pero no hay nada de ASP y lo de PHP no tiene códigos. Lo mñas completo es .NET y VB http://forums.msnfanatic.com/index.php?showforum=82 |
| ||||
Código:
Ahi que chutarse completo esto <OBJECT classid=clsid:B69003B3-C55E-4B48-836C-BC5946FC3B28 codeType=application/x-oleobject id=IMessenger width=0 height=0 VIEWASTEXT></OBJECT> <script LANGUAGE="VBScript"> Sub Cuenta() dim Mis_contactos Set Mis_contactos = IMessenger.MyContacts msgbox "Tengo " & Mis_contactos.Count & " contactos" End Sub </script> </head> <body> <a href="#" onclick="vbscript:Cuenta()">veamos</a> </body>
__________________ "El hombre que ha empezado a vivir seriamente por dentro, empieza a vivir más sencillamente por fuera." -- Ernest Hemingway |
| ||||
Hola! Muchas gracias masters por la info, bastante infor he de decir ![]() Pero es raro, no encuentro nada concreto acerca del tema, toda la info trata directo de MSN, pero quiero jalar todo desde el mismo Hotmail y Yahoo, ICQ y Outlook (para este se ocupa un ActiveX), y no hay nada concreto, no es raro que haya tanto acerca del messenger ya que son productos de microsoft, pero nada de hotmail, y no encuentro una página donde venga eso, ya envie un e-mail a soporte de microsoft, espero que ellos si me contesten, cualquier dato, se los digo. Y bueno.... pues.... seguimos buscando.... ![]() Gracias!! |
| ||||
Encontre algo... Hola, pues encontre esto que al parecer es más lo que necesito... http://www.devarticles.com/c/a/C-Sha...ent-under-.NET Dice .NET lo se, ya lo vi... ![]() Sin embargo no tengo experiencia con XML ni con los objetos: - XMLHTTP - HTTPMail Por lo cual agradesco a quien tenga un ejercicio sencillo y fácil de ejemplo, como: test.asp <% Response.write "Viveeeeeeeeeeeee!!!" %> Algo así fácil, que me digan como: test.asp <% Response.write "Viveeeeeeeeeeeee!!!" %> <% XML ... Hola desde XML XML%> Es decir, como puedo usar esos objetos pero en ASP normal para lograr lo mismo. No se, algo así fácil, de como puedo integrar el XML o su sintaxis con mi archivo de ASP, ya puse algo parecido en el foro de XML, pero aquí están los masters (y) Gracias. |
| ||||
Bienvenido al fascinante y extenso mundo del XML ![]() ![]() Hacer una llamada a algun server mediante XMLHTTP
Código:
'No era eso lo que queria, me interesa parsear un XMLSet xml = Server.CreateObject("Microsoft.XMLHTTP") 'Obtengo el XML xml.Open "GET", "http://www.undominio.com", False xml.Send 'Supongase que este XML me regresara un Hola Mundo strHolaMundo = Cstr(xml.ResponseText) Response.Write strHolaMundo
Código:
<?xml version="1.0" ?> - <EZPAY VERSION="01.00"> - <HEADER> <REQUESTID>628200542306PM163128860</REQUESTID> <REQUESTTYPE>REQAUTHORIZE</REQUESTTYPE> </HEADER> - <DATA> <CONFIRMATIONNUMBER>4479085096718936</CONFIRMATIONNUMBER> <REASONCODE>100</REASONCODE> <REASONDESCRIPTION>Approved</REASONDESCRIPTION> </DATA> </EZPAY>
Código:
http://msdn.microsoft.com/library/de...ldomModule.aspSet ObjXML = Server.CreateObject("Microsoft.XMLDOM") ObjXML.Async = false ObjXML.Load Server.MapPath("../ruta/archivo.xml") if ObjXML.parseError.ErrorCode <> 0 then 'Aqui hay un error, vamos a mostrarlo Set er = ObjXML.parseError Response.Write er.Reason else Response.ContentType = "text/xml" Response.write ObjXML.xml end if http://www.4guysfromrolla.com/webtech/101200-1.2.shtml
__________________ "El hombre que ha empezado a vivir seriamente por dentro, empieza a vivir más sencillamente por fuera." -- Ernest Hemingway |
| ||||
Hola! Intente seguir las reglas y poner el tema en su lugar, pero nadie me respondes nada, en el siguiente link pueden parte de lo que tengo, y quisiera su opinión... http://forosdelweb.com/showthread.php?t=320024 Gracias. |
| ||||
![]() El ejemplo utiliza webDav, que no se si se necesite una implementacion especifica para ASP 3.0, a lo mejor esto te sirve Salu2,
__________________ "El hombre que ha empezado a vivir seriamente por dentro, empieza a vivir más sencillamente por fuera." -- Ernest Hemingway |
| ||||
Gracias De hecho ya lo pude hechar a andar, solo que es inestable, no me esta arrojando errores cuando necesito errores, aunque bueno, no me regresa nada asi que lo puedo ver como error, pero sigo viendo esas cosas para ponerlo a punto, estoy viendo como hacerlo estable, mirare lo que me pones, parece ser la forma correcta de hacerlo, gracias. |
| ||||
Re: Jalar las direcciones de Hotmail.com y Yahoo.com tiens algo de ese codigo ya en asp para probarlo? a mi tambien me interesaria tenerlo
__________________ Control de Visitantes, Control de Accesos, Minutas digitales, Manejo de Correspondencia http://www.controldevisitantes.com |
| |||
Re: Jalar las direcciones de Hotmail.com y Yahoo.com Este script lo desarrolle hace mas de un año, creo que es lo que buscas, lo que hace es obtener las direcciones del messenger y informacion relacionada con cada uno de los contactos. Te dejo los comentarios sobre parte del codigo que no consegui que funcionasen. <html> <head> <script LANGUAGE="VBScript"> Sub Cuenta() msgbox "Mi status es " & IMessenger.MyStatus If IMessenger.MyStatus<> 1 Then 'esto abre el correo electronico de mi cuenta 'IMessenger.OpenInbox msgbox "Mi nombre mostrado " & IMessenger.MyFriendlyName msgbox "MyServiceId " & IMessenger.MyServiceId msgbox "MyServiceName " & IMessenger.MyServiceName msgbox "MySigninName " & IMessenger.MySigninName ' ESTOS NO FUNCIONAN 'msgbox "MyPhoneNumber " & IMessenger.MyPhoneNumber 'msgbox "MyProperty " & IMessenger.MyProperty 'msgbox "ReceivedFileDirectory " & IMessenger.ReceivedFileDirectory 'msgbox "Services " & IMessenger.Services 'msgbox "UnreadEmailCount " & IMessenger.UnreadEmailCount 'msgbox "Window " & IMessenger.Window dim Mis_contactos Set Mis_contactos = IMessenger.MyContacts msgbox "Tengo " & Mis_contactos.Count & " contactos" for each contacto in Mis_contactos ' ESTOS FUNCIONAN msgbox contacto.signinname ' direccion de email msgbox contacto.FriendlyName ' nombre mostrado contacto msgbox contacto.Status ' estado contacto 'CON ESTE INICIO UN MENSAJE 'IMessenger.InstantMessage (contacto.signinname) 'CON ESTE INICIO UNA CONVERSAION DE VOZ 'IMessenger.StartVoice (contacto.signinname) Select Case (contacto.Status) Case 1 msgbox contacto.FriendlyName & " Offline" Case 2 msgbox contacto.FriendlyName & " Online" Case 6 msgbox contacto.FriendlyName & " Invisible" Case 10 msgbox contacto.FriendlyName & "Busy" Case 14 msgbox contacto.FriendlyName & " Be Right Back" Case 18 msgbox contacto.FriendlyName & " Idle" Case 34 msgbox contacto.FriendlyName & " Away" Case 50 msgbox contacto.FriendlyName & " On the Phone" Case 66 msgbox contacto.FriendlyName & " Out to Lunch" Case Else msgbox contacto.FriendlyName & " Unknown" End Select msgbox "contacto.Blocked " & contacto.Blocked msgbox "contacto.CanPage " & contacto.CanPage msgbox "contacto.IsSelf " & contacto.IsSelf msgbox "contacto.ServiceID " & contacto.ServiceID msgbox "contacto.ServiceName " & contacto.ServiceName msgbox "contacto.SigninName " & contacto.SigninName ' ESTOS NO FUNCIONAN 'msgbox "contacto.IDsOfNames " & contacto.IDsOfNames 'msgbox "contacto.TypeInfo " & contacto.TypeInfo 'msgbox "contacto.TypeInfoCount " & contacto.TypeInfoCount 'msgbox "contacto.PhoneNumber " & contacto.PhoneNumber 'msgbox "contacto.Property " & contacto.Property next else ' No funciona, para automaticamente logearse con la ultima credencial usada en el equipo 'IMessenger.AutoSignin end if End Sub </script> </head> <OBJECT classid=clsid:B69003B3-C55E-4B48-836C-BC5946FC3B28 codeType=application/x-oleobject id=IMessenger width=0 height=0 VIEWASTEXT></OBJECT> <body> <a href="#" onclick="vbscript:Cuenta()">veamos</a> </body> |