WAUploadTest


Seaside-Examples-Test

Comment:



Hierarchy:

ProtoObject
Object
WAPresenter
WAComponent
WAUploadTest

Summary:

instance variables:

file

methods:

instance class
as yet unclassified no messages

Detail:

instance variables:

file

instance methods:

as yet unclassified
renderContentOn: html

	html heading: 'Upload File'.
	
	html attributeAt: 'enctype' put: 'multipart/form-data'.
	html form: [
		html fileUploadWithCallback: [:f | file _ f].
		html submitButton.
	].

	file ifNotNil:
		[html anchorWithDocument: file contents mimeType: file contentType fileName: file fileName text:file fileName.
		html preformatted: file contents contents].

class methods:

^top


- made by Dandelion -