MVEs are more concerned with the satisfaction of those they help than with the considerable points they can earn. They are the types of people you feel privileged to call colleagues. Join us in honoring this amazing group of Experts.
$from_sender = $q->param('from'); $to_recip = $q->param('to'); $cc_manager = $q->param('cc_mgr'); $bcc = "xxxx\@xxx.com"; $card = $q->param('card'); $message = $q->param('message'); #$cc_mgr = "$cc_manager\@xxxx.com"; @months = qw(Jan Feb Mar Apr May Jun Jul Aug Sept Oct Nov Dec); @weekDays = qw(Sun Mon Tue Wed Thur Fri Sat Sun); ($second, $minute, $hour, $dayOfMonth, $month, $yearOffset, $dayOfWeek, $dayOfYear, $daylightSavings) = localtime(); $year = 1900 + $yearOffset; $dateandtime = "$hour:$minute:$second, $weekDays[$dayOfWeek] $months[$month] $dayOfMonth, $year"; ..... ($host, $db, $dbUid, $dbPwd) = &dbInfo::setDbInfo(); $errStr = ""; $dbh = DBI->connect("DBI:Oracle:(DESCRIPTION=(ADDRESS=(PROTOCOL=TCP)(HOST=$host)(PORT=1521))(CONNECT_DATA=(SID=$db)))", "$dbUid", "$dbPwd"); $sql = qq/insert into CDO_ECARD(REC_ID,USERID,TO_RECIP,FROM_SENDER,CC_MANAGER,CARD,MESSAGE,IMAGE,DATEANDTIME) values(?,?,?,?,?,?,?,?,?)/; $sth = $dbh->prepare($sql) or $errStr .="SQL Prepare Error: $DBI::errstr<br />"; $sth->execute($recId,$userId,$to_recip,$from_sender,$cc_manager,$card,$message,$imgFile,$dateandtime) or $errStr .= "Execute Error: $DBI::errstr<br />"; $sth->finish or $errStr .= "Finish Error: $DBI::errstr<br />"; $dbh->commit or $errStr .= "Commit Error: $DBI::errstr<br />"; $dbh->disconnect;
|powershell md/mkdir/New-item -Quiet||10||96|
|remove computer from using logon script||17||38|
|how to find out the count of records based on the subfolders paths||11||32|
|add more rows to hierarchy||3||25|