Announcement

Collapse
No announcement yet.

Can't bring up Setup.asp w/o error msg

Collapse
X
 
  • Filter
  • Time
  • Show
Clear All
new posts

    Can't bring up Setup.asp w/o error msg

    Hi Jeff,

    I've been setting up Movie Manager without much luck. When I point the browser to ..../setup.asp, I get the following message in log and no show of the setup screen.

    9/28/2012 5:25:13 PM ~!~Web Server~!~Web Server authorized local login successful from: 192.168.0.122 User: hcooper
    9/28/2012 5:25:33 PM ~!~Error~!~Script compile error: 'HttpUtility' is not a member of 'Web'.on line 27
    9/28/2012 5:25:33 PM ~!~SCR~!~Option Strict OffImports VB = Microsoft.VisualBasicImports System.Web Imports System.IOImports System.Xml Imports System.DataImports System.Data.SqlClientimports Schedulerimports SystemPublic Module scriptcode4#Region "Automatically generated code, do not modify"'Automatically generated code, do not modify'Event Sources Begin <System.ContextStaticAttribute()> Public WithEvents hs As Scheduler.hsapplication <System.ContextStaticAttribute()> Public WithEvents hsp As scheduler.hsp <System.ContextStaticAttribute()> Public WithEvents hssystem As scheduler.phone0'Event Sources End'End of automatically generated code#End RegionPublic Dim debugMode As Boolean = falsePublic Dim sINI as String = "movies.ini"Public Dim IName = "MovieManager"Sub Main(Optional ByVal sParam as String = "") hs.WriteLog(IName,"You must specify the function name when calling this script.")End SubFunction urlEncode(ByVal sURL as String) Return System.Web.HttpUtility.UrlEncode(sURL)End FunctionFunction webAdminLinks(ByVal sChkUser as String) Dim aSort Dim x, nPriv, nLoop as Integer Dim fs, ss as Object Dim sURL, sBtn, sAlt, sLev, rtS, sPath, sSort as String debugMode = hs.GetINISetting("Settings","debugMode","False",sINI) nPriv = webPermissions(sChkUser) if hs.GetINISetting("webPages","showMenu","1",sINI) = "1" Then sPath = hs.GetINISetting("adminPages","pagePath","movies",sINI) sSort = hs.GetINISetting("adminPages","pageSort","1",sINI) fs = hs.CreateStringClass ss = hs.CreateStringClass fs.Add("<br/>") aSort = Split(sSort,",") for x = 0 to aSort.GetUpperBound(0) nLoop = aSort(x) ss.Add("pageURL") ss.Add(nLoop) sURL = hs.GetINISetting("adminPages",ss.Value,"",sINI) ss.Reset ss.Add("pageBtn") ss.Add(nLoop) sBtn = hs.GetINISetting("adminPages",ss.Value,"",sINI) ss.Reset ss.Add("pageAlt") ss.Add(nLoop) sAlt = hs.GetINISetting("adminPages",ss.Value,"",sINI) ss.Reset ss.Add("pageLev") ss.Add(nLoop) sLev = hs.GetINISetting("adminPages",ss.Value,"",sINI) ss.Reset if (lCase(sLev)) <> "none" Then if (lCase(sLev) <> "admin") OR (nPriv = 1) Then if len(trim(sURL)) > 0 Then fs.Add("<input type=""button"" class=""functionrowbutton"" value=""") fs.Add(sBtn) fs.Add(""" alt=""") fs.Add(sAlt) fs.Add(""" onClick=""location.href='/") fs.Add(sPath) fs.Add("/") fs.Add(sURL) fs.Add("'"" onmouseover=""this.className='functionrowbuttonselected';"" onmouseout=""this.className='functionrowbutton';"">") End if End if End if Next rtS = fs.Value ss = Nothing fs = Nothing End if Return rtSEnd FunctionFunction webPageLinks(ByVal sChkUser as String) Dim aSort Dim x, nPriv, nLoop as Integer Dim fs, ss as Object Dim sURL, sBtn, sAlt, sLev, rtS, sPath, sSort as String debugMode = hs.GetINISetting("Settings","debugMode","False",sINI) nPriv = webPermissions(sChkUser) if hs.GetINISetting("webPages","showMenu","1",sINI) = "1" Then sPath = hs.GetINISetting("webPages","pagePath","movies",sINI) sSort = hs.GetINISetting("webPages","pageSort","1,2",sINI) fs = hs.CreateStringClass ss = hs.CreateStringClass fs.Add("<br/>") aSort = Split(sSort,",") for x = 0 to aSort.GetUpperBound(0) nLoop = aSort(x) ss.Add("pageURL") ss.Add(nLoop) sURL = hs.GetINISetting("webPages",ss.Value,"",sINI) ss.Reset ss.Add("pageBtn") ss.Add(nLoop) sBtn = hs.GetINISetting("webPages",ss.Value,"",sINI) ss.Reset ss.Add("pageAlt") ss.Add(nLoop) sAlt = hs.GetINISetting("webPages",ss.Value,"",sINI) ss.Reset ss.Add("pageLev") ss.Add(nLoop) sLev = hs.GetINISetting("webPages",ss.Value,"",sINI) ss.Reset if (lCase(sLev)) <> "none" Then if (lCase(sLev) <> "admin") OR (nPriv = 1) Then if len(trim(sURL)) > 0 Then fs.Add("<input type=""button"" class=""functionrowbutton"" value=""") fs.Add(sBtn) fs.Add(""" alt=""") fs.Add(sAlt) fs.Add(""" onClick=""location.href='/") fs.Add(sPath) fs.Add("/") fs.Add(sURL) fs.Add("'"" onmouseover=""this.className='functionrowbuttonselected';"" onmouseout=""this.className='functionrowbutton';"">") End if End if End if Next rtS = fs.Value ss = Nothing fs = Nothing End if Return rtSEnd FunctionFunction webNoAccess(Optional ByVal sName as String = "") as String Dim na as Object Dim rtS as String debugMode = hs.GetINISetting("Settings","debugMode","False",sINI) na = hs.CreateStringClass na.Add("<table border=""0"" cellpadding=""0"" cellspacing=""1"">") na.Add("<tr><td class=""pagetitle""><span style=""display='';"" id=""pgtitle"">Page Access</span></td></tr>") na.Add("<tr><td class=""tablecolumn"">You do not have access to this page.</td></tr></table>") rtS = na.Value na = Nothing Return rtSEnd FunctionFunction webNotActive(Optional ByVal sName as String = "") as String Dim na as Object Dim rtS as String na = hs.CreateStringClass na.Add("<table border=""0"" cellpadding=""0"" cellspacing=""1"">") na.Add("<tr><td class=""pagetitle""><span style=""display='';"" id=""pgtitle"">Page Access</span></td></tr>") na.Add("<tr><td class=""tablecolumn"">This page is not active.</td></tr></table>") rtS = na.Value na = Nothing Return rtSEnd FunctionFunction webPageAccess(ByVal sPageName as String) as String Dim aType, aList as Array Dim x, nList as Integer Dim ca as Object Dim rtS, sList, sPage, sType as String debugMode = hs.GetINISetting("Settings","debugMode","False",sINI) rtS = "none" aType = split(sPageName,"|") if aType.GetUpperBound(0) = 1 Then sType = "adminPages" sPageName = aType(0) sList = hs.GetINISetting("adminPages","pageSort","1",sINI) aList = Split(sList,",") nList = aList.GetUpperBound(0)+1 Else sType = "webPages" sList = hs.GetINISetting("webPages","pageSort","1",sINI) aList = Split(sList,",") nList = aList.GetUpperBound(0)+1 End if ca = hs.CreateStringClass for x = 1 to nList ca.Add("pageURL") ca.Add(x) sPage = hs.GetINISetting(sType,ca.Value,"",sINI) ca.Reset if LCase(sPage) = LCase(sPageName) Then ca.Add("pageLev") ca.Add(x) rtS = lCase(hs.GetINISetting(sType,ca.Value,"",sINI)) ca.Reset Exit for End if Next ca = Nothing Return rtSEnd FunctionFunction webPermissions(ByVal sChkUser as String) Dim arrUsers, arrPrivs as Array Dim x, nAdmin, nPriv as Integer Dim sAllUsers, sUser as String debugMode = hs.GetINISetting("Settings","debugMode","False",sINI) sAllUsers = hs.GetUsers arrUsers = Split(sAllUsers, ",") nAdmin=0 For x = 0 To UBound(arrUsers) arrPrivs = Split(arrUsers(x),"|") sUser = arrPrivs(0) nPriv = arrPrivs(1) if lCase(sUser) = lCase(sChkUser) Then if nPriv AND 2 Then nAdmin=1 Exit for End if End if Next Return nAdminEnd FunctionEnd Module
    9/28/2012 5:25:33 PM ~!~Error~!~Script compile error: 'HttpUtility' is not a member of 'Web'.on line 27
    9/28/2012 5:25:33 PM ~!~SCR~!~Option Strict OffImports VB = Microsoft.VisualBasicImports System.Web Imports System.IOImports System.Xml Imports System.DataImports System.Data.SqlClientimports Schedulerimports SystemPublic Module scriptcode5#Region "Automatically generated code, do not modify"'Automatically generated code, do not modify'Event Sources Begin <System.ContextStaticAttribute()> Public WithEvents hs As Scheduler.hsapplication <System.ContextStaticAttribute()> Public WithEvents hsp As scheduler.hsp <System.ContextStaticAttribute()> Public WithEvents hssystem As scheduler.phone0'Event Sources End'End of automatically generated code#End RegionPublic Dim debugMode As Boolean = falsePublic Dim sINI as String = "movies.ini"Public Dim IName = "MovieManager"Sub Main(Optional ByVal sParam as String = "") hs.WriteLog(IName,"You must specify the function name when calling this script.")End SubFunction urlEncode(ByVal sURL as String) Return System.Web.HttpUtility.UrlEncode(sURL)End FunctionFunction webAdminLinks(ByVal sChkUser as String) Dim aSort Dim x, nPriv, nLoop as Integer Dim fs, ss as Object Dim sURL, sBtn, sAlt, sLev, rtS, sPath, sSort as String debugMode = hs.GetINISetting("Settings","debugMode","False",sINI) nPriv = webPermissions(sChkUser) if hs.GetINISetting("webPages","showMenu","1",sINI) = "1" Then sPath = hs.GetINISetting("adminPages","pagePath","movies",sINI) sSort = hs.GetINISetting("adminPages","pageSort","1",sINI) fs = hs.CreateStringClass ss = hs.CreateStringClass fs.Add("<br/>") aSort = Split(sSort,",") for x = 0 to aSort.GetUpperBound(0) nLoop = aSort(x) ss.Add("pageURL") ss.Add(nLoop) sURL = hs.GetINISetting("adminPages",ss.Value,"",sINI) ss.Reset ss.Add("pageBtn") ss.Add(nLoop) sBtn = hs.GetINISetting("adminPages",ss.Value,"",sINI) ss.Reset ss.Add("pageAlt") ss.Add(nLoop) sAlt = hs.GetINISetting("adminPages",ss.Value,"",sINI) ss.Reset ss.Add("pageLev") ss.Add(nLoop) sLev = hs.GetINISetting("adminPages",ss.Value,"",sINI) ss.Reset if (lCase(sLev)) <> "none" Then if (lCase(sLev) <> "admin") OR (nPriv = 1) Then if len(trim(sURL)) > 0 Then fs.Add("<input type=""button"" class=""functionrowbutton"" value=""") fs.Add(sBtn) fs.Add(""" alt=""") fs.Add(sAlt) fs.Add(""" onClick=""location.href='/") fs.Add(sPath) fs.Add("/") fs.Add(sURL) fs.Add("'"" onmouseover=""this.className='functionrowbuttonselected';"" onmouseout=""this.className='functionrowbutton';"">") End if End if End if Next rtS = fs.Value ss = Nothing fs = Nothing End if Return rtSEnd FunctionFunction webPageLinks(ByVal sChkUser as String) Dim aSort Dim x, nPriv, nLoop as Integer Dim fs, ss as Object Dim sURL, sBtn, sAlt, sLev, rtS, sPath, sSort as String debugMode = hs.GetINISetting("Settings","debugMode","False",sINI) nPriv = webPermissions(sChkUser) if hs.GetINISetting("webPages","showMenu","1",sINI) = "1" Then sPath = hs.GetINISetting("webPages","pagePath","movies",sINI) sSort = hs.GetINISetting("webPages","pageSort","1,2",sINI) fs = hs.CreateStringClass ss = hs.CreateStringClass fs.Add("<br/>") aSort = Split(sSort,",") for x = 0 to aSort.GetUpperBound(0) nLoop = aSort(x) ss.Add("pageURL") ss.Add(nLoop) sURL = hs.GetINISetting("webPages",ss.Value,"",sINI) ss.Reset ss.Add("pageBtn") ss.Add(nLoop) sBtn = hs.GetINISetting("webPages",ss.Value,"",sINI) ss.Reset ss.Add("pageAlt") ss.Add(nLoop) sAlt = hs.GetINISetting("webPages",ss.Value,"",sINI) ss.Reset ss.Add("pageLev") ss.Add(nLoop) sLev = hs.GetINISetting("webPages",ss.Value,"",sINI) ss.Reset if (lCase(sLev)) <> "none" Then if (lCase(sLev) <> "admin") OR (nPriv = 1) Then if len(trim(sURL)) > 0 Then fs.Add("<input type=""button"" class=""functionrowbutton"" value=""") fs.Add(sBtn) fs.Add(""" alt=""") fs.Add(sAlt) fs.Add(""" onClick=""location.href='/") fs.Add(sPath) fs.Add("/") fs.Add(sURL) fs.Add("'"" onmouseover=""this.className='functionrowbuttonselected';"" onmouseout=""this.className='functionrowbutton';"">") End if End if End if Next rtS = fs.Value ss = Nothing fs = Nothing End if Return rtSEnd FunctionFunction webNoAccess(Optional ByVal sName as String = "") as String Dim na as Object Dim rtS as String debugMode = hs.GetINISetting("Settings","debugMode","False",sINI) na = hs.CreateStringClass na.Add("<table border=""0"" cellpadding=""0"" cellspacing=""1"">") na.Add("<tr><td class=""pagetitle""><span style=""display='';"" id=""pgtitle"">Page Access</span></td></tr>") na.Add("<tr><td class=""tablecolumn"">You do not have access to this page.</td></tr></table>") rtS = na.Value na = Nothing Return rtSEnd FunctionFunction webNotActive(Optional ByVal sName as String = "") as String Dim na as Object Dim rtS as String na = hs.CreateStringClass na.Add("<table border=""0"" cellpadding=""0"" cellspacing=""1"">") na.Add("<tr><td class=""pagetitle""><span style=""display='';"" id=""pgtitle"">Page Access</span></td></tr>") na.Add("<tr><td class=""tablecolumn"">This page is not active.</td></tr></table>") rtS = na.Value na = Nothing Return rtSEnd FunctionFunction webPageAccess(ByVal sPageName as String) as String Dim aType, aList as Array Dim x, nList as Integer Dim ca as Object Dim rtS, sList, sPage, sType as String debugMode = hs.GetINISetting("Settings","debugMode","False",sINI) rtS = "none" aType = split(sPageName,"|") if aType.GetUpperBound(0) = 1 Then sType = "adminPages" sPageName = aType(0) sList = hs.GetINISetting("adminPages","pageSort","1",sINI) aList = Split(sList,",") nList = aList.GetUpperBound(0)+1 Else sType = "webPages" sList = hs.GetINISetting("webPages","pageSort","1",sINI) aList = Split(sList,",") nList = aList.GetUpperBound(0)+1 End if ca = hs.CreateStringClass for x = 1 to nList ca.Add("pageURL") ca.Add(x) sPage = hs.GetINISetting(sType,ca.Value,"",sINI) ca.Reset if LCase(sPage) = LCase(sPageName) Then ca.Add("pageLev") ca.Add(x) rtS = lCase(hs.GetINISetting(sType,ca.Value,"",sINI)) ca.Reset Exit for End if Next ca = Nothing Return rtSEnd FunctionFunction webPermissions(ByVal sChkUser as String) Dim arrUsers, arrPrivs as Array Dim x, nAdmin, nPriv as Integer Dim sAllUsers, sUser as String debugMode = hs.GetINISetting("Settings","debugMode","False",sINI) sAllUsers = hs.GetUsers arrUsers = Split(sAllUsers, ",") nAdmin=0 For x = 0 To UBound(arrUsers) arrPrivs = Split(arrUsers(x),"|") sUser = arrPrivs(0) nPriv = arrPrivs(1) if lCase(sUser) = lCase(sChkUser) Then if nPriv AND 2 Then nAdmin=1 Exit for End if End if Next Return nAdminEnd FunctionEnd Module
    9/28/2012 5:25:33 PM ~!~Error~!~Script compile error: 'HttpUtility' is not a member of 'Web'.on line 27
    9/28/2012 5:25:33 PM ~!~SCR~!~Option Strict OffImports VB = Microsoft.VisualBasicImports System.Web Imports System.IOImports System.Xml Imports System.DataImports System.Data.SqlClientimports Schedulerimports SystemPublic Module scriptcode6#Region "Automatically generated code, do not modify"'Automatically generated code, do not modify'Event Sources Begin <System.ContextStaticAttribute()> Public WithEvents hs As Scheduler.hsapplication <System.ContextStaticAttribute()> Public WithEvents hsp As scheduler.hsp <System.ContextStaticAttribute()> Public WithEvents hssystem As scheduler.phone0'Event Sources End'End of automatically generated code#End RegionPublic Dim debugMode As Boolean = falsePublic Dim sINI as String = "movies.ini"Public Dim IName = "MovieManager"Sub Main(Optional ByVal sParam as String = "") hs.WriteLog(IName,"You must specify the function name when calling this script.")End SubFunction urlEncode(ByVal sURL as String) Return System.Web.HttpUtility.UrlEncode(sURL)End FunctionFunction webAdminLinks(ByVal sChkUser as String) Dim aSort Dim x, nPriv, nLoop as Integer Dim fs, ss as Object Dim sURL, sBtn, sAlt, sLev, rtS, sPath, sSort as String debugMode = hs.GetINISetting("Settings","debugMode","False",sINI) nPriv = webPermissions(sChkUser) if hs.GetINISetting("webPages","showMenu","1",sINI) = "1" Then sPath = hs.GetINISetting("adminPages","pagePath","movies",sINI) sSort = hs.GetINISetting("adminPages","pageSort","1",sINI) fs = hs.CreateStringClass ss = hs.CreateStringClass fs.Add("<br/>") aSort = Split(sSort,",") for x = 0 to aSort.GetUpperBound(0) nLoop = aSort(x) ss.Add("pageURL") ss.Add(nLoop) sURL = hs.GetINISetting("adminPages",ss.Value,"",sINI) ss.Reset ss.Add("pageBtn") ss.Add(nLoop) sBtn = hs.GetINISetting("adminPages",ss.Value,"",sINI) ss.Reset ss.Add("pageAlt") ss.Add(nLoop) sAlt = hs.GetINISetting("adminPages",ss.Value,"",sINI) ss.Reset ss.Add("pageLev") ss.Add(nLoop) sLev = hs.GetINISetting("adminPages",ss.Value,"",sINI) ss.Reset if (lCase(sLev)) <> "none" Then if (lCase(sLev) <> "admin") OR (nPriv = 1) Then if len(trim(sURL)) > 0 Then fs.Add("<input type=""button"" class=""functionrowbutton"" value=""") fs.Add(sBtn) fs.Add(""" alt=""") fs.Add(sAlt) fs.Add(""" onClick=""location.href='/") fs.Add(sPath) fs.Add("/") fs.Add(sURL) fs.Add("'"" onmouseover=""this.className='functionrowbuttonselected';"" onmouseout=""this.className='functionrowbutton';"">") End if End if End if Next rtS = fs.Value ss = Nothing fs = Nothing End if Return rtSEnd FunctionFunction webPageLinks(ByVal sChkUser as String) Dim aSort Dim x, nPriv, nLoop as Integer Dim fs, ss as Object Dim sURL, sBtn, sAlt, sLev, rtS, sPath, sSort as String debugMode = hs.GetINISetting("Settings","debugMode","False",sINI) nPriv = webPermissions(sChkUser) if hs.GetINISetting("webPages","showMenu","1",sINI) = "1" Then sPath = hs.GetINISetting("webPages","pagePath","movies",sINI) sSort = hs.GetINISetting("webPages","pageSort","1,2",sINI) fs = hs.CreateStringClass ss = hs.CreateStringClass fs.Add("<br/>") aSort = Split(sSort,",") for x = 0 to aSort.GetUpperBound(0) nLoop = aSort(x) ss.Add("pageURL") ss.Add(nLoop) sURL = hs.GetINISetting("webPages",ss.Value,"",sINI) ss.Reset ss.Add("pageBtn") ss.Add(nLoop) sBtn = hs.GetINISetting("webPages",ss.Value,"",sINI) ss.Reset ss.Add("pageAlt") ss.Add(nLoop) sAlt = hs.GetINISetting("webPages",ss.Value,"",sINI) ss.Reset ss.Add("pageLev") ss.Add(nLoop) sLev = hs.GetINISetting("webPages",ss.Value,"",sINI) ss.Reset if (lCase(sLev)) <> "none" Then if (lCase(sLev) <> "admin") OR (nPriv = 1) Then if len(trim(sURL)) > 0 Then fs.Add("<input type=""button"" class=""functionrowbutton"" value=""") fs.Add(sBtn) fs.Add(""" alt=""") fs.Add(sAlt) fs.Add(""" onClick=""location.href='/") fs.Add(sPath) fs.Add("/") fs.Add(sURL) fs.Add("'"" onmouseover=""this.className='functionrowbuttonselected';"" onmouseout=""this.className='functionrowbutton';"">") End if End if End if Next rtS = fs.Value ss = Nothing fs = Nothing End if Return rtSEnd FunctionFunction webNoAccess(Optional ByVal sName as String = "") as String Dim na as Object Dim rtS as String debugMode = hs.GetINISetting("Settings","debugMode","False",sINI) na = hs.CreateStringClass na.Add("<table border=""0"" cellpadding=""0"" cellspacing=""1"">") na.Add("<tr><td class=""pagetitle""><span style=""display='';"" id=""pgtitle"">Page Access</span></td></tr>") na.Add("<tr><td class=""tablecolumn"">You do not have access to this page.</td></tr></table>") rtS = na.Value na = Nothing Return rtSEnd FunctionFunction webNotActive(Optional ByVal sName as String = "") as String Dim na as Object Dim rtS as String na = hs.CreateStringClass na.Add("<table border=""0"" cellpadding=""0"" cellspacing=""1"">") na.Add("<tr><td class=""pagetitle""><span style=""display='';"" id=""pgtitle"">Page Access</span></td></tr>") na.Add("<tr><td class=""tablecolumn"">This page is not active.</td></tr></table>") rtS = na.Value na = Nothing Return rtSEnd FunctionFunction webPageAccess(ByVal sPageName as String) as String Dim aType, aList as Array Dim x, nList as Integer Dim ca as Object Dim rtS, sList, sPage, sType as String debugMode = hs.GetINISetting("Settings","debugMode","False",sINI) rtS = "none" aType = split(sPageName,"|") if aType.GetUpperBound(0) = 1 Then sType = "adminPages" sPageName = aType(0) sList = hs.GetINISetting("adminPages","pageSort","1",sINI) aList = Split(sList,",") nList = aList.GetUpperBound(0)+1 Else sType = "webPages" sList = hs.GetINISetting("webPages","pageSort","1",sINI) aList = Split(sList,",") nList = aList.GetUpperBound(0)+1 End if ca = hs.CreateStringClass for x = 1 to nList ca.Add("pageURL") ca.Add(x) sPage = hs.GetINISetting(sType,ca.Value,"",sINI) ca.Reset if LCase(sPage) = LCase(sPageName) Then ca.Add("pageLev") ca.Add(x


    Pardon the garbage but there's even more. Since this occurs so early in process of install/setup, I'm not sure where to look. Just FYI, here's the entry in the settings.ini for Scripting Reference:

    ScriptingReferences=System.XML;System.XML.dll,System.Data;Sy stem.Data.Dll;System.web;System.Web.DLL;HSPI_SKYPE;C:\Progra m Files\HomeSeer 2\hspi_skype.dll

    Anyway, I'm at a loss to get anywhere into setup, etc. I'd appreciate some counsel. BTW FWIW the HS directory is Homeseer 2 (not Homeseer HS2).

    Thanks in advance
    Last edited by hec1152; September 28, 2012, 05:01 PM. Reason: addendum

    #2
    Look at the section for System.web.

    System.XML;System.XML.dll,System.Data;Sy stem.Data.Dll;System.web;System.Web.DLL;HSPI_SKYPE;C:\Progra m Files\HomeSeer 2\hspi_skype.dll

    You have:
    System.web;System.Web.DLL;

    Change it to:
    System.web,System.Web.Dll;

    The seperator should be a comma instead of a semi-colon.
    --
    Jeff Farmer
    HS 3, HSPhone
    My HS3 Plugins: CFHSExtras, Random, Restart, Tracker, WeatherXML, PanaBluRay
    Other Plugins In Use: APCUPSD, BLOnkyo, Device History, EasyTrigger, HSTouch Server, PHLocation2, Pushover, RFXCom, UltraGCIR3, UltraMon3, UltraPioneerAVR3, X10, Z-Wave

    Hardware: GoControl Irrigation Controler, Schlage Lever Lock, Schlage Deadbolt, Way2Call Hi-Phone, RFXCom RFXrec433 Receiver, WGL 800, TI-103, Z-Net, Pioneer 1120, Pioneer 1021, Pioneer LX302, Panasonic BDT-110, Panasonic BDT-210 x2

    Comment


      #3
      Ok. Thanks.

      Also, your documentation may need to be updated. It says:

      <!--[if gte mso 9]><xml> <o:OfficeDocumentSettings> <o:TargetScreenSize>800x600</o:TargetScreenSize> </o:OfficeDocumentSettings> </xml><![endif]-->
      ScriptingReferences=System.XML;System.XML.Dll,System.Data;Sy stem.Data.Dll,System.Web;System.Web.Dll
      My (corrected per your instruction) entry is:
      ScriptingReferences=System.XML;System.XML.dll;System.Data;Sy stem.Data.Dll,System.Web,System.Web.Dll;HSPI_SKYPE;C:\Program Files\HomeSeer 2\hspi_skype.dll
      Still working on setup but you have me on my way again. Thanks.



      <!--[if gte mso 9]><xml> <w:WordDocument> <w:View>Normal</w:View> <w:Zoom>0</w:Zoom> <w:TrackMoves/> <w:TrackFormatting/> <w:PunctuationKerning/> <w:ValidateAgainstSchemas/> <w:SaveIfXMLInvalid>false</w:SaveIfXMLInvalid> <w:IgnoreMixedContent>false</w:IgnoreMixedContent> <w:AlwaysShowPlaceholderText>false</w:AlwaysShowPlaceholderText> <woNotPromoteQF/> <w:LidThemeOther>EN-US</w:LidThemeOther> <w:LidThemeAsian>X-NONE</w:LidThemeAsian> <w:LidThemeComplexScript>X-NONE</w:LidThemeComplexScript> <w:Compatibility> <w:BreakWrappedTables/> <w:SnapToGridInCell/> <w:WrapTextWithPunct/> <w:UseAsianBreakRules/> <wontGrowAutofit/> <w:SplitPgBreakAndParaMark/> <w:EnableOpenTypeKerning/> <wontFlipMirrorIndents/> <w:OverrideTableStyleHps/> </w:Compatibility> <w:BrowserLevel>MicrosoftInternetExplorer4</w:BrowserLevel> <m:mathPr> <m:mathFont m:val="Cambria Math"/> <m:brkBin m:val="before"/> <m:brkBinSub m:val="&#45;-"/> <m:smallFrac m:val="off"/> <m:dispDef/> <m:lMargin m:val="0"/> <m:rMargin m:val="0"/> <m:defJc m:val="centerGroup"/> <m:wrapIndent m:val="1440"/> <m:intLim m:val="subSup"/> <m:naryLim m:val="undOvr"/> </m:mathPr></w:WordDocument> </xml><![endif]--><!--[if gte mso 9]><xml> <w:LatentStyles DefLockedState="false" DefUnhideWhenUsed="true" DefSemiHidden="true" DefQFormat="false" DefPriority="99" LatentStyleCount="267"> <w:LsdException Locked="false" Priority="0" SemiHidden="false" UnhideWhenUsed="false" QFormat="true" Name="Normal"/> <w:LsdException Locked="false" Priority="9" SemiHidden="false" UnhideWhenUsed="false" QFormat="true" Name="heading 1"/> <w:LsdException Locked="false" Priority="9" QFormat="true" Name="heading 2"/> <w:LsdException Locked="false" Priority="9" QFormat="true" Name="heading 3"/> <w:LsdException Locked="false" Priority="9" QFormat="true" Name="heading 4"/> <w:LsdException Locked="false" Priority="9" QFormat="true" Name="heading 5"/> <w:LsdException Locked="false" Priority="9" QFormat="true" Name="heading 6"/> <w:LsdException Locked="false" Priority="9" QFormat="true" Name="heading 7"/> <w:LsdException Locked="false" Priority="9" QFormat="true" Name="heading 8"/> <w:LsdException Locked="false" Priority="9" QFormat="true" Name="heading 9"/> <w:LsdException Locked="false" Priority="39" Name="toc 1"/> <w:LsdException Locked="false" Priority="39" Name="toc 2"/> <w:LsdException Locked="false" Priority="39" Name="toc 3"/> <w:LsdException Locked="false" Priority="39" Name="toc 4"/> <w:LsdException Locked="false" Priority="39" Name="toc 5"/> <w:LsdException Locked="false" Priority="39" Name="toc 6"/> <w:LsdException Locked="false" Priority="39" Name="toc 7"/> <w:LsdException Locked="false" Priority="39" Name="toc 8"/> <w:LsdException Locked="false" Priority="39" Name="toc 9"/> <w:LsdException Locked="false" Priority="35" QFormat="true" Name="caption"/> <w:LsdException Locked="false" Priority="10" SemiHidden="false" UnhideWhenUsed="false" QFormat="true" Name="Title"/> <w:LsdException Locked="false" Priority="1" Name="Default Paragraph Font"/> <w:LsdException Locked="false" Priority="11" SemiHidden="false" UnhideWhenUsed="false" QFormat="true" Name="Subtitle"/> <w:LsdException Locked="false" Priority="22" SemiHidden="false" UnhideWhenUsed="false" QFormat="true" Name="Strong"/> <w:LsdException Locked="false" Priority="20" SemiHidden="false" UnhideWhenUsed="false" QFormat="true" Name="Emphasis"/> <w:LsdException Locked="false" Priority="59" SemiHidden="false" UnhideWhenUsed="false" Name="Table Grid"/> <w:LsdException Locked="false" UnhideWhenUsed="false" Name="Placeholder Text"/> <w:LsdException Locked="false" Priority="1" SemiHidden="false" UnhideWhenUsed="false" QFormat="true" Name="No Spacing"/> <w:LsdException Locked="false" Priority="60" SemiHidden="false" UnhideWhenUsed="false" Name="Light Shading"/> <w:LsdException Locked="false" Priority="61" SemiHidden="false" UnhideWhenUsed="false" Name="Light List"/> <w:LsdException Locked="false" Priority="62" SemiHidden="false" UnhideWhenUsed="false" Name="Light Grid"/> <w:LsdException Locked="false" Priority="63" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Shading 1"/> <w:LsdException Locked="false" Priority="64" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Shading 2"/> <w:LsdException Locked="false" Priority="65" SemiHidden="false" UnhideWhenUsed="false" Name="Medium List 1"/> <w:LsdException Locked="false" Priority="66" SemiHidden="false" UnhideWhenUsed="false" Name="Medium List 2"/> <w:LsdException Locked="false" Priority="67" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Grid 1"/> <w:LsdException Locked="false" Priority="68" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Grid 2"/> <w:LsdException Locked="false" Priority="69" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Grid 3"/> <w:LsdException Locked="false" Priority="70" SemiHidden="false" UnhideWhenUsed="false" Name="Dark List"/> <w:LsdException Locked="false" Priority="71" SemiHidden="false" UnhideWhenUsed="false" Name="Colorful Shading"/> <w:LsdException Locked="false" Priority="72" SemiHidden="false" UnhideWhenUsed="false" Name="Colorful List"/> <w:LsdException Locked="false" Priority="73" SemiHidden="false" UnhideWhenUsed="false" Name="Colorful Grid"/> <w:LsdException Locked="false" Priority="60" SemiHidden="false" UnhideWhenUsed="false" Name="Light Shading Accent 1"/> <w:LsdException Locked="false" Priority="61" SemiHidden="false" UnhideWhenUsed="false" Name="Light List Accent 1"/> <w:LsdException Locked="false" Priority="62" SemiHidden="false" UnhideWhenUsed="false" Name="Light Grid Accent 1"/> <w:LsdException Locked="false" Priority="63" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Shading 1 Accent 1"/> <w:LsdException Locked="false" Priority="64" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Shading 2 Accent 1"/> <w:LsdException Locked="false" Priority="65" SemiHidden="false" UnhideWhenUsed="false" Name="Medium List 1 Accent 1"/> <w:LsdException Locked="false" UnhideWhenUsed="false" Name="Revision"/> <w:LsdException Locked="false" Priority="34" SemiHidden="false" UnhideWhenUsed="false" QFormat="true" Name="List Paragraph"/> <w:LsdException Locked="false" Priority="29" SemiHidden="false" UnhideWhenUsed="false" QFormat="true" Name="Quote"/> <w:LsdException Locked="false" Priority="30" SemiHidden="false" UnhideWhenUsed="false" QFormat="true" Name="Intense Quote"/> <w:LsdException Locked="false" Priority="66" SemiHidden="false" UnhideWhenUsed="false" Name="Medium List 2 Accent 1"/> <w:LsdException Locked="false" Priority="67" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Grid 1 Accent 1"/> <w:LsdException Locked="false" Priority="68" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Grid 2 Accent 1"/> <w:LsdException Locked="false" Priority="69" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Grid 3 Accent 1"/> <w:LsdException Locked="false" Priority="70" SemiHidden="false" UnhideWhenUsed="false" Name="Dark List Accent 1"/> <w:LsdException Locked="false" Priority="71" SemiHidden="false" UnhideWhenUsed="false" Name="Colorful Shading Accent 1"/> <w:LsdException Locked="false" Priority="72" SemiHidden="false" UnhideWhenUsed="false" Name="Colorful List Accent 1"/> <w:LsdException Locked="false" Priority="73" SemiHidden="false" UnhideWhenUsed="false" Name="Colorful Grid Accent 1"/> <w:LsdException Locked="false" Priority="60" SemiHidden="false" UnhideWhenUsed="false" Name="Light Shading Accent 2"/> <w:LsdException Locked="false" Priority="61" SemiHidden="false" UnhideWhenUsed="false" Name="Light List Accent 2"/> <w:LsdException Locked="false" Priority="62" SemiHidden="false" UnhideWhenUsed="false" Name="Light Grid Accent 2"/> <w:LsdException Locked="false" Priority="63" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Shading 1 Accent 2"/> <w:LsdException Locked="false" Priority="64" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Shading 2 Accent 2"/> <w:LsdException Locked="false" Priority="65" SemiHidden="false" UnhideWhenUsed="false" Name="Medium List 1 Accent 2"/> <w:LsdException Locked="false" Priority="66" SemiHidden="false" UnhideWhenUsed="false" Name="Medium List 2 Accent 2"/> <w:LsdException Locked="false" Priority="67" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Grid 1 Accent 2"/> <w:LsdException Locked="false" Priority="68" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Grid 2 Accent 2"/> <w:LsdException Locked="false" Priority="69" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Grid 3 Accent 2"/> <w:LsdException Locked="false" Priority="70" SemiHidden="false" UnhideWhenUsed="false" Name="Dark List Accent 2"/> <w:LsdException Locked="false" Priority="71" SemiHidden="false" UnhideWhenUsed="false" Name="Colorful Shading Accent 2"/> <w:LsdException Locked="false" Priority="72" SemiHidden="false" UnhideWhenUsed="false" Name="Colorful List Accent 2"/> <w:LsdException Locked="false" Priority="73" SemiHidden="false" UnhideWhenUsed="false" Name="Colorful Grid Accent 2"/> <w:LsdException Locked="false" Priority="60" SemiHidden="false" UnhideWhenUsed="false" Name="Light Shading Accent 3"/> <w:LsdException Locked="false" Priority="61" SemiHidden="false" UnhideWhenUsed="false" Name="Light List Accent 3"/> <w:LsdException Locked="false" Priority="62" SemiHidden="false" UnhideWhenUsed="false" Name="Light Grid Accent 3"/> <w:LsdException Locked="false" Priority="63" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Shading 1 Accent 3"/> <w:LsdException Locked="false" Priority="64" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Shading 2 Accent 3"/> <w:LsdException Locked="false" Priority="65" SemiHidden="false" UnhideWhenUsed="false" Name="Medium List 1 Accent 3"/> <w:LsdException Locked="false" Priority="66" SemiHidden="false" UnhideWhenUsed="false" Name="Medium List 2 Accent 3"/> <w:LsdException Locked="false" Priority="67" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Grid 1 Accent 3"/> <w:LsdException Locked="false" Priority="68" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Grid 2 Accent 3"/> <w:LsdException Locked="false" Priority="69" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Grid 3 Accent 3"/> <w:LsdException Locked="false" Priority="70" SemiHidden="false" UnhideWhenUsed="false" Name="Dark List Accent 3"/> <w:LsdException Locked="false" Priority="71" SemiHidden="false" UnhideWhenUsed="false" Name="Colorful Shading Accent 3"/> <w:LsdException Locked="false" Priority="72" SemiHidden="false" UnhideWhenUsed="false" Name="Colorful List Accent 3"/> <w:LsdException Locked="false" Priority="73" SemiHidden="false" UnhideWhenUsed="false" Name="Colorful Grid Accent 3"/> <w:LsdException Locked="false" Priority="60" SemiHidden="false" UnhideWhenUsed="false" Name="Light Shading Accent 4"/> <w:LsdException Locked="false" Priority="61" SemiHidden="false" UnhideWhenUsed="false" Name="Light List Accent 4"/> <w:LsdException Locked="false" Priority="62" SemiHidden="false" UnhideWhenUsed="false" Name="Light Grid Accent 4"/> <w:LsdException Locked="false" Priority="63" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Shading 1 Accent 4"/> <w:LsdException Locked="false" Priority="64" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Shading 2 Accent 4"/> <w:LsdException Locked="false" Priority="65" SemiHidden="false" UnhideWhenUsed="false" Name="Medium List 1 Accent 4"/> <w:LsdException Locked="false" Priority="66" SemiHidden="false" UnhideWhenUsed="false" Name="Medium List 2 Accent 4"/> <w:LsdException Locked="false" Priority="67" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Grid 1 Accent 4"/> <w:LsdException Locked="false" Priority="68" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Grid 2 Accent 4"/> <w:LsdException Locked="false" Priority="69" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Grid 3 Accent 4"/> <w:LsdException Locked="false" Priority="70" SemiHidden="false" UnhideWhenUsed="false" Name="Dark List Accent 4"/> <w:LsdException Locked="false" Priority="71" SemiHidden="false" UnhideWhenUsed="false" Name="Colorful Shading Accent 4"/> <w:LsdException Locked="false" Priority="72" SemiHidden="false" UnhideWhenUsed="false" Name="Colorful List Accent 4"/> <w:LsdException Locked="false" Priority="73" SemiHidden="false" UnhideWhenUsed="false" Name="Colorful Grid Accent 4"/> <w:LsdException Locked="false" Priority="60" SemiHidden="false" UnhideWhenUsed="false" Name="Light Shading Accent 5"/> <w:LsdException Locked="false" Priority="61" SemiHidden="false" UnhideWhenUsed="false" Name="Light List Accent 5"/> <w:LsdException Locked="false" Priority="62" SemiHidden="false" UnhideWhenUsed="false" Name="Light Grid Accent 5"/> <w:LsdException Locked="false" Priority="63" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Shading 1 Accent 5"/> <w:LsdException Locked="false" Priority="64" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Shading 2 Accent 5"/> <w:LsdException Locked="false" Priority="65" SemiHidden="false" UnhideWhenUsed="false" Name="Medium List 1 Accent 5"/> <w:LsdException Locked="false" Priority="66" SemiHidden="false" UnhideWhenUsed="false" Name="Medium List 2 Accent 5"/> <w:LsdException Locked="false" Priority="67" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Grid 1 Accent 5"/> <w:LsdException Locked="false" Priority="68" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Grid 2 Accent 5"/> <w:LsdException Locked="false" Priority="69" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Grid 3 Accent 5"/> <w:LsdException Locked="false" Priority="70" SemiHidden="false" UnhideWhenUsed="false" Name="Dark List Accent 5"/> <w:LsdException Locked="false" Priority="71" SemiHidden="false" UnhideWhenUsed="false" Name="Colorful Shading Accent 5"/> <w:LsdException Locked="false" Priority="72" SemiHidden="false" UnhideWhenUsed="false" Name="Colorful List Accent 5"/> <w:LsdException Locked="false" Priority="73" SemiHidden="false" UnhideWhenUsed="false" Name="Colorful Grid Accent 5"/> <w:LsdException Locked="false" Priority="60" SemiHidden="false" UnhideWhenUsed="false" Name="Light Shading Accent 6"/> <w:LsdException Locked="false" Priority="61" SemiHidden="false" UnhideWhenUsed="false" Name="Light List Accent 6"/> <w:LsdException Locked="false" Priority="62" SemiHidden="false" UnhideWhenUsed="false" Name="Light Grid Accent 6"/> <w:LsdException Locked="false" Priority="63" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Shading 1 Accent 6"/> <w:LsdException Locked="false" Priority="64" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Shading 2 Accent 6"/> <w:LsdException Locked="false" Priority="65" SemiHidden="false" UnhideWhenUsed="false" Name="Medium List 1 Accent 6"/> <w:LsdException Locked="false" Priority="66" SemiHidden="false" UnhideWhenUsed="false" Name="Medium List 2 Accent 6"/> <w:LsdException Locked="false" Priority="67" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Grid 1 Accent 6"/> <w:LsdException Locked="false" Priority="68" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Grid 2 Accent 6"/> <w:LsdException Locked="false" Priority="69" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Grid 3 Accent 6"/> <w:LsdException Locked="false" Priority="70" SemiHidden="false" UnhideWhenUsed="false" Name="Dark List Accent 6"/> <w:LsdException Locked="false" Priority="71" SemiHidden="false" UnhideWhenUsed="false" Name="Colorful Shading Accent 6"/> <w:LsdException Locked="false" Priority="72" SemiHidden="false" UnhideWhenUsed="false" Name="Colorful List Accent 6"/> <w:LsdException Locked="false" Priority="73" SemiHidden="false" UnhideWhenUsed="false" Name="Colorful Grid Accent 6"/> <w:LsdException Locked="false" Priority="19" SemiHidden="false" UnhideWhenUsed="false" QFormat="true" Name="Subtle Emphasis"/> <w:LsdException Locked="false" Priority="21" SemiHidden="false" UnhideWhenUsed="false" QFormat="true" Name="Intense Emphasis"/> <w:LsdException Locked="false" Priority="31" SemiHidden="false" UnhideWhenUsed="false" QFormat="true" Name="Subtle Reference"/> <w:LsdException Locked="false" Priority="32" SemiHidden="false" UnhideWhenUsed="false" QFormat="true" Name="Intense Reference"/> <w:LsdException Locked="false" Priority="33" SemiHidden="false" UnhideWhenUsed="false" QFormat="true" Name="Book Title"/> <w:LsdException Locked="false" Priority="37" Name="Bibliography"/> <w:LsdException Locked="false" Priority="39" QFormat="true" Name="TOC Heading"/> </w:LatentStyles> </xml><![endif]--><!--[if gte mso 10]> <style> /* Style Definitions */ table.MsoNormalTable {mso-style-name:"Table Normal"; mso-tstyle-rowband-size:0; mso-tstyle-colband-size:0; mso-style-noshow:yes; mso-style-priority:99; mso-style-parent:""; mso-padding-alt:0in 5.4pt 0in 5.4pt; mso-para-margin:0in; mso-para-margin-bottom:.0001pt; mso-pagination:widow-orphan; font-size:10.0pt; font-family:"Calibri","sans-serif"; mso-bidi-font-family:"Times New Roman";} </style> <![endif]-->

      Comment


        #4
        Actually in my haste to answer you I got it backwards.

        Here is what you should have in your settings.ini
        ScriptingReferences=System.XML;System.XML.dll,System.Data;Sy stem.Data.Dll,System.Web;System.Web.Dll,HSPI_SKYPE;C:\Progra m Files\HomeSeer 2\hspi_skype.dll

        I opened my settings.ini file to check what I have to make sure this time. I suspect that my previous post broke your skype entry.

        The part that was wrong in the inital post is the skype entry seperator.

        You had this:
        System.Web.DLL;HSPI_SKYPE;C:\Progra m Files\HomeSeer 2\hspi_skype.dll

        The seperator for different entries is a comma. The semi-colon is the seperator for the name and dll.

        So it should have been a comma between Web.DLL and the skype entry:
        System.Web.DLL,HSPI_SKYPE;C:\Progra m Files\HomeSeer 2\hspi_skype.dll

        Sorry about that.
        This should get you going correctly.
        --
        Jeff Farmer
        HS 3, HSPhone
        My HS3 Plugins: CFHSExtras, Random, Restart, Tracker, WeatherXML, PanaBluRay
        Other Plugins In Use: APCUPSD, BLOnkyo, Device History, EasyTrigger, HSTouch Server, PHLocation2, Pushover, RFXCom, UltraGCIR3, UltraMon3, UltraPioneerAVR3, X10, Z-Wave

        Hardware: GoControl Irrigation Controler, Schlage Lever Lock, Schlage Deadbolt, Way2Call Hi-Phone, RFXCom RFXrec433 Receiver, WGL 800, TI-103, Z-Net, Pioneer 1120, Pioneer 1021, Pioneer LX302, Panasonic BDT-110, Panasonic BDT-210 x2

        Comment


          #5
          Thanks, Jeff. That seems to have me going again.

          Comment

          Working...
          X