|
VBScript Code Example:
Move of the example script code, for SImageUtil, is in jscript.
This has caused some confusion as many people want to use VBScript
instead. Here is a sample script from Bob Hugel that demonstrates
the proper VB syntax:
<% @Language = "VBScript" %>
<%
set Image2 = Server.CreateObject("SimageUtil.Image")
' Image2.Thumb "test.jpg", 50, 50, "test4.jpg", 75
' use line above or lines below..
Image2.OpenImageFile "test.jpg"
Image2.KeepAspect = true
Image2.ChangeSize 375, 375
Image2.BoxMargin = 0
Image2.SetBoxColor "black", 0
Image2.SetTextColor "yellow", 100
Image2.TextBox 8, "n-number"
Image2.SaveJpgFile "test2.jpg", 75
Image2.Close
Response.Write "done."
%>
|
|