S
Sam
I'm wondering if I can pass variables to "TestForm.aspx" with the way
I'm using it. It's acting as a jpeg image and looks like:
<%@ Page ContentType="image/Jpeg" %>
<%@ Import namespace="System.Drawing" %>
<%@ Import namespace="System.Drawing.Imaging" %>
<Script Runat="Server">
Sub Page_Load
Dim objBitmap As Bitmap
Dim objGraphics As Graphics
Dim x As Integer
Dim y As Integer
x = 10
y = 10
'Create Bitmap
objBitmap = new bitmap("C:\MyBitmap.bmp")
'Draw point on bitmap
objGraphics = Graphics.FromImage(objBitmap)
objGraphics.FillEllipse(Brushes.Black, x, y, 7, 7)
'Save Bitmap to this page's Out stream
objBitmap.Save(Response.OutputStream, ImageFormat.Jpeg)
End Sub
</Script>
My Main form MainForm.aspx has an image control and a button when the
button is clicked I set the image url to the TestForm:
Private Sub Button1_Click(ByVal sender As Object, _
ByVal e As EventArgs) Handles Button1.Click
Image1.ImageUrl = "TestForm.aspx"
End Sub
I'd like to pass the X and Y to the TestForm. Is there a way to do
this?
Thanks for any help...
I'm using it. It's acting as a jpeg image and looks like:
<%@ Page ContentType="image/Jpeg" %>
<%@ Import namespace="System.Drawing" %>
<%@ Import namespace="System.Drawing.Imaging" %>
<Script Runat="Server">
Sub Page_Load
Dim objBitmap As Bitmap
Dim objGraphics As Graphics
Dim x As Integer
Dim y As Integer
x = 10
y = 10
'Create Bitmap
objBitmap = new bitmap("C:\MyBitmap.bmp")
'Draw point on bitmap
objGraphics = Graphics.FromImage(objBitmap)
objGraphics.FillEllipse(Brushes.Black, x, y, 7, 7)
'Save Bitmap to this page's Out stream
objBitmap.Save(Response.OutputStream, ImageFormat.Jpeg)
End Sub
</Script>
My Main form MainForm.aspx has an image control and a button when the
button is clicked I set the image url to the TestForm:
Private Sub Button1_Click(ByVal sender As Object, _
ByVal e As EventArgs) Handles Button1.Click
Image1.ImageUrl = "TestForm.aspx"
End Sub
I'd like to pass the X and Y to the TestForm. Is there a way to do
this?
Thanks for any help...