Starting to write the class

R0mb0 · Nov 19, 2024 · 7d87f4f · 7d87f4f
1 parent a924409
commit 7d87f4f
Show file tree

Hide file tree

Showing 4 changed files with 27 additions and 0 deletions.
diff --git a/Dictionary/Dictionary.asp → Dictionary_Library/Dictionary.asp b/Dictionary/Dictionary.asp → Dictionary_Library/Dictionary.asp
diff --git a/Dictionary/README.md → Dictionary_Library/README.md b/Dictionary/README.md → Dictionary_Library/README.md
diff --git a/Dictionary/Test.asp → Dictionary_Library/Test.asp b/Dictionary/Test.asp → Dictionary_Library/Test.asp
diff --git a/Dictionary_class/dictionary.class.asp b/Dictionary_class/dictionary.class.asp
@@ -0,0 +1,27 @@
+<%
+
+Class dictionary
+
+Dim fixed_array()
+Dim last_index_searched
+Dim my_dictionary
+
+' Initialization and destruction'
+	sub class_initialize()
+        Redim fixed_array(1)
+        fixed_array(0) = Null
+        fixed_array(1) = Null
+        Dim temp_array(0)
+        temp_array(0) = fixed_array
+        my_dictionary = temp_array
+	end sub
+	
+	sub class_terminate()
+		' Destroy all elements of the arrays'
+		redim lines(-1)
+		redim headers(-1)
+	end sub
+
+end Class
+
+%>