Inbox
Letters
to CommVerge
6/16/00
from John Knab
Not quite cordless
[In "No more cords"] Vincent Vermeer of Lucent kept making the claim that no more cords are needed with the ORiNOCO product (hope they didn't pay a consultant too much for that name).
As you read on, you find that the ORiNOCO base station needs cords to plug into a power outlet and again it needs cords to be connected to the Internet.
The other thing that Vermeer is forgetting to mention is that the remote units need cords in order to have long-term, always-on ability.The comment that it costs "less than one might think" does not convey a sub-$100 consumer price point.
I think Lucent is on the right track, but they are far from "no more cords" and are nowhere near "affordable" to the average consumer.
in reference to
No more
cords
|
Send your
own letters to CommVerge |
|
<%
Dim useKeywords
Dim intKeywordCount
Dim keywordArray
'****************************************************************************
' Functions used in all
'****************************************************************************
'Debug Tool: output Keyword info
Sub TestKeywordSetup()
If useKeywords Then
'Response.Write "
USING KEYWORD
"
'Response.Write "Count: " & intKeywordCount & "
"
If not isNull(keywordArray) Then
For each kword in keywordArray
'Response.Write kWord & "
"
Next
End If
Else
'Response.Write "NO KEYWORDS
"
End If
End Sub
%><%
'Response.Write "No Keyword"
useKeywords = False
%><%
'End Keywords - at this point if keywords are being used
'useKeywords is True
'intKeywordCount is the number of elements in keyword array
'keywordArray contains the keywords for this page
'If keywords are not being used useKeyword = False
'Call TestKeywordSetup()
%><%
Dim userID, transID, urlPathName, bstring, ipaddr, keyword
userID = "guestcahners"
transID = 0
On Error resume next
set guidMaker = Server.CreateObject("Membership.Guidgen.1")
If Err.Number <> 0 Then
Err.Clear
Else
transID = guidMaker.GenerateGUID
End If
' Try to create an AUO, if we are unable to create one we will try to retrieve a
' memuser cookie that was set from a previous session.
' The reason why we may not able to create an AUO is that this web site
' may not be mapped to a membership server.
' If the web server has been unmapped from a membership server, the memuser
' cookie may still be on the clients computer.
Set user = Server.CreateObject("Membership.UserObjects.1")
If Err.Number <> 0 Then
' Unable to create an AUO - not mapped to a membership server.
Err.Clear
strMem = Request.Cookies.Item("MEMUSER")
if "" <> strMem then
userID = strMem
end if
Else
' Successfully created an AUO - we are mapped to a membership server.
userID = LCase(user.cn)
' This check handles an anomoly with SiteServer P&M - see Larry for further details.
if Err.number <> 0 then
Err.Clear
strMem = Request.Cookies.Item("MEMUSER")
if "" <> strMem then
userID = strMem
end if
end if
End If
if "cegbutton" = "cegbutton" then
urlPathName = LCase(Request.ServerVariables("PATH_INFO"))
keyword = ""
else
urlPathName = LCase(Request.ServerVariables("PATH_INFO"))
keyword = ""
end if
bstring = Request.ServerVariables("HTTP_USER_AGENT")
bstring = Server.URLEncode(bstring)
ipaddr = Request.ServerVariables("REMOTE_ADDR")
Response.Write ""
If not useKeywords then
Dim MyArray(3)
MyArray(0) = 1
MyArray(1) = 2
MyArray(2) = 3
MyArray(3) = 4
intHighNo = 3
intLowNo = 0
if "False" = "True" then
For j = 1 to 25
Randomize
arrR1 = Int((intHighNo - intLowNo + 1) * Rnd + intLowNo)
arrR2 = Int((intHighNo - intLowNo + 1) * Rnd + intLowNo)
intTemp = MyArray(arrR1)
MyArray(arrR1) = MyArray(arrR2)
MyArray(arrR2)= intTemp
Next
end if
for nNumAds = 0 to 3
pos = MyArray(nNumAds)
Response.Write "
"
Response.Write ""
Response.Write "
"
Next
Else
'Use Keywords
If intKeywordCount = 0 Then
pos = 1
keyword = ""
Response.Write "
"
Response.Write ""
Response.Write "
"
Else
for nNumAds = 0 to (intKeywordCount - 1)
pos = nNumAds + 1
keyword = Server.URLEncode(keywordArray(nNumAds))
Response.Write "
"
Response.Write ""
Response.Write "
"
Next
End If
End If
Response.Write ""
%>
|
|
