Question about buttons and VB Functions

Article View: comp.lang.basic.visual.misc

Article #333

Back to comp.lang.basic.visual.misc Previous Next

#333

From: Wendel
Date: Sun, 14 Apr 2002 02:02

28 lines
2008 bytes

I have found a VB function that exports a chart(in bitmap form) that is
being displayed by a VB program(not a webpage). This is that function:

Private Sub cmdsave_Click()
  On Error GoTo saverr
  Dim strsavefile As String
  With dlgChart ' CommonDialog object
    .Filter = "Pictures (*.bmp)|*.bmp"
    .DefaultExt = "bmp"
    .CancelError = True
    .ShowSave
    strsavefile = .FileName
    If strsavefile = "" Then Exit Sub
  End With
  MSChart1.EditCopy
  SavePicture Clipboard.GetData, strsavefile
  Exit Sub
saverr:
  MsgBox Err.Description

End Sub

I need to use this same function in an HTML page that has a chart embedded
in it as well. How do I do this and call it from a button? Do I have to do
this within an ASP? I am a complete noob with respect to VB so please bare
with me.

Thanks in advance!

Technical Details

Message-ID: <er5u8.40713$2J2.12663628@typhoon.southeast.rr.com>

Path:

arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!newsfeed.stanford.edu!news-spur1.maxwell.syr.edu!news.maxwell.syr.edu!newsfeed1.cidera.com!Cidera!cyclone.tampabay.rr.com!news-post.tampabay.rr.com!typhoon.southeast.rr.com.POSTED!not-for-mail

Show Full Headers

Complete Article Headers

X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 110e3b,b7da74531f7c7619,start
X-Google-Attributes: gid110e3b,public
X-Google-Thread: 108062,b7da74531f7c7619,start
X-Google-Attributes: gid108062,public
X-Google-ArrivalTime: 2002-04-13 19:48:37 PST
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!newsfeed.stanford.edu!news-spur1.maxwell.syr.edu!news.maxwell.syr.edu!newsfeed1.cidera.com!Cidera!cyclone.tampabay.rr.com!news-post.tampabay.rr.com!typhoon.southeast.rr.com.POSTED!not-for-mail
From: "Wendel" <spacebass5000@hotmail.com>
Newsgroups: comp.lang.basic.visual.misc,cz.comp.lang.basic.visual
Subject: Question about buttons and VB Functions
Lines: 31
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 5.50.4807.1700
X-MimeOLE: Produced By Microsoft MimeOLE V5.50.4807.1700
Message-ID: <er5u8.40713$2J2.12663628@typhoon.southeast.rr.com>
Date: Sun, 14 Apr 2002 02:02:50 GMT
NNTP-Posting-Host: 66.57.226.31
X-Complaints-To: abuse@rr.com
X-Trace: typhoon.southeast.rr.com 1018749770 66.57.226.31 (Sat, 13 Apr 2002 22:02:50 EDT)
NNTP-Posting-Date: Sat, 13 Apr 2002 22:02:50 EDT
Organization: Road Runner - NC