MATSSANT Report post Posted August 16, 2017 Hello! I'm trying to use FusionChart with Visual Basic, I saw on internet about this to use in VB Classic(http://www.inettutor.com/programming-tutorial/fusion-chart-in-visual-basic-6-with-database/) but I'm not found anymore components for Fusionchart using VB applications or Visual Studio. Nowadays I'm used to use FusionChart with VB.Net/dot net applications, but I'm trying to move from Web site to windows project(.exe). I would like to know if someone still have the ".ocx" file regarding fusionchart to VB to share with me. When I'm accessing the official FusionChart website, the page regarding Visual Basic is not working and the website is redirecting me to the standard page "http://www.fusioncharts.com/extensions/" which doesn't has any extension to VB. Thank you. Share this post Link to post Share on other sites
soumya Report post Posted August 17, 2017 Hi, Please visit our Blog post link for rendering FusionCharts in Windows based application using VB.NET for further reference. http://www.fusioncharts.com/blog/2017/04/rendering-fusioncharts-in-vb-net-and-windows-based-form-applications/ Hope this would help you . Share this post Link to post Share on other sites
MATSSANT Report post Posted August 18, 2017 Thank you for help! I'm trying to use, but I'm receiving this message below when I try to execute the code following all the steps for the link you sent me. "Could not find library support for JSON parsing." Here is the code: Imports System.Text Imports FusionCharts.Charts Public Class Form1 Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load Dim Data As String Data = "<chart caption='Sales of Liquor' subcaption='Last week' xaxisname='Day' yaxisname='Sales (In USD)' numberprefix='$' palettecolors='#0075c2' bgcolor='#ffffff' showborder='0' showcanvasborder='0' plotborderalpha='10' useplotgradientcolor='0' plotfillalpha='50' showxaxisline='1' axislinealpha='25' divlinealpha='10' showvalues='1' showalternatehgridcolor='0' captionfontsize='14' subcaptionfontsize='14' subcaptionfontbold='0' tooltipcolor='#ffffff' tooltipborderthickness='0' tooltipbgcolor='#000000' tooltipbgalpha='80' tooltipborderradius='2' tooltippadding='5'><set label='Mon' value='4123' /><set label='Tue' value='4633' /><set label='Wed' value='5507' /><set label='Thu' value='4910' /><set label='Fri' value='5529' /><set label='Sat' value='5803' /><set label='Sun' value='6202' /></chart>" Dim factoryOutput As New Chart("area2d", "myChart", "600", "350", "xml", Data) Dim Total As New StringBuilder Total.Append("<html xmlns='http://www.w3.org/1999/xhtml'>") Total.Append("<head>") Total.Append("<meta http-equiv='Content-Type' content='text/html; charset=UTF-8' />") Total.AppendFormat("<script type='text/javascript' src='http://static.fusioncharts.com/code/latest/fusioncharts.js?cacheBust=8232'></script>", Application.StartupPath.Replace("\\", "/")) 'Total.AppendFormat("<script type='text/javascript' src='jquery/jquery.1.4.2.min.js'></script>", Application.StartupPath.Replace("\\", "/")) 'Total.AppendFormat("<script type='text/javascript' src='jquery/jquery.gallerax-0.2.js'></script>", Application.StartupPath.Replace("\\", "/")) Total.Append("<body>") Dim chartdata As String chartdata = factoryOutput.Render() Total.Append(chartdata) Total.Append("</body>") Total.Append("</html>") WebBrowser1.DocumentText = Total.ToString() End Sub End Class Share this post Link to post Share on other sites
soumya Report post Posted August 22, 2017 Hi, We guess you are using a too old version of Visual Studio i.e. VS 2010 please check with the newer version of Visual Studio preferably post 2015 version. Also, check with XML data format for rendering FusionCharts as shown in the given Blog post link. Hope this would help. Share this post Link to post Share on other sites
MATSSANT Report post Posted August 22, 2017 Thank you guys, its done! Now its working (: Share this post Link to post Share on other sites
