<%@ Language=VBScript %>
<%
pagecat = "JOIN US"
invitedby = request("invitedby")
if invitedby <> "" then
session.abandon
session("logout") = "true"
dim objConn ' Our Connection Object
dim rsCateg 'as ADODB.Recordset
Set objConn = CreateObject("ADODB.Connection")
set rsCateg = Server.CreateObject("ADODB.Recordset")
objConn.open connStr
set objRS1 = objConn.Execute("SELECT name, contactfname, contactlname, uid FROM members where id = '" & sqr(invitedby + 1) & "'")
if not objRS1.eof then
if objRS1("name") <> "--ind--" then
whoinvited = objRS1("name")
elseif objRS1("contactfname") & " " & objRS1("contactlname") <> " " then
whoinvited = objRS1("contactfname") & " " & objRS1("contactlname")
else
whoinvited = objRS1("uid")
end if
invitedby = "invitedby=" & invitedby
else
invitedby = ""
end if
objConn.close
set objConn = nothing
end if
%>
<% if invitedby <> "" then%>
→You have been invited to join the network of: <%=whoinvited%>.
If you are already a VISUALBOSTON member, but would like to join this network,
log in here.
Otherwise, begin signing up by choosing a member type below.
|
<%end if%>
So you want to join the brand new VisualBoston project!
We’re small now, but with your help, we’re gonna big soon, and that is going to be good for all of us.
More and more people are turning to the net for news, entertainment and everything else. So why are
we waiting for big corporations and TV networks to define what internet TV is going to be?
Let’s create it ourselves!
Member types - Sign up as an individual or organization (or both)