动网论坛教程：重新修改过的验证码生成程序

核心提示： '绘制格线for i=-3 to 7Jpeg.Canvas.DrawLine i*10,0,(i*10)+40,40next for i=-3 to 7Jpeg.Canvas.DrawLine i*10,40,(i*10)+40,0n

　　'绘制格线
　　for i=-3 to 7
　　　　Jpeg.Canvas.DrawLine i*10,0,(i*10)+40,40
　next
　　for i=-3 to 7
　　　　Jpeg.Canvas.DrawLine i*10,40,(i*10)+40,0
　next
　'输出图片
　　Response.ContentType = "Image/jpeg"
　　Response.BinaryWrite Jpeg.Binary
End Sub
%>