"Mauricio Freitas [MVP]" <dr************@nowhere.invalid> wrote in message
news:eM**************@TK2MSFTNGP12.phx.gbl...
Hello
Does anyone know of a (good) asp script to browse/post nntp
(usenet/newsgroups)?
I know there are some ASP .Net ones, but I rather have this on ASP for now
since I'm still working on migrating my site later.
Posting is a relatively straight forward process. Here's a VBScript example
adapted from the following article:
http://msdn.microsoft.com/library/en..._newsgroup.asp
<script language="VBScript" runat="SERVER">
Dim Msg : Set Msg = CreateObject("CDO.Message")
Dim Cfg : Set Cfg = CreateObject("CDO.Configuration")
Cfg.Fields("http://schemas.microsoft.com/cdo/configuration/postusing").Value
= 2
Cfg.Fields("http://schemas.microsoft.com/cdo/configuration/nntpserver").Valu
e = "yournntpserver"
Cfg.Fields.Update
Set Msg.Configuration = Cfg
Msg.Subject = "Hello"
Msg.From = "us***@yourdomain.com"
Msg.Newsgroups = "yournewsgroup"
Msg.Post
</script>
Browsing is considerably more complicated. Basically, you need to create a
COM component to handle NNTP "Event Sinks". I've never attempted it myself
but here's the documentation if you're feeling adventurous:
http://msdn.microsoft.com/library/en...s_with_cdo.asp