이곳은 Mac 관련 유용한 정보들을 모아 많은 분과 함께 공유하기 위해 운영되고 있습니다. 잠깐 들르시는 나그네라도 자유롭게 글을 올리시고 의견을 나누실 수 있습니다.[ code = applescript]
[ / code] *** 공백 없이 사용할 것 ***
[code=applescript]
tell application "Finder"
activate
select file "AppleScript.url"
set position of selection to {656,277 }
set position of selection to {700,282 }
select file "terms.pdf"
-- comment line
set position of selection to {723,192 }
(*
this is a
comment
*)
end tell[/code]
[code=pascal]
program cgi_test;
uses
WinCrt,SysUtils;//I use freepascal
{
#i am not expert with Apache :-(
#add to apache server config file httpd.conf this line
AddHandler cgi-script cgi exe,
}
begin
//send header to the browser
WriteLn('Content-Type: text/html');
WriteLn('');//end of header
//send html
WriteLn('<html>');
WriteLn('<body>');
WriteLn('<h5>Hello World From Pascal</h><br>');
//WriteLn(IntToStr(ParamCount));
WriteLn('</body>');
WriteLn('</html>');
end.[/code]
Firebird SQL 1.5
[code=firebird]
create or alter procedure "procLogin"
(
"UserName" varchar(60),
"UserPassword" varchar(60),
"UserSite" integer,
"UserIsOccult" integer
)
returns
(
"SessionID" integer,
"User" integer
)
as
declare variable "UserAccount" integer;
-- variable of user
begin
/* select a user from
users table */
select "UsrID" from "Users"
where "UsrName"=:"UserName" and
"UsrPassword"=:"UserPassword"
into :"User";
if ("User" is not null) then
begin
"SessionID"=CURRENT_CONNECTION;
insert into "Sessions" ("SessionID","SessionUser","SessionSite","SessionIsOccult")
values(:"SessionID",:"User",:"UserSite",:"UserIsOccult");
end
suspend;
end[/code]
[code=mssql]
-- Back up the currently active transaction log.
BACKUP LOG MyNwind
TO MyNwind_log2
WITH NO_TRUNCATE
GO
-- Restore the database backup.
RESTORE DATABASE MyNwind
FROM MyNwind_1
WITH NORECOVERY
GO[/code]
[code=php]
<?php
$db_type = 'mysql';
$db_host = 'localhost';
$db_name = 'parmaja_com';
$db_username = 'zaherdirkey';
$db_password = 'diputstonmai';
$db_prefix = 'punbb_';
$p_connect = true;
$cookie_name = 'punbb_cookie';
$cookie_domain = '';
$cookie_path = '/';
$cookie_secure =0 ;
if (!isset($language))
$language = 'en';
//header('Content-Type: text/html; charset=windows-1256');
header('Content-Type: text/html; charset=windows-1256');
$pun_url='http://www.parmaja.com/forum';
/* define('PUN',1 );
if (getenv('SITE')=='LOCAL')
{
define('PUN_DEBUG',1);
}
*/
$s='select * from forums
where forum not found';
?>[/code]
지원 언어들: apache, applescript, cpp, delphi, firebird, ini, mssql, pascal, php, sql, vb, vbnet, vbscript
