public static function StringStartsWith($string, $search) {
$ret = false;
if (strlen($string) >= strlen($search)) {
$ret = (substr($string, 0, strlen($search)) == $search);
}
return $ret;
}
public static function StringEndsWith($string, $search) {
$string = strrev($string);
$search = strrev($search);
return Utils::StringStartsWith($string,$search);
}
x = IIf(String.IsNullOrEmpty(textbox.Text), Nothing, Double.Parse(textbox.Text))
x = Nothing
If Not String.IsNullOrEmpty(textbox.Text) Then
x = Double.Parse(textbox.Text)
End If
SELECT * FROM mytable WHERE mytable.mycolumn NOT LIKE '%[^0-9]%'
Dim myArray(1) As String myArray(0) = "1" 'Most languages would stop here - not VB! myArray(1) = "2"
Array.Resize(myArray, 2)
Array.Resize(myArray, 3)
ALTER TABLE `my_table_name` AUTO_INCREMENT = 1;
//Current method name
System.Reflection.MethodBase.GetCurrentMethod()
.Name;
//Fully qualified name of the method's class
System.Reflection.MethodBase.GetCurrentMethod()
.ReflectedType.FullName;
//Method's class name without Namespace
System.Reflection.MethodBase.GetCurrentMethod()
.ReflectedType.Name;
//Namespace
System.Reflection.MethodBase.GetCurrentMethod()
.ReflectedType.Namespace;'Current method name
System.Reflection.MethodBase.GetCurrentMethod(). _
Name
'Fully qualified name of the method's class
System.Reflection.MethodBase.GetCurrentMethod(). _
ReflectedType.FullName
'Method's class name without Namespace
System.Reflection.MethodBase.GetCurrentMethod(). _
ReflectedType.Name
'Namespace
System.Reflection.MethodBase.GetCurrentMethod(). _
ReflectedType.Namespace
SmtpClient smtp = new SmtpClient("smtp.gmail.com");
smtp.EnableSsl = true;
smtp.Timeout = 10000;
smtp.DeliveryMethod = SmtpDeliveryMethod.Network;
smtp.UseDefaultCredentials = false;
smtp.Credentials = new System.Net.NetworkCredential("email@mydomain.com", "my-password");
smtp.Send(msg);DECLARE cObjects CURSOR READ_ONLY
FOR
SELECT name, xtype
FROM sysobjects
LEFT OUTER JOIN syspermissions ON sysobjects.id = syspermissions.id
WHERE xtype IN ('V', 'P', 'U', 'FN')
AND syspermissions.id IS NULL
DECLARE @ObjName varchar(255), @ObjType varchar(2)
DECLARE @SQL varchar(MAX)
DECLARE @User varchar(100)
SELECT @User = '[DOMAIN]\[USER]'
OPEN cObjects
FETCH NEXT FROM cObjects INTO @ObjName, @ObjType
WHILE (@@FETCH_STATUS <> -1)
BEGIN
IF (@@FETCH_STATUS <> -2)
BEGIN
--Set the access permissions
IF @ObjType = 'V' -- View
SELECT @SQL = 'SELECT, INSERT, DELETE, UPDATE'
ELSE IF @ObjType = 'P' -- Stored Procedure
SELECT @SQL = 'EXEC'
ELSE IF @ObjType = 'U' -- Table
SELECT @SQL = 'SELECT, INSERT, DELETE, UPDATE'
ELSE IF @ObjType = 'FN' -- User Defined Function
SELECT @SQL = 'EXEC'
--Build the rest of the statement and execute
SELECT @SQL = 'GRANT ' + @SQL + ' ON dbo.[' + @ObjName + '] TO [' + @User + ']'
EXEC(@SQL)
PRINT @SQL
END
FETCH NEXT FROM cObjects INTO @ObjName, @ObjType
END
CLOSE cObjects
DEALLOCATE cObjects
GO