User Tools

Site Tools


coding

Differences

This shows you the differences between two versions of the page.

Link to this comparison view

Both sides previous revision Previous revision
coding [2019/07/09 21:58]
stigzler
coding [2019/07/09 21:58] (current)
stigzler
Line 3: Line 3:
 Various coding hints and tips Various coding hints and tips
  
-<​code>​ +''​Public Class YourClass ​Dim selectedMedias = From mt In _mediaTable Where _mediaTypes.Contains(mt.Item("​type"​)) Select New SysMedia With { .Type = mt.Item("​type"​),​ .URL = mt.Item("​media_Text"​),​ .Region = mt.Item("​region"​),​ .MD5 = mt.Item("​md5"​),​ .Format = mt.Item("​format"​) } For Each MedDr As SysMedia In selectedMedias debug.writeline(MedDr.Type) Next End Class Public Class SysMedia Public Type As String Public URL As String Public Region As String Public MD5 As String Public Format As String End Class ''​
-Public Class YourClass+
  
-    Dim selectedMedias = From mt In _mediaTable +hello world
-                         Where _mediaTypes.Contains(mt.Item("​type"​)) +
-                         ​Select New SysMedia With { +
-                             .Type = mt.Item("​type"​),​ +
-                             .URL = mt.Item("​media_Text"​),​ +
-                             ​.Region = mt.Item("​region"​),​ +
-                             .MD5 = mt.Item("​md5"​),​ +
-                             ​.Format = mt.Item("​format"​) +
-                             } +
- +
-    For Each MedDr As SysMedia In selectedMedias +
-        debug.writeline(MedDr.Type) +
-    Next +
- +
-End Class +
- +
-Public Class SysMedia +
- +
-    Public Type As String +
-    Public URL As String +
-    Public Region As String +
-    Public MD5 As String +
-    Public Format As String +
- +
-End Class +
-</​code>​+
  
  
coding.txt · Last modified: 2019/07/09 21:58 by stigzler