<%@LANGUAGE="VBSCRIPT"%> <% ' *** Edit Operations: declare variables MM_editAction = CStr(Request("URL")) If (Request.QueryString <> "") Then MM_editAction = MM_editAction & "?" & Request.QueryString End If ' boolean to abort record edit MM_abortEdit = false ' query string to execute MM_editQuery = "" %> <% ' *** Insert Record: set variables If (CStr(Request("MM_insert")) <> "") Then MM_editConnection = MM_Intellisource_STRING MM_editTable = "FeedbackInfo" MM_editRedirectUrl = "replythanks.htm" MM_fieldsStr = "MailList|value|SalesCall|value|Literature|value|SendPrice|value|KBDemo|value|MinerDemo|value|Fname|value|Lname|value|Title|value|Company|value|Address|value|City|value|State|value|Zip|value|Country|value|Phone|value|Email|value" MM_columnsStr = "MailList|none,1,0|SalesCall|none,1,0|Literature|none,1,0|SendPrice|none,1,0|KBDemo|none,1,0|MinerDemo|none,1,0|Fname|',none,''|Lname|',none,''|Title|',none,''|Company|',none,''|Address|',none,''|City|',none,''|State|',none,''|Zip|',none,''|Country|',none,''|Phone|',none,''|Email|',none,''" ' create the MM_fields and MM_columns arrays MM_fields = Split(MM_fieldsStr, "|") MM_columns = Split(MM_columnsStr, "|") ' set the form values For i = LBound(MM_fields) To UBound(MM_fields) Step 2 MM_fields(i+1) = CStr(Request.Form(MM_fields(i))) Next ' append the query string to the redirect URL If (MM_editRedirectUrl <> "" And Request.QueryString <> "") Then If (InStr(1, MM_editRedirectUrl, "?", vbTextCompare) = 0 And Request.QueryString <> "") Then MM_editRedirectUrl = MM_editRedirectUrl & "?" & Request.QueryString Else MM_editRedirectUrl = MM_editRedirectUrl & "&" & Request.QueryString End If End If End If %> <% ' *** Insert Record: construct a sql insert statement and execute it If (CStr(Request("MM_insert")) <> "") Then ' create the sql insert statement MM_tableValues = "" MM_dbValues = "" For i = LBound(MM_fields) To UBound(MM_fields) Step 2 FormVal = MM_fields(i+1) MM_typeArray = Split(MM_columns(i+1),",") Delim = MM_typeArray(0) If (Delim = "none") Then Delim = "" AltVal = MM_typeArray(1) If (AltVal = "none") Then AltVal = "" EmptyVal = MM_typeArray(2) If (EmptyVal = "none") Then EmptyVal = "" If (FormVal = "") Then FormVal = EmptyVal Else If (AltVal <> "") Then FormVal = AltVal ElseIf (Delim = "'") Then ' escape quotes FormVal = "'" & Replace(FormVal,"'","''") & "'" Else FormVal = Delim + FormVal + Delim End If End If If (i <> LBound(MM_fields)) Then MM_tableValues = MM_tableValues & "," MM_dbValues = MM_dbValues & "," End if MM_tableValues = MM_tableValues & MM_columns(i) MM_dbValues = MM_dbValues & FormVal Next MM_editQuery = "insert into " & MM_editTable & " (" & MM_tableValues & ") values (" & MM_dbValues & ")" If (Not MM_abortEdit) Then ' execute the insert Set MM_editCmd = Server.CreateObject("ADODB.Command") MM_editCmd.ActiveConnection = MM_editConnection MM_editCmd.CommandText = MM_editQuery MM_editCmd.Execute MM_editCmd.ActiveConnection.Close If (MM_editRedirectUrl <> "") Then Response.Redirect(MM_editRedirectUrl) End If End If End If %> <% set rsMinerReply = Server.CreateObject("ADODB.Recordset") rsMinerReply.ActiveConnection = MM_Intellisource_STRING rsMinerReply.Source = "SELECT * FROM FeedbackInfo" rsMinerReply.CursorType = 0 rsMinerReply.CursorLocation = 2 rsMinerReply.LockType = 3 rsMinerReply.Open() rsMinerReply_numRows = 0 %> Miner

XpertRule® Miner

XpertRule Software's XpertRule Miner delivers powerful yet easy-to-use graphical data mining environment for discovering tree patterns from historical business data.

XpertRule Miner is XpertRule Software's next generation product evolved from the established Profiler scalable client-server data mining software.  Using ActiveX technology, the XpertRule Miner client offers the most flexible deployment options.  Solutions can now be built as stand-alone mining systems or embedded in other vertical applications under MS-Windows.  

Tree Mining is available also as an option in XpertRule Knowledge Builder.

Deploy the XpertRule Miner over intranets or the Internet.  The ActiveX Miner client works with XpertRule's high performance data mining servers to provide multi-tier client-server data mining against very large data bases.  Mining can be performed either directly against the data in situ, or by high performance mining against tokenised cache data tables.

XpertRule Miner includes extensive data transformation, visualization and reporting features. Data can be manipulated using a drag and drop interface.  Users can graphically design their customized data manipulation, mining and reporting processes. Software developers can also directly control the application using the exposed methods and properties of the Miner's objects.  This enables Miner to be seamlessly integrated as part of vertical applications - such as for a Customer Relationship Management system, which could have been built in any environment (VB, Delphi, etc.).  All this is achieved without compromising scalability or performance.

XpertRule Miner Demo
A 30 day demo copy of the Miner can be downloaded from this link. After download, please fill in and Submit the Form below to receive your 30 day evaluation password.

For more detail about the Miner, please bookmark our site, and then visit XpertRule Software


Need More Information or Passwords?

 

For more information
or passwords

products
case studiesdemosnewscompany

    

Data Sources
• Any ODBC data source

Architecture
• Client based, 2 tier or multi-tier operation
• ActiveX clients
• High performance Data Mining Servers

Data Transformation
• Merging, joining and filtering
• Aggregation and time series aggregation
• Derived data fields

Data Exploration
• 2D and 3D data reports throughout the data mining process

Pattern Discovery
• Induction of classification & regression trees
• Discovery of associations
• Discovery of clusters

Pattern Deployment
• XML, Enhanced Metafile, SQL, SAS, C & Pascal

Performance & Scalability
• High performance caching of ODBC data allows millions of records to be mined in minutes on current specifications Windows machine (333 MHz, 64MB RAM)
• Multi-tier client server architecture can mine data in-situ on high performance servers by firing SQL query streams


Please Contact Us

Telephone
+1 866-465-5111
+1 978-465-5111
FAX
+1 978-465-0666

E- mail
General Information:
info@IntelliCrafters.com
Evaluation Passwords:
Passwords@intellicrafters.com

Sales:
sales@IntelliCrafters.com
Customer Support:
support@IntelliCrafters.com
Webmaster:
WebMaster@IntelliCrafters.com

 

Representing XpertRule Software in the Americas

© Copyright 2006 Renaissance International Corp.
<% rsMinerReply.Close() %>