Gossamer Forum: Products: Others: Gossamer Community: Sharing Creation Date with Links SQL

Oct 28, 2004, 12:09 PM

afrayer

User (105 posts)

Oct 28, 2004, 12:09 PM

Post #1 of 6

Shortcut

Sharing Creation Date with Links SQL

I'm beating myself on the head over this, but I can't seem to find where I can link the internally produced Creation Date timestamp (indicating the date a user account was created) to a field in the Users table of Links SQL.

I can link fields I create, but none of the system fields.

Any thoughts on this? I need to have the account creation date recorded in the Links SQL Users table for easy reference.

Alan Frayer
Don't just read the news - make the news!
Your World News - http://yourworldnews.frayernet.com

Oct 29, 2004, 5:32 AM

Andy

Veteran / Moderator (18441 posts)

Oct 29, 2004, 5:32 AM

Post #2 of 6

Shortcut

Re: [afrayer] Sharing Creation Date with Links SQL In reply to

User creation time? You could do this using new GT::SQL /path/to/admin;

If this is what you want, I can provide some working code, that we use on our site, to connect between GComm and LSQL (works quite well =)).

Cheers

Andy (mod)
andy@ultranerds.co.uk

Oct 29, 2004, 6:08 AM

afrayer

User (105 posts)

Oct 29, 2004, 6:08 AM

Post #3 of 6

Shortcut

Re: [Andy] Sharing Creation Date with Links SQL In reply to

In Reply To:

Not yet really familiar with GT::SQL /path/to/admin; I'll be happy to look at (and possibly try) the code. Just be sure to give my novice self some explanation on what to do with it, as most of this Perl stuff is still over my head (I'm learning it as fast as I can)!

Alan Frayer
Don't just read the news - make the news!
Your World News - http://yourworldnews.frayernet.com

Oct 29, 2004, 6:16 AM

Andy

Veteran / Moderator (18441 posts)

Oct 29, 2004, 6:16 AM

Post #4 of 6

Shortcut

Re: [afrayer] Sharing Creation Date with Links SQL In reply to

Something like this should work :)

Code:
sub { 

       my $db = new GT::SQL '/full/path/to/cgi-bin/admin/defs';  
       $db->set_connect ({  
                          driver     => "mysql",  
                          host       => 'localhost',  
                          #port       => 3243,  
                          database   => 'DBNAME',  
                          login      => 'DBUSER',  
                          password   => 'DBPASS'  
                        }) || die $GT::SQL::error;  

       $db->prefix('comm_'); 

  # do whatever you need to do here .. . 
  # same as a normal GT::SQL object.... 

       return \$users_table; 

}

Wish I had a bit more time to help out ... .Basically, all you need to do, is something like;

my $value = $db->table('Users')->select( ['FieldToGrab'], { comm_username => 'foobar' )->fetchrow;

Hope that helps.

Cheers

Andy (mod)
andy@ultranerds.co.uk

Oct 29, 2004, 6:29 AM

afrayer

User (105 posts)

Oct 29, 2004, 6:29 AM

Post #5 of 6

Shortcut

Re: [Andy] Sharing Creation Date with Links SQL In reply to

Interesting... but Greek to me without context... Is the large chunk of code a global inder Community? If so, what should I name it? If not, where does it go?

And the small length of code goes in a template where I want to use the information (Links SQL)? Or in Community somewhere?

I'm sorry to be such a pain!

Alan Frayer
Don't just read the news - make the news!
Your World News - http://yourworldnews.frayernet.com

Oct 29, 2004, 7:04 AM

Andy

Veteran / Moderator (18441 posts)

Oct 29, 2004, 7:04 AM

Post #6 of 6

Shortcut

Re: [afrayer] Sharing Creation Date with Links SQL In reply to

Try something like this;

Code:
sub { 

       use GT::Date; 
       my $user = $_[0]; 

       my $db = new GT::SQL '/full/path/to/cgi-bin/admin/defs';  
       $db->set_connect ({  
                          driver     => "mysql",  
                          host       => 'localhost',  
                          #port       => 3243,  
                          database   => 'DBNAME',  
                          login      => 'DBUSER',  
                          password   => 'DBPASS'  
                        }) || die $GT::SQL::error;  

       $db->prefix('comm_'); 

       my $value = $db->table('users')->select( ['comm_created'], { comm_username => $user )->fetchrow 
       return GT::Date::date_get date_get_gm($value); 

}

Call with: <%global_name('User_to_Find_Creation')%>.

Hope that helps.

Cheers

Andy (mod)
andy@ultranerds.co.uk